xref: /plan9-contrib/sys/src/cmd/map/libmap/cylindrical.c (revision 59cc4ca53493a3c6d2349fe2b7f7c40f7dce7294)
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 int
Xcylindrical(struct place * place,double * x,double * y)6219b2ee8SDavid du Colombier Xcylindrical(struct place *place, double *x, double *y)
73e12c5d1SDavid du Colombier {
83e12c5d1SDavid du Colombier 	if(fabs(place->nlat.l) > 80.*RAD)
93e12c5d1SDavid du Colombier 		return(-1);
103e12c5d1SDavid du Colombier 	*x = - place->wlon.l;
113e12c5d1SDavid du Colombier 	*y = place->nlat.s / place->nlat.c;
123e12c5d1SDavid du Colombier 	return(1);
133e12c5d1SDavid du Colombier }
143e12c5d1SDavid du Colombier 
153e12c5d1SDavid du Colombier proj
cylindrical(void)163e12c5d1SDavid du Colombier cylindrical(void)
173e12c5d1SDavid du Colombier {
183e12c5d1SDavid du Colombier 	return(Xcylindrical);
193e12c5d1SDavid du Colombier }
20