PageRenderTime 8ms CodeModel.GetById 2ms app.highlight 3ms RepoModel.GetById 1ms app.codeStats 0ms

/Proj4/pj_msfn.c

http://github.com/route-me/route-me
C | 10 lines | 9 code | 0 blank | 1 comment | 0 complexity | cf9885e461600a9f36224526df2be6b1 MD5 | raw file
 1/* determine constant small m */
 2#ifndef lint
 3static const char SCCSID[]="@(#)pj_msfn.c	4.3	93/06/12	GIE	REL";
 4#endif
 5#include <math.h>
 6#include "projects.h"
 7	double
 8pj_msfn(double sinphi, double cosphi, double es) {
 9	return (cosphi / sqrt (1. - es * sinphi * sinphi));
10}