src/msfn.cpp


1
2
3
4
5
6
7
8

/* determine constant small m */
#include <math.h>
#include "proj.h"
#include "projects.h"
	double
pj_msfn(double sinphi, double cosphi, double es) {
	return (cosphi / sqrt (1. - es * sinphi * sinphi));
}