Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1
#include <u.h>
2
#include <libc.h>
3
#include "map.h"
4
 
5
int
6
Xazequidistant(struct place *place, double *x, double *y)
7
{
8
	double colat;
9
	colat = PI/2 - place->nlat.l;
10
	*x = -colat * place->wlon.s;
11
	*y = -colat * place->wlon.c;
12
	return(1);
13
}
14
 
15
proj
16
azequidistant(void)
17
{
18
	return(Xazequidistant);
19
}