1*59cc4ca5SDavid du Colombier #include <u.h>
2*59cc4ca5SDavid du Colombier #include <libc.h>
33e12c5d1SDavid du Colombier #include "map.h"
43e12c5d1SDavid du Colombier
53e12c5d1SDavid du Colombier #define Xaitwist Xaitpole.nlat
63e12c5d1SDavid du Colombier static struct place Xaitpole;
73e12c5d1SDavid du Colombier
83e12c5d1SDavid du Colombier static int
Xaitoff(struct place * place,double * x,double * y)9219b2ee8SDavid du Colombier Xaitoff(struct place *place, double *x, double *y)
103e12c5d1SDavid du Colombier {
113e12c5d1SDavid du Colombier struct place p;
123e12c5d1SDavid du Colombier copyplace(place,&p);
133e12c5d1SDavid du Colombier p.wlon.l /= 2.;
143e12c5d1SDavid du Colombier sincos(&p.wlon);
153e12c5d1SDavid du Colombier norm(&p,&Xaitpole,&Xaitwist);
163e12c5d1SDavid du Colombier Xazequalarea(&p,x,y);
173e12c5d1SDavid du Colombier *x *= 2.;
183e12c5d1SDavid du Colombier return(1);
193e12c5d1SDavid du Colombier }
203e12c5d1SDavid du Colombier
213e12c5d1SDavid du Colombier proj
aitoff(void)223e12c5d1SDavid du Colombier aitoff(void)
233e12c5d1SDavid du Colombier {
243e12c5d1SDavid du Colombier latlon(0.,0.,&Xaitpole);
253e12c5d1SDavid du Colombier return(Xaitoff);
263e12c5d1SDavid du Colombier }
27