58 extern	double	sin	(double);
59 extern	double	cos	(double);
60 extern	double	acos	(double);
61 extern	double	tan	(double);
62 extern	double	atan	(double);
63 extern	double	sqrt	(double);
122 static	void	doit		(double, double, double, double, double, char *);
123 static	double	latlong		(char *, int);
124 static	double	greatcircle	(double, double, double, double);
125 static	double	waveangle	(double, double, int);
126 static	double	propdelay	(double, double, int);
127 static	int	finddelay	(double, double, double, double, double, double *);
128 static	void	satdoit		(double, double, double, double, double, double, char *);
129 static	void	satfinddelay	(double, double, double, double, double *);
130 static	double	satpropdelay	(double);
143 	double lat1, long1;  in main()
144 	double lat2, long2;  in main()
145 	double lat3, long3;  in main()
198 			doit(lat1, long1, lat2, long2, (double)SUMMERHEIGHT,  in main()
200 			doit(lat1, long1, lat2, long2, (double)WINTERHEIGHT,  in main()
214 			doit(lat1, long1, lat2, long2, (double)SUMMERHEIGHT,  in main()
216 			doit(lat1, long1, lat2, long2, (double)WINTERHEIGHT,  in main()
228 			doit(lat1, long1, lat2, long2, (double)SUMMERHEIGHT,  in main()
230 			doit(lat1, long1, lat2, long2, (double)WINTERHEIGHT,  in main()
241 			doit(lat1, long1, lat2, long2, (double)SUMMERHEIGHT,  in main()
243 			doit(lat1, long1, lat2, long2, (double)WINTERHEIGHT,  in main()
276 	double lat1,  in doit()
277 	double long1,  in doit()
278 	double lat2,  in doit()
279 	double long2,  in doit()
280 	double h,  in doit()
285 	double delay;  in doit()
296 static double
304 	double arg;  in latlong()
305 	double divby;  in latlong()
377 static double
379 	double lat1,  in greatcircle()
380 	double long1,  in greatcircle()
381 	double lat2,  in greatcircle()
382 	double long2  in greatcircle()
385 	double dg;  in greatcircle()
386 	double l1r, l2r;  in greatcircle()
405 static double
407 	double dg,  in waveangle()
408 	double h,  in waveangle()
412 	double theta;  in waveangle()
413 	double delta;  in waveangle()
415 	theta = dg / (EARTHRADIUS * (double)(2 * n));  in waveangle()
427 static double
429 	double dg,  in propdelay()
430 	double h,  in propdelay()
434 	double phi;  in propdelay()
435 	double theta;  in propdelay()
436 	double td;  in propdelay()
438 	theta = dg / (EARTHRADIUS * (double)(2 * n));  in propdelay()
453 	double lat1,  in finddelay()
454 	double long1,  in finddelay()
455 	double lat2,  in finddelay()
456 	double long2,  in finddelay()
457 	double h,  in finddelay()
458 	double *delay  in finddelay()
461 	double dg;	/* great circle distance */  in finddelay()
462 	double delta;	/* wave angle */  in finddelay()
488 	double lat1,  in satdoit()
489 	double long1,  in satdoit()
490 	double lat2,  in satdoit()
491 	double long2,  in satdoit()
492 	double lat3,  in satdoit()
493 	double long3,  in satdoit()
497 	double up_delay,down_delay;  in satdoit()
511 	double lat1,  in satfinddelay()
512 	double long1,  in satfinddelay()
513 	double lat2,  in satfinddelay()
514 	double long2,  in satfinddelay()
515 	double *delay  in satfinddelay()
518 	double dg;	/* great circle distance */  in satfinddelay()
529 static double
531 	double dg  in satpropdelay()
534 	double k1, k2, dist;  in satpropdelay()
535 	double theta;  in satpropdelay()
536 	double td;  in satpropdelay()