/dports/science/bagel/bagel-1.2.2/src/integral/ecp/wigner3j_gen/ |
H A D | wigner3j_gen.cc | 20 constexpr int JMAX = 6; variable 43 const int n3j = static_cast<int>((JMAX+1)*(JMAX+1)*(JMAX+1)*(2*JMAX+1)*(2*JMAX+1)); in main() 52 for (int j1 = 0; j1 != JMAX + 1; ++j1) { in main() 53 for (int j2 = 0; j2 != JMAX + 1; ++j2) { in main() 54 for (int j3 = 0; j3 != JMAX + 1; ++j3) { in main() 55 for (int ma = 0; ma != 2*JMAX+1; ++ma) { in main() 56 for (int mb = 0; mb != 2*JMAX+1; ++mb) { in main() 57 const int m1 = ma - JMAX; in main() 58 const int m2 = mb - JMAX; in main() 175 assert (j1 <= " << JMAX << " && j2 <= " << JMAX << " && j3 <= " << JMAX << "); \n\ in main() [all …]
|
/dports/emulators/vice/vice-3.5/src/lib/libffmpeg/libavcodec/arm/ |
H A D | dcadsp_vfp.S | 59 .set X, 4*JMAX*4 - 4 63 vldr COEF0, [PCOEF, #X + (0*JMAX + 0) * Y] 64 vldr COEF1, [PCOEF, #X + (1*JMAX + 0) * Y] 65 vldr COEF2, [PCOEF, #X + (2*JMAX + 0) * Y] 66 vldr COEF3, [PCOEF, #X + (3*JMAX + 0) * Y] 73 vldr COEF4, [PCOEF, #X + (0*JMAX + 1) * Y] 74 vldr COEF5, [PCOEF, #X + (1*JMAX + 1) * Y] 135 .set JMAX, 8 define 142 .set JMAX, 4 define 148 1: add PCOEF, PCOEF, #4*JMAX*4 [all …]
|
/dports/emulators/libretro-vice/vice-libretro-5725415/vice/src/lib/libffmpeg/libavcodec/arm/ |
H A D | dcadsp_vfp.S | 59 .set X, 4*JMAX*4 - 4 63 vldr COEF0, [PCOEF, #X + (0*JMAX + 0) * Y] 64 vldr COEF1, [PCOEF, #X + (1*JMAX + 0) * Y] 65 vldr COEF2, [PCOEF, #X + (2*JMAX + 0) * Y] 66 vldr COEF3, [PCOEF, #X + (3*JMAX + 0) * Y] 73 vldr COEF4, [PCOEF, #X + (0*JMAX + 1) * Y] 74 vldr COEF5, [PCOEF, #X + (1*JMAX + 1) * Y] 135 .set JMAX, 8 define 142 .set JMAX, 4 define 148 1: add PCOEF, PCOEF, #4*JMAX*4 [all …]
|
/dports/math/vtk8/VTK-8.2.0/Filters/Geometry/Testing/Cxx/ |
H A D | TestStructuredAMRNeighbor.cxx | 31 #define JMAX(ext) ext[3] macro 102 IMAX(gridExtent) = JMAX(gridExtent) = 10; in TestParentNeighbor() 105 IMAX(neiExtent) = JMAX(neiExtent) = 8; in TestParentNeighbor() 108 IMAX(wholeExtent) = JMAX(wholeExtent) = 8; in TestParentNeighbor() 115 IMAX(neiOverlap) = JMAX(neiOverlap) = 5; in TestParentNeighbor() 176 IMAX(gridExtent) = JMAX(gridExtent) = 10; in TestPartiallyOverlappingParent() 251 IMAX(gridExtent) = JMAX(gridExtent) = 8; in TestChildNeighbor() 254 IMAX(neiExtent) = JMAX(neiExtent) = 10; in TestChildNeighbor() 329 IMAX(neiExtent) = JMAX(neiExtent) = 10; in TestPartiallyOverlappingChild() 404 IMAX(neiExtent) = JMAX(neiExtent) = 10; in TestSameLevelSibling() [all …]
|
/dports/math/vtk9/VTK-9.1.0/Filters/Geometry/Testing/Cxx/ |
H A D | TestStructuredAMRNeighbor.cxx | 31 #define JMAX(ext) ext[3] macro 174 JMAX(neiExtent) = 8; in TestPartiallyOverlappingParent() 182 JMAX(gridOverlap) = 10; in TestPartiallyOverlappingParent() 186 JMAX(neiOverlap) = 5; in TestPartiallyOverlappingParent() 317 JMAX(gridExtent) = 8; in TestPartiallyOverlappingChild() 328 JMAX(gridOverlap) = 5; in TestPartiallyOverlappingChild() 332 JMAX(neiOverlap) = 10; in TestPartiallyOverlappingChild() 475 JMAX(neiExtent) = 4; in TestCoarseToFineNeighbor() 487 JMAX(neiOverlap) = 4; in TestCoarseToFineNeighbor() 551 JMAX(gridExtent) = 4; in TestFineToCoarseNeighbor() [all …]
|
/dports/math/vtk6/VTK-6.2.0/Filters/Geometry/Testing/Cxx/ |
H A D | TestStructuredAMRNeighbor.cxx | 31 #define JMAX(ext) ext[3] macro 102 IMAX(gridExtent) = JMAX(gridExtent) = 10; in TestParentNeighbor() 105 IMAX(neiExtent) = JMAX(neiExtent) = 8; in TestParentNeighbor() 108 IMAX(wholeExtent) = JMAX(wholeExtent) = 8; in TestParentNeighbor() 115 IMAX(neiOverlap) = JMAX(neiOverlap) = 5; in TestParentNeighbor() 176 IMAX(gridExtent) = JMAX(gridExtent) = 10; in TestPartiallyOverlappingParent() 251 IMAX(gridExtent) = JMAX(gridExtent) = 8; in TestChildNeighbor() 254 IMAX(neiExtent) = JMAX(neiExtent) = 10; in TestChildNeighbor() 329 IMAX(neiExtent) = JMAX(neiExtent) = 10; in TestPartiallyOverlappingChild() 404 IMAX(neiExtent) = JMAX(neiExtent) = 10; in TestSameLevelSibling() [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/eri/ |
H A D | eri2her.F | 125 DO 800 J = 0, JMAX 145 CALL OUTPUT(RJ000(1,0),1,NPPX,1,JMAX+1,NPPX,JMAX+1,1,LUPRI) 184 DO 500 J = 0, JMAX 224 DO 800 J = 0, JMAX 244 CALL OUTPUT(RJ000(1,0),1,NPPX,1,JMAX+1,NPPX,JMAX+1,1,LUPRI) 286 DO 500 J = 1, JMAX 327 CALL OUTPUT(RJ000(1,0),1,NPPX,1,JMAX+1,NPPX,JMAX+1,1,LUPRI) 461 MAXT = JMAX 462 MAXU = JMAX 463 MAXV = JMAX [all …]
|
/dports/misc/libemos/libemos-4.5.9-Source/bufrdc_wmo/ |
H A D | buetd.F | 139 JMAX = KTDLEN 140 JMAXNEW=JMAX 153 DO 221 JJ=1,JMAX 170 DO 222 JC=1,JMAX 179 DO 223 JJC=1,JMAX 183 NTDLEN = JMAX 202 NTDLEN = JMAX 215 IF(JMAX.NE.NTDLEN) THEN 221 NTDLEN=JMAX 240 NTDLEN=JMAX [all …]
|
H A D | buedd.F | 137 JMAX = KTDLEN 138 JMAXNEW=JMAX 151 DO 221 JJ=1,JMAX 168 DO 222 JC=1,JMAX 177 DO 223 JJC=1,JMAX 181 NTDLEN = JMAX 205 NTDLEN=JMAX 213 IF(JMAX.NE.NTDLEN) THEN 219 NTDLEN=JMAX 243 NTDLEN=JMAX [all …]
|
H A D | buexs3.F | 224 JMAXNEW=JMAX 226 IF(JMAX.GT.JELEM) THEN 239 DO 221 JJ=1,JMAX 272 DO 222 JC=1,JMAX 280 DO 223 JJC=1,JMAX 284 NTDLEN = JMAX 313 NTDLEN=JMAX 322 IF(JMAX.NE.NTDLEN) THEN 331 NTDLEN=JMAX 367 NTDLEN=JMAX [all …]
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/abacus/ |
H A D | her2her.F | 39 LRJ000 = (JMAX + 1)*NUABCD 124 THERIX(JMAX) = THERIX(JMAX) + TIME 141 TR000X(JMAX) = TR000X(JMAX) + TIME 174 THERIX(JMAX) = THERIX(JMAX) + TIME 268 DIMENSION RJ000(NUABCD,0:JMAX),EJ000(NUABCD,0:JMAX), 795 DO J = 0, JMAX 831 DO J = 0, JMAX 1130 MAXT = JMAX 1131 MAXU = JMAX 1132 MAXV = JMAX [all …]
|
/dports/science/aircraft-datcom/aircraft-datcom-ed877bb/src/ |
H A D | dplot.f | 116 JMAX=3 131 JMAX=2 135 DO J=1,JMAX 138 DO J=1,JMAX 141 DO J=1,JMAX 206 JMAX=3 221 JMAX=2 600 JMAX=3 615 JMAX=2 697 JMAX=3 [all …]
|
/dports/textproc/words/words-1.97F_3/ |
H A D | makeewds.adb | 84 I, J, JMAX : INTEGER := 0; variable 104 JMAX := JMAX + 1; 112 JMAX := JMAX + 1; 120 JMAX := JMAX + 1; 125 JMAX := JMAX + 1; 133 JMAX := JMAX + 1; 138 JMAX := JMAX + 1; 178 JMAX := JMAX + 1; 183 JMAX := JMAX + 1; 210 JMAX := JMAX + 1; [all …]
|
/dports/science/dcl/dcl-5.4.8/demo/gokuraku/layout/ |
H A D | lay1.f | 6 PARAMETER( NMAX=401, JMAX=51 ) 7 REAL Y(NMAX), YY(JMAX) 29 IJMIN = (I-1)*(JMAX-1) + 1 31 DO 30 J=1,JMAX 36 XMAX = XMIN + JMAX - 1 40 CALL USGRPH( JMAX, RUNDEF, YY )
|
/dports/math/cmlib/cmlib-3.0_8/src/slvblk/ |
H A D | shiftb.f | 32 INTEGER IPIVOT(NROWI),LAST, IP,J,JMAX,JMAXP1,M,MMAX 35 JMAX = NCOLI - LAST 36 IF (MMAX .LT. 1 .OR. JMAX .LT. 1) RETURN 40 DO 10 J=1,JMAX 42 IF (JMAX .EQ. NCOLI1) RETURN 44 JMAXP1 = JMAX + 1
|
/dports/math/cmlib/cmlib-3.0_8/src/dbsplin/ |
H A D | dbnfac.f | 66 INTEGER IFLAG, NBANDL, NBANDU, NROW, NROWW, I, IPK, J, JMAX, K, 88 JMAX = MIN0(NBANDL,NROW-I) 89 DO 40 J=1,JMAX 102 JMAX = MIN0(NBANDL,NROW-I) 104 DO 70 J=1,JMAX 116 DO 80 J=1,JMAX
|
H A D | dbnslv.f | 31 INTEGER NBANDL, NBANDU, NROW, NROWW, I, J, JMAX, MIDDLE, NROWM1 42 JMAX = MIN0(NBANDL,NROW-I) 43 DO 10 J=1,JMAX 59 JMAX = MIN0(NBANDU,I-1) 60 DO 70 J=1,JMAX
|
/dports/math/slatec/src/ |
H A D | bnfac.f | 78 INTEGER IFLAG, NBANDL, NBANDU, NROW, NROWW, I, IPK, J, JMAX, K, 100 JMAX = MIN(NBANDL,NROW-I) 101 DO 40 J=1,JMAX 114 JMAX = MIN(NBANDL,NROW-I) 116 DO 70 J=1,JMAX 128 DO 80 J=1,JMAX
|
H A D | dbnfac.f | 80 INTEGER IFLAG, NBANDL, NBANDU, NROW, NROWW, I, IPK, J, JMAX, K, 102 JMAX = MIN(NBANDL,NROW-I) 103 DO 40 J=1,JMAX 116 JMAX = MIN(NBANDL,NROW-I) 118 DO 70 J=1,JMAX 130 DO 80 J=1,JMAX
|
H A D | bnslv.f | 43 INTEGER NBANDL, NBANDU, NROW, NROWW, I, J, JMAX, MIDDLE, NROWM1 54 JMAX = MIN(NBANDL,NROW-I) 55 DO 10 J=1,JMAX 71 JMAX = MIN(NBANDU,I-1) 72 DO 70 J=1,JMAX
|
H A D | dbnslv.f | 45 INTEGER NBANDL, NBANDU, NROW, NROWW, I, J, JMAX, MIDDLE, NROWM1 56 JMAX = MIN(NBANDL,NROW-I) 57 DO 10 J=1,JMAX 73 JMAX = MIN(NBANDU,I-1) 74 DO 70 J=1,JMAX
|
/dports/audio/guitarix-lv2/guitarix-0.43.1/tools/ampsim/tensbs/ |
H A D | bnfac.f | 64 INTEGER IFLAG, NBANDL, NBANDU, NROW, NROWW, I, IPK, J, JMAX, K, 86 JMAX = MIN0(NBANDL,NROW-I) 87 DO 40 J=1,JMAX 100 JMAX = MIN0(NBANDL,NROW-I) 102 DO 70 J=1,JMAX 114 DO 80 J=1,JMAX
|
H A D | bnslv.f | 29 INTEGER NBANDL, NBANDU, NROW, NROWW, I, J, JMAX, MIDDLE, NROWM1 40 JMAX = MIN0(NBANDL,NROW-I) 41 DO 10 J=1,JMAX 57 JMAX = MIN0(NBANDU,I-1) 58 DO 70 J=1,JMAX
|
/dports/math/cmlib/cmlib-3.0_8/src/bspline/ |
H A D | bnfac.f | 64 INTEGER IFLAG, NBANDL, NBANDU, NROW, NROWW, I, IPK, J, JMAX, K, 86 JMAX = MIN0(NBANDL,NROW-I) 87 DO 40 J=1,JMAX 100 JMAX = MIN0(NBANDL,NROW-I) 102 DO 70 J=1,JMAX 114 DO 80 J=1,JMAX
|
H A D | bnslv.f | 29 INTEGER NBANDL, NBANDU, NROW, NROWW, I, J, JMAX, MIDDLE, NROWM1 40 JMAX = MIN0(NBANDL,NROW-I) 41 DO 10 J=1,JMAX 57 JMAX = MIN0(NBANDU,I-1) 58 DO 70 J=1,JMAX
|