diff options
Diffstat (limited to 'src/cmd/map/libmap/azequalarea.c')
-rw-r--r-- | src/cmd/map/libmap/azequalarea.c | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/src/cmd/map/libmap/azequalarea.c b/src/cmd/map/libmap/azequalarea.c new file mode 100644 index 00000000..6bae893d --- /dev/null +++ b/src/cmd/map/libmap/azequalarea.c @@ -0,0 +1,19 @@ +#include <u.h> +#include <libc.h> +#include "map.h" + +int +Xazequalarea(struct place *place, double *x, double *y) +{ + double r; + r = sqrt(1. - place->nlat.s); + *x = - r * place->wlon.s; + *y = - r * place->wlon.c; + return(1); +} + +proj +azequalarea(void) +{ + return(Xazequalarea); +} |