Home
last modified time | relevance | path

Searched refs:M_FORTPI (Results 1 – 25 of 55) sorted by relevance

123

/dports/math/vtk9/VTK-9.1.0/ThirdParty/libproj/vtklibproj/src/
H A DPJ_healpix.c282 double y0 = M_FORTPI; in healpix_sphere_inverse()
363 if (y > M_FORTPI) { in get_cap()
381 capmap.x = -M_FORTPI; in get_cap()
385 capmap.x = M_FORTPI; in get_cap()
393 if (y > M_FORTPI) { in get_cap()
411 if (y >= -x - M_FORTPI - EPS && y < x + 5*M_FORTPI - EPS) { in get_cap()
413 } else if (y > -x -M_FORTPI + EPS && y >= x + 5*M_FORTPI - EPS) { in get_cap()
415 } else if (y <= -x -M_FORTPI + EPS && y > x + 5*M_FORTPI + EPS) { in get_cap()
421 if (y <= x + M_FORTPI + EPS && y > -x - 5*M_FORTPI + EPS) { in get_cap()
423 } else if (y < x + M_FORTPI - EPS && y <= -x - 5*M_FORTPI + EPS) { in get_cap()
[all …]
H A DPJ_qsc.c79 if (fabs(theta) <= M_FORTPI) { in qsc_fwd_equat_face_theta()
81 } else if (theta > M_FORTPI && theta <= M_HALFPI + M_FORTPI) { in qsc_fwd_equat_face_theta()
84 } else if (theta > M_HALFPI + M_FORTPI || theta <= -(M_HALFPI + M_FORTPI)) { in qsc_fwd_equat_face_theta()
132 if (lon >= M_FORTPI && lon <= M_HALFPI + M_FORTPI) { in e_forward()
135 } else if (lon > M_HALFPI + M_FORTPI || lon <= -(M_HALFPI + M_FORTPI)) { in e_forward()
138 } else if (lon > -(M_HALFPI + M_FORTPI) && lon <= -M_FORTPI) { in e_forward()
147 if (lon >= M_FORTPI && lon <= M_HALFPI + M_FORTPI) { in e_forward()
150 } else if (lon < M_FORTPI && lon >= -M_FORTPI) { in e_forward()
153 } else if (lon < -M_FORTPI && lon >= -(M_HALFPI + M_FORTPI)) { in e_forward()
390 if (P->phi0 >= M_HALFPI - M_FORTPI / 2.0) { in PROJECTION()
[all …]
H A DPJ_somerc.c21 log (tan (M_FORTPI + 0.5 * lp.phi)) - Q->hlf_e * log ((1. + sp)/(1. - sp))) in e_forward()
28 xy.y = Q->kR * log (tan (M_FORTPI + 0.5 * phipp)); in e_forward()
39 phipp = 2. * (atan (exp (xy.y / Q->kR)) - M_FORTPI); in e_inverse()
44 con = (Q->K - log (tan (M_FORTPI + 0.5 * phip)))/Q->c; in e_inverse()
47 delp = (con + log(tan(M_FORTPI + 0.5 * phip)) - Q->hlf_e * in e_inverse()
98 Q->K = log (tan (M_FORTPI + 0.5 * phip0)) - Q->c * ( in PROJECTION()
99 log (tan (M_FORTPI + 0.5 * P->phi0)) - Q->hlf_e * in PROJECTION()
H A Dpj_gauss.c59 EN->K = tan(.5 * *chi + M_FORTPI) / ( in pj_gauss_ini()
60 pow(tan(.5 * phi0 + M_FORTPI), EN->C) * in pj_gauss_ini()
70 pow(tan(.5 * elp.phi + M_FORTPI), EN->C) * in pj_gauss()
82 num = pow(tan(.5 * slp.phi + M_FORTPI)/EN->K, 1./EN->C); in pj_inv_gauss()
H A DPJ_lcc.c29 P->e), Q->n) : pow(tan(M_FORTPI + .5 * lp.phi), -Q->n)); in e_forward()
76 P->e), Q->n) : pow(tan(M_FORTPI + .5 * lp.phi), -Q->n)); in special()
139 log(tan(M_FORTPI + .5 * Q->phi2) / in PROJECTION()
140 tan(M_FORTPI + .5 * Q->phi1)); in PROJECTION()
141 Q->c = cosphi * pow(tan(M_FORTPI + .5 * Q->phi1), Q->n) / Q->n; in PROJECTION()
143 Q->c * pow(tan(M_FORTPI + .5 * P->phi0), -Q->n); in PROJECTION()
H A DPJ_labrd.c19 V1 = Q->A * log( tan(M_FORTPI + .5 * lp.phi) ); in e_forward()
22 ps = 2. * (atan(exp(V1 - V2 + Q->C)) - M_FORTPI); in e_forward()
64 V1 = Q->A * log(tan(M_FORTPI + .5 * pe)); in e_inverse()
67 t = ps - 2. * (atan(exp(V1 - V2 + Q->C)) - M_FORTPI); in e_inverse()
129 - Q->A * log( tan(M_FORTPI + .5 * P->phi0)) in PROJECTION()
130 + log( tan(M_FORTPI + .5 * Q->p0s)); in PROJECTION()
H A DPJ_calcofi.c79 xy.y = log(tan(M_FORTPI + .5 * lp.phi)); in s_forward()
80 oy = log(tan(M_FORTPI + .5 * PT_O_PHI)); in s_forward()
134 oymctr = log(tan(M_FORTPI + .5 * PT_O_PHI)); in s_inverse()
135 rymctr = log(tan(M_FORTPI + .5 * ry)); in s_inverse()
136 xymctr = log(tan(M_FORTPI + .5 * lp.phi)); in s_inverse()
H A DPJ_loxim.c23 xy.x = M_FORTPI + 0.5 * lp.phi; in s_forward()
41 lp.lam = M_FORTPI + 0.5 * lp.phi; in s_inverse()
78 Q->tanphi1 = tan(M_FORTPI + 0.5 * Q->phi1); in PROJECTION()
/dports/graphics/proj/proj-7.2.1/src/projections/
H A Dhealpix.cpp281 double y0 = M_FORTPI; in healpix_spherhealpix_e_inverse()
362 if (y > M_FORTPI) { in get_cap()
380 capmap.x = -M_FORTPI; in get_cap()
384 capmap.x = M_FORTPI; in get_cap()
392 if (y > M_FORTPI) { in get_cap()
410 if (y >= -x - M_FORTPI - EPS && y < x + 5*M_FORTPI - EPS) { in get_cap()
412 } else if (y > -x -M_FORTPI + EPS && y >= x + 5*M_FORTPI - EPS) { in get_cap()
414 } else if (y <= -x -M_FORTPI + EPS && y > x + 5*M_FORTPI + EPS) { in get_cap()
420 if (y <= x + M_FORTPI + EPS && y > -x - 5*M_FORTPI + EPS) { in get_cap()
422 } else if (y < x + M_FORTPI - EPS && y <= -x - 5*M_FORTPI + EPS) { in get_cap()
[all …]
H A Dqsc.cpp94 if (fabs(theta) <= M_FORTPI) { in qsc_fwd_equat_face_theta()
96 } else if (theta > M_FORTPI && theta <= M_HALFPI + M_FORTPI) { in qsc_fwd_equat_face_theta()
99 } else if (theta > M_HALFPI + M_FORTPI || theta <= -(M_HALFPI + M_FORTPI)) { in qsc_fwd_equat_face_theta()
147 if (lon >= M_FORTPI && lon <= M_HALFPI + M_FORTPI) { in qsc_e_forward()
150 } else if (lon > M_HALFPI + M_FORTPI || lon <= -(M_HALFPI + M_FORTPI)) { in qsc_e_forward()
153 } else if (lon > -(M_HALFPI + M_FORTPI) && lon <= -M_FORTPI) { in qsc_e_forward()
162 if (lon >= M_FORTPI && lon <= M_HALFPI + M_FORTPI) { in qsc_e_forward()
165 } else if (lon < M_FORTPI && lon >= -M_FORTPI) { in qsc_e_forward()
168 } else if (lon < -M_FORTPI && lon >= -(M_HALFPI + M_FORTPI)) { in qsc_e_forward()
388 if (P->phi0 >= M_HALFPI - M_FORTPI / 2.0) { in PROJECTION()
[all …]
H A Dsomerc.cpp28 log (tan (M_FORTPI + 0.5 * lp.phi)) - Q->hlf_e * log ((1. + sp)/(1. - sp))) in somerc_e_forward()
35 xy.y = Q->kR * log (tan (M_FORTPI + 0.5 * phipp)); in somerc_e_forward()
46 phipp = 2. * (atan (exp (xy.y / Q->kR)) - M_FORTPI); in somerc_e_inverse()
51 con = (Q->K - log (tan (M_FORTPI + 0.5 * phip)))/Q->c; in somerc_e_inverse()
54 delp = (con + log(tan(M_FORTPI + 0.5 * phip)) - Q->hlf_e * in somerc_e_inverse()
89 Q->K = log (tan (M_FORTPI + 0.5 * phip0)) - Q->c * ( in PROJECTION()
90 log (tan (M_FORTPI + 0.5 * P->phi0)) - Q->hlf_e * in PROJECTION()
H A Dcalcofi.cpp81 xy.y = log(tan(M_FORTPI + .5 * lp.phi)); in calcofi_s_forward()
82 oy = log(tan(M_FORTPI + .5 * PT_O_PHI)); in calcofi_s_forward()
132 oymctr = log(tan(M_FORTPI + .5 * PT_O_PHI)); in calcofi_s_inverse()
133 rymctr = log(tan(M_FORTPI + .5 * ry)); in calcofi_s_inverse()
134 xymctr = log(tan(M_FORTPI + .5 * lp.phi)); in calcofi_s_inverse()
H A Dlabrd.cpp25 V1 = Q->A * log( tan(M_FORTPI + .5 * lp.phi) ); in labrd_e_forward()
28 ps = 2. * (atan(exp(V1 - V2 + Q->C)) - M_FORTPI); in labrd_e_forward()
76 V1 = Q->A * log(tan(M_FORTPI + .5 * pe)); in labrd_e_inverse()
79 t = ps - 2. * (atan(exp(V1 - V2 + Q->C)) - M_FORTPI); in labrd_e_inverse()
127 - Q->A * log( tan(M_FORTPI + .5 * P->phi0)) in PROJECTION()
128 + log( tan(M_FORTPI + .5 * Q->p0s)); in PROJECTION()
H A Dlcc.cpp37 pow(tan(M_FORTPI + .5 * lp.phi), -Q->n)); in lcc_e_forward()
141 log(tan(M_FORTPI + .5 * Q->phi2) / in PROJECTION()
142 tan(M_FORTPI + .5 * Q->phi1)); in PROJECTION()
148 Q->c = cosphi * pow(tan(M_FORTPI + .5 * Q->phi1), Q->n) / Q->n; in PROJECTION()
150 Q->c * pow(tan(M_FORTPI + .5 * P->phi0), -Q->n); in PROJECTION()
H A Dloxim.cpp30 xy.x = M_FORTPI + 0.5 * lp.phi; in loxim_s_forward()
48 lp.lam = M_FORTPI + 0.5 * lp.phi; in loxim_s_inverse()
70 Q->tanphi1 = tan(M_FORTPI + 0.5 * Q->phi1); in PROJECTION()
H A Dmill.cpp15 xy.y = log(tan(M_FORTPI + lp.phi * .4)) * 1.25; in mill_s_forward()
26 lp.phi = 2.5 * (atan(exp(.8 * xy.y)) - M_FORTPI); in mill_s_inverse()
/dports/math/vtk8/VTK-8.2.0/ThirdParty/libproj/vtklibproj/src/
H A DPJ_healpix.c282 double y0 = M_FORTPI; in healpix_sphere_inverse()
363 if (y > M_FORTPI) { in get_cap()
381 capmap.x = -M_FORTPI; in get_cap()
385 capmap.x = M_FORTPI; in get_cap()
393 if (y > M_FORTPI) { in get_cap()
411 if (y >= -x - M_FORTPI - EPS && y < x + 5*M_FORTPI - EPS) { in get_cap()
413 } else if (y > -x -M_FORTPI + EPS && y >= x + 5*M_FORTPI - EPS) { in get_cap()
415 } else if (y <= -x -M_FORTPI + EPS && y > x + 5*M_FORTPI + EPS) { in get_cap()
421 if (y <= x + M_FORTPI + EPS && y > -x - 5*M_FORTPI + EPS) { in get_cap()
423 } else if (y < x + M_FORTPI - EPS && y <= -x - 5*M_FORTPI + EPS) { in get_cap()
[all …]
H A DPJ_qsc.c79 if (fabs(theta) <= M_FORTPI) { in qsc_fwd_equat_face_theta()
81 } else if (theta > M_FORTPI && theta <= M_HALFPI + M_FORTPI) { in qsc_fwd_equat_face_theta()
84 } else if (theta > M_HALFPI + M_FORTPI || theta <= -(M_HALFPI + M_FORTPI)) { in qsc_fwd_equat_face_theta()
132 if (lon >= M_FORTPI && lon <= M_HALFPI + M_FORTPI) { in e_forward()
135 } else if (lon > M_HALFPI + M_FORTPI || lon <= -(M_HALFPI + M_FORTPI)) { in e_forward()
138 } else if (lon > -(M_HALFPI + M_FORTPI) && lon <= -M_FORTPI) { in e_forward()
147 if (lon >= M_FORTPI && lon <= M_HALFPI + M_FORTPI) { in e_forward()
150 } else if (lon < M_FORTPI && lon >= -M_FORTPI) { in e_forward()
153 } else if (lon < -M_FORTPI && lon >= -(M_HALFPI + M_FORTPI)) { in e_forward()
390 if (P->phi0 >= M_HALFPI - M_FORTPI / 2.0) { in PROJECTION()
[all …]
H A DPJ_somerc.c21 log (tan (M_FORTPI + 0.5 * lp.phi)) - Q->hlf_e * log ((1. + sp)/(1. - sp))) in e_forward()
28 xy.y = Q->kR * log (tan (M_FORTPI + 0.5 * phipp)); in e_forward()
39 phipp = 2. * (atan (exp (xy.y / Q->kR)) - M_FORTPI); in e_inverse()
44 con = (Q->K - log (tan (M_FORTPI + 0.5 * phip)))/Q->c; in e_inverse()
47 delp = (con + log(tan(M_FORTPI + 0.5 * phip)) - Q->hlf_e * in e_inverse()
98 Q->K = log (tan (M_FORTPI + 0.5 * phip0)) - Q->c * ( in PROJECTION()
99 log (tan (M_FORTPI + 0.5 * P->phi0)) - Q->hlf_e * in PROJECTION()
H A Dpj_gauss.c59 EN->K = tan(.5 * *chi + M_FORTPI) / ( in pj_gauss_ini()
60 pow(tan(.5 * phi0 + M_FORTPI), EN->C) * in pj_gauss_ini()
70 pow(tan(.5 * elp.phi + M_FORTPI), EN->C) * in pj_gauss()
82 num = pow(tan(.5 * slp.phi + M_FORTPI)/EN->K, 1./EN->C); in pj_inv_gauss()
H A DPJ_lcc.c29 P->e), Q->n) : pow(tan(M_FORTPI + .5 * lp.phi), -Q->n)); in e_forward()
76 P->e), Q->n) : pow(tan(M_FORTPI + .5 * lp.phi), -Q->n)); in special()
139 log(tan(M_FORTPI + .5 * Q->phi2) / in PROJECTION()
140 tan(M_FORTPI + .5 * Q->phi1)); in PROJECTION()
141 Q->c = cosphi * pow(tan(M_FORTPI + .5 * Q->phi1), Q->n) / Q->n; in PROJECTION()
143 Q->c * pow(tan(M_FORTPI + .5 * P->phi0), -Q->n); in PROJECTION()
H A DPJ_labrd.c19 V1 = Q->A * log( tan(M_FORTPI + .5 * lp.phi) ); in e_forward()
22 ps = 2. * (atan(exp(V1 - V2 + Q->C)) - M_FORTPI); in e_forward()
64 V1 = Q->A * log(tan(M_FORTPI + .5 * pe)); in e_inverse()
67 t = ps - 2. * (atan(exp(V1 - V2 + Q->C)) - M_FORTPI); in e_inverse()
129 - Q->A * log( tan(M_FORTPI + .5 * P->phi0)) in PROJECTION()
130 + log( tan(M_FORTPI + .5 * Q->p0s)); in PROJECTION()
H A DPJ_calcofi.c79 xy.y = log(tan(M_FORTPI + .5 * lp.phi)); in s_forward()
80 oy = log(tan(M_FORTPI + .5 * PT_O_PHI)); in s_forward()
134 oymctr = log(tan(M_FORTPI + .5 * PT_O_PHI)); in s_inverse()
135 rymctr = log(tan(M_FORTPI + .5 * ry)); in s_inverse()
136 xymctr = log(tan(M_FORTPI + .5 * lp.phi)); in s_inverse()
H A DPJ_loxim.c23 xy.x = M_FORTPI + 0.5 * lp.phi; in s_forward()
41 lp.lam = M_FORTPI + 0.5 * lp.phi; in s_inverse()
78 Q->tanphi1 = tan(M_FORTPI + 0.5 * Q->phi1); in PROJECTION()
/dports/graphics/proj/proj-7.2.1/src/
H A Dgauss.cpp73 if( .5 * phi0 + M_FORTPI < 1e-10 ) { in pj_gauss_ini()
77 en->K = tan(.5 * *chi + M_FORTPI) / ( in pj_gauss_ini()
78 pow(tan(.5 * phi0 + M_FORTPI), en->C) * in pj_gauss_ini()
90 pow(tan(.5 * elp.phi + M_FORTPI), en->C) * in pj_gauss()
103 num = pow(tan(.5 * slp.phi + M_FORTPI)/en->K, 1./en->C); in pj_inv_gauss()

123