Home
last modified time | relevance | path

Searched refs:rcurv (Results 1 – 7 of 7) sorted by relevance

/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/
H A Ds1370.c56 int ratflag, SISLCurve ** rcurv, int *jstat) in s1370() argument
59 s1370 (pcurv, earray, idim, inarr, ratflag, rcurv, jstat) in s1370()
65 SISLCurve ** rcurv;
213 s1893 (icurve, sarray, kdimp1, knarr, 0, 0, rcurv, &kstat);
216 if (*rcurv == SISL_NULL) goto err171;
230 (*rcurv)->rcoef = newarray((*rcurv)->in * (*rcurv)->idim, DOUBLE);
231 memcopy((*rcurv)->rcoef, (*rcurv)->ecoef,
232 (*rcurv)->in * (*rcurv)->idim, DOUBLE);
234 (*rcurv)->idim --; /* Adjust from the homogeneus coordinates. */
235 (*rcurv)->ikind = 2; /* i.e. rational */
H A Ds1377.c56 SISLCurve ** rcurv, int *jstat) in s1377() argument
59 s1377 (pcurv, econic, ideg, idim, rcurv, jstat) in s1377()
64 SISLCurve **rcurv;
281 *rcurv = SISL_NULL;
282 *rcurv = newCurve (kjkn, kjkk, sgt, sval2, 1, 1, 1);
283 if (*rcurv == SISL_NULL)
285 (*rcurv)->cuopen = pcurv->cuopen;
/dports/math/vtk9/VTK-9.1.0/ThirdParty/libproj/vtklibproj/src/
H A DPJ_sch.c46 double rcurv; member
60 pxyz[0] = xyz.y * P->a / Q->rcurv; in inverse3d()
61 pxyz[1] = xyz.x * P->a / Q->rcurv; in inverse3d()
125 xyz.x = temp[1] * Q->rcurv / P->a; in forward3d()
126 xyz.y = temp[0] * Q->rcurv / P->a; in forward3d()
181 Q->rcurv = Q->h0 + (reast*rnorth)/(reast * chdg * chdg + rnorth * shdg * shdg); in setup()
186 printf("Effective Radius: %f \n", Q->rcurv); in setup()
190 if ( pj_Set_Geocentric_Parameters(&(Q->sph), Q->rcurv, Q->rcurv) != 0) in setup()
212 Q->xyzoff[0] = pxyz[0] - (Q->rcurv) * clt * clo; in setup()
213 Q->xyzoff[1] = pxyz[1] - (Q->rcurv) * clt * slo; in setup()
[all …]
/dports/math/vtk8/VTK-8.2.0/ThirdParty/libproj/vtklibproj/src/
H A DPJ_sch.c46 double rcurv; member
60 pxyz[0] = xyz.y * P->a / Q->rcurv; in inverse3d()
61 pxyz[1] = xyz.x * P->a / Q->rcurv; in inverse3d()
125 xyz.x = temp[1] * Q->rcurv / P->a; in forward3d()
126 xyz.y = temp[0] * Q->rcurv / P->a; in forward3d()
181 Q->rcurv = Q->h0 + (reast*rnorth)/(reast * chdg * chdg + rnorth * shdg * shdg); in setup()
186 printf("Effective Radius: %f \n", Q->rcurv); in setup()
190 if ( pj_Set_Geocentric_Parameters(&(Q->sph), Q->rcurv, Q->rcurv) != 0) in setup()
212 Q->xyzoff[0] = pxyz[0] - (Q->rcurv) * clt * clo; in setup()
213 Q->xyzoff[1] = pxyz[1] - (Q->rcurv) * clt * slo; in setup()
[all …]
/dports/graphics/proj/proj-7.2.1/src/projections/
H A Dsch.cpp49 double rcurv; member
61 lpz.lam = xyz.x * (P->a / Q->rcurv); in sch_inverse3d()
62 lpz.phi = xyz.y * (P->a / Q->rcurv); in sch_inverse3d()
104 xyz.x = lpz.lam * (Q->rcurv / P->a); in sch_forward3d()
105 xyz.y = lpz.phi * (Q->rcurv / P->a); in sch_forward3d()
152 Q->rcurv = Q->h0 + (reast*rnorth)/(reast * chdg * chdg + rnorth * shdg * shdg); in setup()
158 pj_calc_ellipsoid_params(Q->cart_sph, Q->rcurv, 0); in setup()
176 Q->xyzoff[0] = xyz.x - (Q->rcurv) * clt * clo; in setup()
177 Q->xyzoff[1] = xyz.y- (Q->rcurv) * clt * slo; in setup()
178 Q->xyzoff[2] = xyz.z - (Q->rcurv) * slt; in setup()
/dports/audio/din/din-52/src/
H A Dsolver.cc226 int rseg = iseg, rcurv = icurv; in searchright() local
227 int rsegs = numsegs (rcurv); in searchright()
230 ++rcurv; in searchright()
231 if (rcurv >= ncurvs) break; in searchright()
232 rsegs = numsegs (rcurv); in searchright()
235 if (seg_lte_right (x, rcurv, rseg)) return 1; in searchright()
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/szpack/
H A Dszoplc.c71 static real rcurv; in szoplc_0_() local
105 sgrget_("RCURV", &rcurv, (ftnlen)5); in szoplc_0_()
126 if (! (0.f < rcurv && rcurv < fwc)) { in szoplc_0_()
232 if (xlc <= hz * wxch * rcurv) { in szoplc_0_()