Identifies the location between two points on a great circle along a specified fraction of the distance.

## Arguments

- x
an

`rs_POINT`

vector- y
an

`rs_POINT`

vector- distance
a numeric vector of either length 1 or the same length as x and y

## Examples

```
x <- geom_point(1:10, rep(5, 10))
y <- geom_point(1:10, rep(0, 10))
res <- haversine_intermediate(x, y, 0.5)
if (rlang::is_installed(c("wk", "sf"))) {
plot(
c(x, y, res),
col = sort(rep.int(c("red", "blue", "purple"), 10)),
pch = 16
)
}
```