/dports/math/cgal/CGAL-5.3/include/CGAL/ |
H A D | Hilbert_sort_median_3.h | 132 recursive_sort<z, upz, upx, upy> (m0, m1); 133 recursive_sort<y, upy, upz, upx> (m1, m2); 134 recursive_sort<y, upy, upz, upx> (m2, m3); 135 recursive_sort<x, upx,!upy,!upz> (m3, m4); 136 recursive_sort<x, upx,!upy,!upz> (m4, m5); 137 recursive_sort<y,!upy, upz,!upx> (m5, m6); 138 recursive_sort<y,!upy, upz,!upx> (m6, m7); 139 recursive_sort<z,!upz,!upx, upy> (m7, m8); 154 hs.recursive_sort<x,upx,upy,upz>(begin,end); 194 …b::parallel_invoke(Hilbert_split<RandomAccessIterator,Cmp<y, upy> >(m2, m0, m4, Cmp<y, upy>(_k)), [all …]
|
H A D | Hilbert_sort_median_2.h | 100 template <int x, bool upx, bool upy, class RandomAccessIterator> 113 recursive_sort<y, upy, upx> (m0, m1); 114 recursive_sort<x, upx, upy> (m1, m2); 115 recursive_sort<x, upx, upy> (m2, m3); 116 recursive_sort<y,!upy,!upx> (m3, m4); 119 template <int x, bool upx, bool upy, class RandomAccessIterator> 131 hs.recursive_sort<x,upx,upy>(begin,end); 154 template <int x, bool upx, bool upy, class RandomAccessIterator> 173 …arallel_invoke(Hilbert_split<RandomAccessIterator, Cmp< y, upy> > (m1, m0, m2, Cmp< y, upy> (_k)… 174 … Hilbert_split<RandomAccessIterator, Cmp< y, !upy> > (m3, m2, m4, Cmp< y, !upy> (_k))); [all …]
|
H A D | Hilbert_sort_middle_3.h | 105 template <int x, bool upx, bool upy, bool upz, class RandomAccessIterator> 123 internal::fixed_hilbert_split (m0, m4, Cmp< y, upy> (ymed,_k)); 125 internal::fixed_hilbert_split (m4, m8, Cmp< y, !upy> (ymed,_k)); 137 sort<z, upz, upx, upy> (m0, m1, zmin, xmin, ymin, zmed, xmed, ymed); 139 sort<y, upy, upz, upx> (m1, m2, ymin, zmed, xmin, ymed, zmax, xmed); 141 sort<y, upy, upz, upx> (m2, m3, ymed, zmed, xmin, ymax, zmax, xmed); 143 sort<x, upx,!upy,!upz> (m3, m4, xmin, ymax, zmed, xmed, ymed, zmin); 145 sort<x, upx,!upy,!upz> (m4, m5, xmed, ymax, zmed, xmax, ymed, zmin); 147 sort<y,!upy, upz,!upx> (m5, m6, ymax, zmed, xmax, ymed, zmax, xmed); 149 sort<y,!upy, upz,!upx> (m6, m7, ymed, zmed, xmax, ymin, zmax, xmed); [all …]
|
H A D | Hilbert_sort_middle_2.h | 96 template <int x, bool upx, bool upy, class RandomAccessIterator> 109 RandomAccessIterator m1 = internal::fixed_hilbert_split (m0, m2, Cmp< y, upy> (ymed,_k)); 110 RandomAccessIterator m3 = internal::fixed_hilbert_split (m2, m4, Cmp< y, !upy> (ymed,_k)); 113 sort<y, upy, upx> (m0, m1, ymin, xmin, ymed, xmed); 115 sort<x, upx, upy> (m1, m2, xmin, ymed, xmed, ymax); 117 sort<x, upx, upy> (m2, m3, xmed, ymed, xmax, ymax); 119 sort<y,!upy,!upx> (m3, m4, ymed, xmax, ymin, xmed);
|
/dports/biology/molden/molden5.8/ |
H A D | hidedr.f | 25 call above(upx(i),upy(i),upx(i+1),upy(i+1),x1,y1,oa) 26 call above(upx(i),upy(i),upx(i+1),upy(i+1),x2,y2,ob) 34 call cross(upx(i),upy(i),upx(i+1),upy(i+1),x1,y1,x2,y2,os, 52 call above(upx(i),upy(i),upx(i+1),upy(i+1),x2,y2,oa) 53 call above(upx(i),upy(i),upx(i+1),upy(i+1),x3,y3,ob) 61 call cross(upx(i),upy(i),upx(i+1),upy(i+1),x2,y2,x3,y3,os, 99 upy(inge) = upy(inge+1) 107 upy(inge) = upy(inge-ieff) 112 upy(inge) = upy(inge-ieff) 124 upy(k) = upy(k-1) [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/szpack/ |
H A D | szplzu.c | 27 /* Subroutine */ int szplzu_(integer *n, real *upx, real *upy) in szplzu_() argument 39 --upy; in szplzu_() 45 szmvlu_(&upx[1], &upy[1]); in szplzu_() 48 szpllu_(&upx[i__], &upy[i__]); in szplzu_() 55 if (upx[i__] == szbpl1_1.rmiss || upy[i__] == szbpl1_1.rmiss) { in szplzu_() 58 szpllu_(&upx[i__], &upy[i__]); in szplzu_() 60 szmvlu_(&upx[i__], &upy[i__]); in szplzu_()
|
H A D | sztnzu.c | 18 /* Subroutine */ int sztnzu_(integer *n, real *upx, real *upy) in sztnzu_() argument 29 --upy; in sztnzu_() 36 szsttu_(&upx[i__], &upy[i__]); in sztnzu_() 39 szsttu_(&upx[1], &upy[1]); in sztnzu_()
|
H A D | szpmzu.c | 34 /* Subroutine */ int szpmzu_(integer *n, real *upx, real *upy) in szpmzu_() argument 45 --upy; in szpmzu_() 52 lflag = szbpm1_1.lmiss && (upx[i__] == szbpm1_1.rmiss || upy[i__] == in szpmzu_() 55 sztxzu_(&upx[i__], &upy[i__], szbpm2_1.cmark, (ftnlen)1); in szpmzu_()
|
H A D | szm3zu.c | 40 /* Subroutine */ int szm3zu_(integer *n, real *upx, real *upy, real *upz) in szm3zu_() argument 57 --upy; in szm3zu_() 67 lflag = szbpm1_1.lmiss && (upx[i__] == szbpm1_1.rmiss || upy[i__] == in szm3zu_() 70 stftr3_(&upx[i__], &upy[i__], &upz[i__], &vx, &vy, &vz); in szm3zu_()
|
/dports/astro/p5-Starlink-AST/Starlink-AST-1.05/lib/Starlink/AST/ |
H A D | PLplot.pm | 162 my ( $text, $x, $y, $just, $upx, $upy ) = @_; 195 $upy = -$upy if $beta < 0.0; 198 my $angle = atan2( -$upx*$alpha, $upy*$beta); 228 my $uplen = sqrt( $upx*$upx + $upy*$upy ); 231 $upy /= $uplen; 240 $y -= 0.5 * $upy * mm2world(2, $ht); 243 $y += 0.5 * $upy * mm2world(2, $ht); 357 my ( $text, $x, $y, $just, $upx, $upy ) = @_; 397 $upy = -$upy if $beta < 0.0; 403 my $uy = $beta*$upy; [all …]
|
H A D | PGPLOT.pm | 163 my ( $text, $x, $y, $just, $upx, $upy ) = @_; 196 $upy = -$upy if $beta < 0.0; 199 my $angle = atan2( -$upx*$alpha, $upy*$beta)*R2D; 223 my $uplen = sqrt( $upx*$upx + $upy*$upy ); 226 $upy /= $uplen; 238 my $test = $upx*( $xbox[$i] - $x ) + $upy*( $ybox[$i] - $y ); 246 $y -= $upy*$hu; 249 $y -= 0.5*$upy*$hu; 344 my ( $text, $x, $y, $just, $upx, $upy ) = @_; 384 $upy = -$upy if $beta < 0.0; [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph2/uvpack/ |
H A D | uvbxlz.c | 30 /* Subroutine */ int uvbxlz_(integer *n, real *upx, real *upy, integer *itype, in uvbxlz_() argument 63 --upy; in uvbxlz_() 89 if (upy[1] == rundef) { in uvbxlz_() 123 if ((ux1 == rmiss || ux2 == rmiss || upy[i__] == rmiss) && lmiss) { in uvbxlz_() 127 szpllu_(&ux1, &upy[i__]); in uvbxlz_() 128 szpllu_(&ux2, &upy[i__]); in uvbxlz_() 130 szmvlu_(&ux1, &upy[i__]); in uvbxlz_() 131 szpllu_(&ux2, &upy[i__]); in uvbxlz_()
|
H A D | uvbxl.c | 18 /* Subroutine */ int uvbxl_(integer *n, real *upx, real *upy) in uvbxl_() argument 25 --upy; in uvbxl_() 31 uvbxlz_(n, &upx[1], &upy[1], &itype, &index); in uvbxl_()
|
/dports/print/scribus-devel/scribus-1.5.7/scribus/ |
H A D | pageitem_osgframe.cpp | 195 double upx, upy, upz; in getPDFMatrix() local 214 upy = 1.0f; in getPDFMatrix() 220 upy =-1.0f; in getPDFMatrix() 227 upy = cameraUp[1]; in getPDFMatrix() 229 leftx = viewz * upy - viewy * upz; in getPDFMatrix() 231 leftz = viewy * upx - viewx * upy; in getPDFMatrix() 245 upyprime = upy * cosroll + lefty * sinroll; in getPDFMatrix() 251 upy = upyprime; in getPDFMatrix() 271 if (fabs(upy) < 0.0000001) in getPDFMatrix() 272 upy = 0.0; in getPDFMatrix() [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/scpack/ |
H A D | scplu.c | 20 /* Subroutine */ int scplu_0_(int n__, integer *n, real *upx, real *upy, real in scplu_0_() argument 36 if (upy) { in scplu_0_() 37 --upy; in scplu_0_() 73 szl3zu_(n, &upx[1], &upy[1], &upz[1]); in scplu_0_() 108 /* Subroutine */ int scplu_(integer *n, real *upx, real *upy, real *upz) in scplu_() argument 110 return scplu_0_(0, n, upx, upy, upz, (real *)0, (real *)0, (real *)0, ( in scplu_()
|
H A D | sctnu.c | 20 /* Subroutine */ int sctnu_0_(int n__, real *upx, real *upy, real *upz, real * in sctnu_0_() argument 36 if (upy) { in sctnu_0_() 37 --upy; in sctnu_0_() 69 szt3zu_(&upx[1], &upy[1], &upz[1]); in sctnu_0_() 102 /* Subroutine */ int sctnu_(real *upx, real *upy, real *upz) in sctnu_() argument 104 return sctnu_0_(0, upx, upy, upz, (real *)0, (real *)0, (real *)0, ( in sctnu_()
|
H A D | scpmu.c | 20 /* Subroutine */ int scpmu_0_(int n__, integer *n, real *upx, real *upy, real in scpmu_0_() argument 39 if (upy) { in scpmu_0_() 40 --upy; in scpmu_0_() 94 szm3zu_(n, &upx[1], &upy[1], &upz[1]); in scpmu_0_() 163 /* Subroutine */ int scpmu_(integer *n, real *upx, real *upy, real *upz) in scpmu_() argument 165 return scpmu_0_(0, n, upx, upy, upz, (real *)0, (real *)0, (real *)0, ( in scpmu_()
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/sgpack/ |
H A D | sgtnu.c | 20 /* Subroutine */ int sgtnu_0_(int n__, integer *n, real *upx, real *upy, real in sgtnu_0_() argument 36 if (upy) { in sgtnu_0_() 37 --upy; in sgtnu_0_() 74 sztnzu_(n, &upx[1], &upy[1]); in sgtnu_0_() 129 /* Subroutine */ int sgtnu_(integer *n, real *upx, real *upy) in sgtnu_() argument 131 return sgtnu_0_(0, n, upx, upy, (real *)0, (real *)0, (real *)0, (real *) in sgtnu_()
|
H A D | sgplu.c | 20 /* Subroutine */ int sgplu_0_(int n__, integer *n, real *upx, real *upy, real in sgplu_0_() argument 37 if (upy) { in sgplu_0_() 38 --upy; in sgplu_0_() 82 szplzu_(n, &upx[1], &upy[1]); in sgplu_0_() 157 /* Subroutine */ int sgplu_(integer *n, real *upx, real *upy) in sgplu_() argument 159 return sgplu_0_(0, n, upx, upy, (real *)0, (real *)0, (real *)0, (real *) in sgplu_()
|
/dports/science/lammps/lammps-stable_29Sep2021/src/MOFFF/ |
H A D | improper_inversion_harmonic.cpp | 136 double upx,upy,upz,upn,rup,umx,umy,umz,umn,rum,wwr; in invang() local 151 upy=vb2y*rrvb2+vb1y*rrvb1; in invang() 153 upn=1.0/sqrt(upx*upx+upy*upy+upz*upz); in invang() 155 upy=upy*upn; in invang() 157 rup=vb3x*upx+vb3y*upy+vb3z*upz; in invang() 186 rucb = rjk-rup*(vb2x*upx+vb2y*upy+vb2z*upz); in invang() 187 rudb = rjl-rup*(vb1x*upx+vb1y*upy+vb1z*upz); in invang() 196 f2[1]=gomega*(-cosomega*vb3y*rr2vb3+rrvb3*(rup*upy+rum*umy)/wwr); in invang() 201 f3[1]=gomega*rrvb3*(rupupn*rrvb2*(vb3y-rup*upy-rucb*vb2y*rr2vb2) + in invang() 208 f4[1]=gomega*rrvb3*(rupupn*rrvb1*(vb3y-rup*upy-rudb*vb1y*rr2vb1) - in invang()
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph2/uhpack/ |
H A D | uhbxlz.c | 30 /* Subroutine */ int uhbxlz_(integer *n, real *upx, real *upy, integer *itype, in uhbxlz_() argument 63 --upy; in uhbxlz_() 101 lyuni = upy[1] == rundef; in uhbxlz_() 120 uy1 = upy[i__]; in uhbxlz_() 121 uy2 = upy[i__ + 1]; in uhbxlz_()
|
H A D | uhbxl.c | 18 /* Subroutine */ int uhbxl_(integer *n, real *upx, real *upy) in uhbxl_() argument 25 --upy; in uhbxl_() 31 uhbxlz_(n, &upx[1], &upy[1], &itype, &index); in uhbxl_()
|
H A D | uhbxa.c | 18 /* Subroutine */ int uhbxa_(integer *n, real *upx1, real *upx2, real *upy) in uhbxa_() argument 25 --upy; in uhbxa_() 31 uhbxaz_(n, &upx1[1], &upx2[1], &upy[1], &itpat1, &itpat2); in uhbxa_()
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph2/uupack/ |
H A D | uulin.c | 20 /* Subroutine */ int uulin_(integer *n, real *upx, real *upy) in uulin_() argument 27 --upy; in uulin_() 33 uulinz_(n, &upx[1], &upy[1], &itype, &index); in uulin_()
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph2/oldsrc/ |
H A D | ubplu.c | 24 /* Subroutine */ int ubplu_0_(int n__, integer *n, real *upx, real *upy, real in ubplu_0_() argument 41 if (upy) { in ubplu_0_() 42 --upy; in ubplu_0_() 68 sgplu_(n, &upx[1], &upy[1]); in ubplu_0_() 141 /* Subroutine */ int ubplu_(integer *n, real *upx, real *upy) in ubplu_() argument 143 return ubplu_0_(0, n, upx, upy, (real *)0, (real *)0, (integer *)0, ( in ubplu_()
|