/dports/science/tinker/tinker/source/ |
H A D | center.f | 19 subroutine center (n1,x1,y1,z1,n2,x2,y2,z2,xmid,ymid,zmid) argument 24 real*8 xmid,ymid,zmid local 35 zmid = 0.0d0 42 zmid = zmid + z2(k)*weigh 47 zmid = zmid / norm 51 z2(i) = z2(i) - zmid 59 zmid = 0.0d0 66 zmid = zmid + z1(k)*weigh 71 zmid = zmid / norm 75 z1(i) = z1(i) - zmid
|
H A D | bounds.f | 29 real*8 xmid,ymid,zmid local 41 zmid = 0.0d0 47 zmid = zmid + z(k)*weigh 52 zmid = zmid / weigh 57 zfrac = zmid / gamma_term 61 zfrac = zmid / beta_sin 65 zfrac = zmid 118 z(k) = z(k) - zmid + zcom
|
H A D | diffuse.f | 42 real*8 xmid,ymid,zmid 246 zmid = 0.0d0 252 zmid = zmid + z(k)*weigh 257 zmid = zmid / weigh 261 zold = zmid 269 zr = zmid - zold
|
H A D | impose.f | 28 real*8 xmid,ymid,zmid local 72 call center (n1,x1,y1,z1,n2,x2,y2,z2,xmid,ymid,zmid) 94 z1(i) = z1(i) + zmid 99 z2(i) = z2(i) + zmid
|
H A D | xtalfit.f | 375 real*8 xmid,ymid,zmid local 417 zmid = 0.0d0 423 zmid = zmid + z(k)*weigh 428 zmid = zmid / weigh 429 zfrac(i) = zmid / gamma_term 832 real*8 xmid,ymid,zmid local 855 zmid = 0.0d0 861 zmid = zmid + z(k)*weigh 866 zmid = zmid / weigh 874 zoff(k) = z(k) - zmid [all …]
|
H A D | moments.f | 40 real*8 xmid,ymid,zmid local 84 zmid = 0.0d0 90 zmid = zmid + z(i)*mass(i) 96 zmid = zmid / weigh 101 zcm(i) = z(i) - zmid
|
/dports/math/arb/arb-2.21.1/acb/ |
H A D | log_sin_pi.c | 17 acb_t t, u, zmid; in acb_log_sin_pi_half() local 23 acb_init(zmid); in acb_log_sin_pi_half() 27 arf_set(arb_midref(acb_realref(zmid)), arb_midref(acb_realref(z))); in acb_log_sin_pi_half() 28 arf_set(arb_midref(acb_imagref(zmid)), arb_midref(acb_imagref(z))); in acb_log_sin_pi_half() 30 arf_floor(n, arb_midref(acb_realref(zmid))); in acb_log_sin_pi_half() 31 arb_sub_arf(acb_realref(zmid), acb_realref(zmid), n, prec); in acb_log_sin_pi_half() 35 if (arf_cmpabs_2exp_si(arb_midref(acb_imagref(zmid)), 2) < 1) in acb_log_sin_pi_half() 37 acb_sin_pi(t, zmid, prec); in acb_log_sin_pi_half() 42 acb_mul_2exp_si(t, zmid, 1); in acb_log_sin_pi_half() 57 acb_sub(u, zmid, u, prec); in acb_log_sin_pi_half() [all …]
|
/dports/math/chaco/Chaco-2.2/code/bpmatch/ |
H A D | inits3d.c | 22 double xmid, ymid, zmid; /* median x, y and z values */ local 40 zmid = .5 * vals[0][4][indices[0][4][nvtxs / 2]]; 42 dist[0] = -xmid - ymid - zmid; 43 dist[1] = xmid - ymid - zmid; 44 dist[2] = -xmid + ymid - zmid; 45 dist[3] = xmid + ymid - zmid; 46 dist[4] = -xmid - ymid + zmid; 47 dist[5] = xmid - ymid + zmid; 48 dist[6] = -xmid + ymid + zmid; 49 dist[7] = xmid + ymid + zmid;
|
/dports/science/afni/afni-AFNI_21.3.16/src/ |
H A D | uuu.c | 30 float zmid,zsig,zmed, uval, fac, zrat, ff,fp, ss,ds,pp,ee , sigma ; in unusuality() local 69 zmid = zz[nr/2] ; in unusuality() 71 zmid = 0.5 * ( zz[nr/2] + zz[nr/2-1] ) ; in unusuality() 74 for( ii=0 ; ii < nr ; ii++ ) aa[ii] = fabs(zz[ii]-zmid) ; in unusuality() 76 rmid = zmid ; zmid = atanh(zmid) ; in unusuality() 105 for( ii=0 ; ii < nr ; ii++ ) zz[ii] = fac * ( zz[ii] - zmid ) ; in unusuality() 109 rcut = tanh( zsig * zstar + zmid ) ; in unusuality() 112 else zz[ii] = fac * ( atanh(zz[ii]) - zmid ) ; in unusuality()
|
H A D | uuu2.c | 31 float zmid,zsig,zmed , rmid,rcut ; in find_unusual_correlations() local 71 zmid = zz[nr/2] ; in find_unusual_correlations() 73 zmid = 0.5 * ( zz[nr/2] + zz[nr/2-1] ) ; in find_unusual_correlations() 75 rmid = zmid ; /* median of rr */ in find_unusual_correlations() 76 zmid = atanh(zmid) ; /* median of atanh(rr) */ in find_unusual_correlations() 100 rcut = tanh( zsig*zstar + zmid ) ; in find_unusual_correlations()
|
H A D | uuu3.c | 34 float zmid,zsig,zmed , rmid,rcut ; in find_unusual_correlations() local 64 zmid = atanh(rmid) ; /* median of atanh(rr) */ in find_unusual_correlations() 84 rcut = tanh( zsig*zstar + zmid ) ; in find_unusual_correlations()
|
H A D | 3dAutobox.c | 94 float xmid=0, ymid=0, zmid=0; in main() local 281 zmid = (RL_AP_IS2[4] + RL_AP_IS2[5]) / 2.; in main() 282 printf( "%10.5f %10.5f %10.5f\n", xmid, ymid, zmid ); in main()
|
/dports/math/arb/arb-2.21.1/acb_hypgeom/ |
H A D | erf.c | 98 acb_t zmid; in acb_hypgeom_erf_asymp() local 101 acb_init(zmid); in acb_hypgeom_erf_asymp() 106 arf_set(arb_midref(acb_realref(zmid)), arb_midref(acb_realref(z))); in acb_hypgeom_erf_asymp() 107 arf_set(arb_midref(acb_imagref(zmid)), arb_midref(acb_imagref(z))); in acb_hypgeom_erf_asymp() 109 acb_hypgeom_erf_asymp(res, zmid, complementary, prec, prec2); in acb_hypgeom_erf_asymp() 114 acb_clear(zmid); in acb_hypgeom_erf_asymp() 240 acb_t zmid; in acb_hypgeom_erf_1f1() local 243 acb_init(zmid); in acb_hypgeom_erf_1f1() 252 acb_hypgeom_erf_1f1a(res, zmid, wp); in acb_hypgeom_erf_1f1() 254 acb_hypgeom_erf_1f1b(res, zmid, wp); in acb_hypgeom_erf_1f1() [all …]
|
H A D | erfc.c | 74 acb_t zmid; in acb_hypgeom_erfc() local 77 acb_init(zmid); in acb_hypgeom_erfc() 82 arf_set(arb_midref(acb_realref(zmid)), arb_midref(acb_realref(z))); in acb_hypgeom_erfc() 83 arf_set(arb_midref(acb_imagref(zmid)), arb_midref(acb_imagref(z))); in acb_hypgeom_erfc() 85 acb_hypgeom_erf(res, zmid, wp); in acb_hypgeom_erfc() 90 acb_clear(zmid); in acb_hypgeom_erfc()
|
H A D | fresnel.c | 105 acb_t zmid; in acb_hypgeom_fresnel_erf_error() local 109 acb_init(zmid); in acb_hypgeom_fresnel_erf_error() 154 arf_set(arb_midref(acb_realref(zmid)), arb_midref(acb_realref(z))); in acb_hypgeom_fresnel_erf_error() 155 arf_set(arb_midref(acb_imagref(zmid)), arb_midref(acb_imagref(z))); in acb_hypgeom_fresnel_erf_error() 157 acb_hypgeom_fresnel_erf(res1, res2, zmid, prec); in acb_hypgeom_fresnel_erf_error() 173 acb_clear(zmid); in acb_hypgeom_fresnel_erf_error()
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/ |
H A D | movecs_rotate.F | 33 double precision xmid, ymid, zmid, norm 134 zmid = 0.0d0 139 zmid = zmid + dbl_mb(iold+3*(i-1)+2) 144 zmid = zmid / norm 148 dbl_mb(iold+3*(i-1)+2) = dbl_mb(iold+3*(i-1)+2) - zmid 156 zmid = 0.0d0 161 zmid = zmid + dbl_mb(iact+3*(i-1)+2) 166 zmid = zmid / norm 170 dbl_mb(iact+3*(i-1)+2) = dbl_mb(iact+3*(i-1)+2) - zmid 262 z2 = zrott + zmid
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/ |
H A D | movecs_rotate.F | 34 double precision xmid, ymid, zmid, norm 135 zmid = 0.0d0 140 zmid = zmid + dbl_mb(iold+3*(i-1)+2) 145 zmid = zmid / norm 149 dbl_mb(iold+3*(i-1)+2) = dbl_mb(iold+3*(i-1)+2) - zmid 157 zmid = 0.0d0 162 zmid = zmid + dbl_mb(iact+3*(i-1)+2) 167 zmid = zmid / norm 171 dbl_mb(iact+3*(i-1)+2) = dbl_mb(iact+3*(i-1)+2) - zmid 263 z2 = zrott + zmid
|
/dports/science/smoldyn/smoldyn-2.67/source/Smoldyn/ |
H A D | smolgraphics.c | 782 double xlo,xhi,ylo,yhi,xpix,ypix,ymid,zmid; in RenderSurfaces() local 799 zmid=gl2GetNumber("ClipMidz"); in RenderSurfaces() 871 glVertex3d((GLdouble)(point[0][0]+front[0]*deltax),(GLdouble)(point[0][1]),(GLdouble)zmid); in RenderSurfaces() 872 glVertex3d((GLdouble)(point[1][0]+front[0]*deltax),(GLdouble)(point[1][1]),(GLdouble)zmid); } in RenderSurfaces() 874 glVertex3d((GLdouble)(point[0][0]),(GLdouble)(point[0][1]+front[0]*deltay),(GLdouble)zmid); in RenderSurfaces() 917 glVertex3d((GLdouble)(point[0][0]+front[0]*deltax),(GLdouble)(point[0][1]),(GLdouble)zmid); in RenderSurfaces() 920 glVertex3d((GLdouble)(point[0][0]),(GLdouble)(point[0][1]+front[0]*deltay),(GLdouble)zmid); in RenderSurfaces() 1159 double ymid,zmid; in RenderMolecs() local 1168 zmid=gl2GetNumber("ClipMidz"); in RenderMolecs() 1181 if(dim==1) glVertex3d((GLdouble)mptr->pos[0],(GLdouble)ymid,(GLdouble)zmid); in RenderMolecs() [all …]
|
/dports/science/tinker/tinker/other/ |
H A D | movie.f | 281 real*4 xave,yave,zave,xmid,ymid,zmid local 290 common /trans / xave,yave,zave,xmid,ymid,zmid 333 zmid = 0.5 * (ztiny+zhuge) 340 zave = zmid 440 real*4 xave,yave,zave,xmid,ymid,zmid local 445 common /trans / xave,yave,zave,xmid,ymid,zmid 457 zave = zmid + (getval(DIAL2) - orig(2))/10.0 504 real*4 xave,yave,zave,xmid,ymid,zmid local 516 common /trans / xave,yave,zave,xmid,ymid,zmid local 593 call transl (xmid+ft(k)*dist,ymid,zmid+zave-6.0*dist) [all …]
|
/dports/math/vtk9/VTK-9.1.0/Filters/General/Testing/Cxx/ |
H A D | TestQuadraturePoints.cxx | 282 double zmid = (zmax + zmin) / 4.0; in GenerateWarpVector() local 293 double zs = (ppts[2] - zmid) / (zmax - zmid); // move z to -1 to 1 in GenerateWarpVector() 322 double zmid = (zmax + zmin) / 4.0; in GenerateThresholdScalar() local 333 double zs = (ppts[2] - zmid) / (zmax - zmid); // move z to -1 to 1 in GenerateThresholdScalar()
|
/dports/math/vtk8/VTK-8.2.0/Filters/General/Testing/Cxx/ |
H A D | TestQuadraturePoints.cxx | 276 double zmid=(zmax+zmin)/4.0; in GenerateWarpVector() local 287 double zs=(ppts[2]-zmid)/(zmax-zmid); // move z to -1 to 1 in GenerateWarpVector() 318 double zmid=(zmax+zmin)/4.0; in GenerateThresholdScalar() local 329 double zs=(ppts[2]-zmid)/(zmax-zmid); // move z to -1 to 1 in GenerateThresholdScalar()
|
/dports/math/vtk6/VTK-6.2.0/Filters/General/Testing/Cxx/ |
H A D | TestQuadraturePoints.cxx | 276 double zmid=(zmax+zmin)/4.0; in GenerateWarpVector() local 287 double zs=(ppts[2]-zmid)/(zmax-zmid); // move z to -1 to 1 in GenerateWarpVector() 318 double zmid=(zmax+zmin)/4.0; in GenerateThresholdScalar() local 329 double zs=(ppts[2]-zmid)/(zmax-zmid); // move z to -1 to 1 in GenerateThresholdScalar()
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/optim/neb/ |
H A D | neb_utils.F | 1318 real*8 xmid,ymid,zmid 1349 rion1(3,i) = rion1(3,i) + zmid 1354 rion2(3,i) = rion2(3,i) + zmid 1420 real*8 xmid,ymid,zmid 1432 zmid = 0.0d0 1439 zmid = zmid + rion2(3,k)*weight 1445 zmid = zmid / norm 1449 rion2(3,i) = rion2(3,i) - zmid 1457 zmid = 0.0d0 1464 zmid = zmid + rion1(3,k)*weight [all …]
|
/dports/graphics/py-plotly/plotly-4.14.3/plotly/graph_objs/ |
H A D | _densitymapbox.py | 1279 def zmid(self): member in Densitymapbox 1294 @zmid.setter 1295 def zmid(self, val): member in Densitymapbox 1614 zmid=None, 2045 _v = zmid if zmid is not None else _v
|
H A D | _heatmapgl.py | 1226 def zmid(self): member in Heatmapgl 1241 @zmid.setter 1242 def zmid(self, val): member in Heatmapgl 1551 zmid=None, 1947 _v = zmid if zmid is not None else _v
|