/dports/science/bagel/bagel-1.2.2/src/integral/rys/ |
H A D | svrr_optim.cc | 149 const double c00i1x = (P_[ii3] - Q_[ii3]) * xqopq; in perform_SVRR2() 150 const double c00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xqopq; in perform_SVRR2() 151 const double c00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xqopq; in perform_SVRR2() 200 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_SVRR2() 201 const double d00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xpopq; in perform_SVRR2() 202 const double d00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xpopq; in perform_SVRR2() 251 const double c00i1x = (P_[ii3] - Q_[ii3]) * xqopq; in perform_SVRR2() 252 const double c00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xqopq; in perform_SVRR2() 253 const double c00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xqopq; in perform_SVRR2() 307 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_SVRR2() [all …]
|
H A D | usvrr_optim.cc | 175 const double c00i1x = (P_[ii3] - Q_[ii3]) * xqopq; in perform_USVRR2() 176 const double c00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xqopq; in perform_USVRR2() 177 const double c00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xqopq; in perform_USVRR2() 244 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_USVRR2() 245 const double d00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xpopq; in perform_USVRR2() 246 const double d00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xpopq; in perform_USVRR2() 315 const double c00i1x = (P_[ii3] - Q_[ii3]) * xqopq; in perform_USVRR2() 316 const double c00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xqopq; in perform_USVRR2() 317 const double c00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xqopq; in perform_USVRR2() 393 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_USVRR2() [all …]
|
H A D | vrr_optim.cc | 70 const double c00i1x = (P_[ii3] - Q_[ii3]) * xqopq; in perform_VRR3() 71 const double c00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xqopq; in perform_VRR3() 72 const double c00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xqopq; in perform_VRR3() 82 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_VRR3() 83 const double d00i1y = (P_[ii3 + 1] - Q_[ii3 + 1]) * xpopq; in perform_VRR3() 84 const double d00i1z = (P_[ii3 + 2] - Q_[ii3 + 2]) * xpopq; in perform_VRR3() 275 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_VRR3() 490 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_VRR3() 710 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_VRR3() 1209 const double d00i1x = (P_[ii3] - Q_[ii3]) * xpopq; in perform_VRR3() [all …]
|
H A D | bvrr_optim.cc | 39 const int ii3 = ii*3; in perform_VRR1() local 45 const double PQ = P_[ii3+i] - Q_[ii3+i]; in perform_VRR1()
|
/dports/lang/gcc12-devel/gcc-12-20211205/libgomp/testsuite/libgomp.fortran/ |
H A D | defaultmap-8.f90 | 34 ii1 = 2; ii2 = 2; ii3 = 2 53 if (ii3 /= 2) stop 15 57 ii1 = 1; ii2 = 1; ii3 = 1 76 if (ii3 /= 2) stop 30 94 ii1 = 2; ii2 = 2; ii3 = 2 113 if (ii3 /= 2) stop 45 117 ii1 = 1; ii2 = 1; ii3 = 1 136 if (ii3 /= 2) stop 60 154 ii1 = 2; ii2 = 2; ii3 = 2 173 if (ii3 /= 2) stop 75 [all …]
|
/dports/science/xcrysden/xcrysden-1.6.2/C/ |
H A D | lcasif.c | 431 register int i1, ii1, ii2, ii3, j; 451 for (ii3=0; ii3<IN3; ii3++) { 453 yL[0] = dst[IN1-ID1][ii2][ii3]; 454 yL[1] = dst[0 ][ii2][ii3]; 455 yL[2] = dst[ID1 ][ii2][ii3]; 464 if (i1+j < N1) yR[j] = dst[ii1+j*ID1][ii2][ii3]; 465 else yR[j] = dst[ii1+j*ID1 - IN1][ii2][ii3]; 473 dst[ii1+j][ii2][ii3] = 480 if (i1+j < N1) yL[j] = dst[ii1+j*ID1][ii2][ii3]; 481 else yL[j] = dst[ii1+j*ID1 - IN1][ii2][ii3];
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/fast/ |
H A D | numbers.f | 36 integer n2, n3, n5, ii2, ii3, ii5, i2, i3, i5 45 ii3 = 0 56 ii3 = i3 64 n = (2.0d0**ii2)*(3.0d0**ii3)*(5.0d0**ii5) - 1
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/fast/ |
H A D | numbers.f | 36 integer n2, n3, n5, ii2, ii3, ii5, i2, i3, i5 45 ii3 = 0 56 ii3 = i3 64 n = (2.0d0**ii2)*(3.0d0**ii3)*(5.0d0**ii5) - 1
|
/dports/science/libgridxc/libgridxc-libgridxc-0.9.6/src/ |
H A D | cellxc.F90 | 702 ii3 = i3 + myBox(1,3) 808 ii3 = i3 + kBox(1,3) 811 if (ii3 > nMesh(3)/2) ii3 = ii3 - nMesh(3) 916 ii3 = i3 + myBox(1,3) 1054 myVxc(ii1,ii2,ii3,:) = myVxc(ii1,ii2,ii3,:) + dExdD(:) + dEcdD(:) 1060 mydVxcdD(ii1,ii2,ii3,:) = mydVxcdD(ii1,ii2,ii3,:) + dVxdD(:)+dVcdD(:) 1075 jj(3) = ii3 1111 jj(3) = ii3 1205 ii3 = i3 + myBox(1,3) 1373 jj(3) = ii3 [all …]
|
/dports/science/siesta/siesta-4.1.5/Src/SiestaXC/ |
H A D | cellxc.F90 | 756 ii3 = i3 + myBox(1,3) 862 ii3 = i3 + kBox(1,3) 865 if (ii3 > nMesh(3)/2) ii3 = ii3 - nMesh(3) 970 ii3 = i3 + myBox(1,3) 1098 myVxc(ii1,ii2,ii3,:) = myVxc(ii1,ii2,ii3,:) + dExdD(:) + dEcdD(:) 1104 mydVxcdD(ii1,ii2,ii3,:) = mydVxcdD(ii1,ii2,ii3,:) + dVxdD(:)+dVcdD(:) 1119 jj(3) = ii3 1155 jj(3) = ii3 1240 ii3 = i3 + myBox(1,3) 1403 jj(3) = ii3 [all …]
|
/dports/devel/ga/ga-5.8/ma/ |
H A D | testc.c | 150 int ii3; /* in int buffer */ local 249 if (scanf("%d %d %d", &ii1, &ii2, &ii3) != 3) 253 value = MA_init(ii1, ii2, ii3); 348 if (scanf("%d %d %d", &ii1, &ii2, &ii3) != 3) 352 oi1 = MA_sizeof(ii1, ii2, ii3);
|
/dports/science/siesta/siesta-4.1.5/Util/Contrib/APostnikov/ |
H A D | eig2bxsf.f | 12 integer ii1,ii2,ii3,io1,il1 13 parameter (ii1=11,ii2=12,ii3=13,io1=14,il1=15) 113 open (ii3,file=inpfil,form='formatted',status='old',err=801) 117 read (ii3,*) nkp 125 read (ii3,*) iik,(kkp(jj),jj=1,3) 141 close (ii3)
|
/dports/astro/kstars/kstars-3.5.6/kstars/ekos/guide/internalguide/ |
H A D | imageautoguiding.cpp | 210 unsigned long i1, i2, i3, j1, j2, j3, nn[4], ii3; in rlft3NR() local 241 for (ii3 = 1, i3 = 1; i3 <= (nn3 >> 2) + 1; i3++, ii3 += 2) in rlft3NR() 261 h1r = c1 * (data[i1][i2][ii3] + data[j1][j2][j3]); in rlft3NR() 262 h1i = c1 * (data[i1][i2][ii3 + 1] - data[j1][j2][j3 + 1]); in rlft3NR() 263 h2i = c2 * (data[i1][i2][ii3] - data[j1][j2][j3]); in rlft3NR() 264 h2r = -c2 * (data[i1][i2][ii3 + 1] + data[j1][j2][j3 + 1]); in rlft3NR() 265 data[i1][i2][ii3] = h1r + wr * h2r - wi * h2i; in rlft3NR() 266 data[i1][i2][ii3 + 1] = h1i + wr * h2i + wi * h2r; in rlft3NR()
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | qmmm_gpw_energy.F | 553 … INTEGER :: handle, i, ii1, ii2, ii3, ii4, ij1, ij2, & local 669 ii3 = MODULO(ivec(1) + 1, npts(1)) + 1 700 …abc_X(3, 1) = grid(ii3, ij1, ik1)*v1 + grid(ii3, ij1, ik2)*v2 + grid(ii3, ij1, ik3)*v3 + grid(ii3,… 701 …abc_X(3, 2) = grid(ii3, ij2, ik1)*v1 + grid(ii3, ij2, ik2)*v2 + grid(ii3, ij2, ik3)*v3 + grid(ii3,… 702 …abc_X(3, 3) = grid(ii3, ij3, ik1)*v1 + grid(ii3, ij3, ik2)*v2 + grid(ii3, ij3, ik3)*v3 + grid(ii3,… 703 …abc_X(3, 4) = grid(ii3, ij4, ik1)*v1 + grid(ii3, ij4, ik2)*v2 + grid(ii3, ij4, ik3)*v3 + grid(ii3,…
|
H A D | qmmm_gpw_forces.F | 806 INTEGER :: handle, i, ii1, ii2, ii3, ii4, ij1, ij2, ij3, ij4, ik1, ik2, ik3, ik4, Imm, & local 939 ii3 = MODULO(ivec(1) + 1, npts(1)) + 1 1037 …abc_X(3, 1) = grid2(ii3, ij1, ik1)*v1 + grid2(ii3, ij1, ik2)*v2 + grid2(ii3, ij1, ik3)*v3 + grid2(… 1038 …abc_X(3, 2) = grid2(ii3, ij2, ik1)*v1 + grid2(ii3, ij2, ik2)*v2 + grid2(ii3, ij2, ik3)*v3 + grid2(… 1039 …abc_X(3, 3) = grid2(ii3, ij3, ik1)*v1 + grid2(ii3, ij3, ik2)*v2 + grid2(ii3, ij3, ik3)*v3 + grid2(… 1040 …abc_X(3, 4) = grid2(ii3, ij4, ik1)*v1 + grid2(ii3, ij4, ik2)*v2 + grid2(ii3, ij4, ik3)*v3 + grid2(… 1109 …abc_X(3, 1) = grid2(ii3, ij1, ik1)*v1 + grid2(ii3, ij1, ik2)*v2 + grid2(ii3, ij1, ik3)*v3 + grid2(… 1110 …abc_X(3, 2) = grid2(ii3, ij2, ik1)*v1 + grid2(ii3, ij2, ik2)*v2 + grid2(ii3, ij2, ik3)*v3 + grid2(… 1111 …abc_X(3, 3) = grid2(ii3, ij3, ik1)*v1 + grid2(ii3, ij3, ik2)*v2 + grid2(ii3, ij3, ik3)*v3 + grid2(… 1112 …abc_X(3, 4) = grid2(ii3, ij4, ik1)*v1 + grid2(ii3, ij4, ik2)*v2 + grid2(ii3, ij4, ik3)*v3 + grid2(…
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | qmmm_gpw_energy.F | 553 … INTEGER :: handle, i, ii1, ii2, ii3, ii4, ij1, ij2, & local 669 ii3 = MODULO(ivec(1) + 1, npts(1)) + 1 700 …abc_X(3, 1) = grid(ii3, ij1, ik1)*v1 + grid(ii3, ij1, ik2)*v2 + grid(ii3, ij1, ik3)*v3 + grid(ii3,… 701 …abc_X(3, 2) = grid(ii3, ij2, ik1)*v1 + grid(ii3, ij2, ik2)*v2 + grid(ii3, ij2, ik3)*v3 + grid(ii3,… 702 …abc_X(3, 3) = grid(ii3, ij3, ik1)*v1 + grid(ii3, ij3, ik2)*v2 + grid(ii3, ij3, ik3)*v3 + grid(ii3,… 703 …abc_X(3, 4) = grid(ii3, ij4, ik1)*v1 + grid(ii3, ij4, ik2)*v2 + grid(ii3, ij4, ik3)*v3 + grid(ii3,…
|
H A D | qmmm_gpw_forces.F | 806 INTEGER :: handle, i, ii1, ii2, ii3, ii4, ij1, ij2, ij3, ij4, ik1, ik2, ik3, ik4, Imm, & local 939 ii3 = MODULO(ivec(1)+1,npts(1))+1 1038 …abc_X(3,1) = grid2(ii3,ij1,ik1)*v1 + grid2(ii3,ij1,ik2)*v2 + grid2(ii3,ij1,ik3)*v3 + grid2(ii3,ij1… 1039 …abc_X(3,2) = grid2(ii3,ij2,ik1)*v1 + grid2(ii3,ij2,ik2)*v2 + grid2(ii3,ij2,ik3)*v3 + grid2(ii3,ij2… 1040 …abc_X(3,3) = grid2(ii3,ij3,ik1)*v1 + grid2(ii3,ij3,ik2)*v2 + grid2(ii3,ij3,ik3)*v3 + grid2(ii3,ij3… 1041 …abc_X(3,4) = grid2(ii3,ij4,ik1)*v1 + grid2(ii3,ij4,ik2)*v2 + grid2(ii3,ij4,ik3)*v3 + grid2(ii3,ij4… 1110 …abc_X(3,1) = grid2(ii3,ij1,ik1)*v1 + grid2(ii3,ij1,ik2)*v2 + grid2(ii3,ij1,ik3)*v3 + grid2(ii3,ij1… 1111 …abc_X(3,2) = grid2(ii3,ij2,ik1)*v1 + grid2(ii3,ij2,ik2)*v2 + grid2(ii3,ij2,ik3)*v3 + grid2(ii3,ij2… 1112 …abc_X(3,3) = grid2(ii3,ij3,ik1)*v1 + grid2(ii3,ij3,ik2)*v2 + grid2(ii3,ij3,ik3)*v3 + grid2(ii3,ij3… 1113 …abc_X(3,4) = grid2(ii3,ij4,ik1)*v1 + grid2(ii3,ij4,ik2)*v2 + grid2(ii3,ij4,ik3)*v3 + grid2(ii3,ij4…
|
/dports/devel/upp/upp/bazaar/IterTest/ |
H A D | main.cpp | 38 One<ConstIter<int> > ii3 = IterCreator::GetIter((const Vector<int>&)vi); in IterTest() local 39 while(ii3->Next()) in IterTest() 40 LOG(ii3->Get()); in IterTest()
|
/dports/science/dynare/dynare-4.6.4/mex/sources/local_state_space_iterations/ |
H A D | local_state_space_iteration_2.cc | 64 auto [ii1, ii2, ii3] = set_vector_of_indices(n, m); // vector indices for ghxx in ss2Iteration_pruning() 100 y2[variable_] += .5*ghxx[variable+ii3[i]]*yhat1[i1]*yhat1[i1]; in ss2Iteration_pruning() 102 y2[variable_] += ghxx[variable+ii3[i]]*yhat1[i1]*yhat1[i2]; in ss2Iteration_pruning() 148 auto [ii1, ii2, ii3] = set_vector_of_indices(n, m); // vector indices for ghxx in ss2Iteration() 183 y[variable_] += .5*ghxx[variable+ii3[i]]*yhat[i1]*yhat[i1]; in ss2Iteration() 185 y[variable_] += ghxx[variable+ii3[i]]*yhat[i1]*yhat[i2]; in ss2Iteration()
|
/dports/java/openjdk11/jdk11u-jdk-11.0.13-8-1/test/langtools/tools/javac/lambda/lambdaExpression/ |
H A D | LambdaTest2.java | 80 IntInt ii3 = n -> { return 43; }; in main() local 90 assertTrue(ii3.iiMethod(1) == 43); in main()
|
/dports/java/openjdk12/openjdk-jdk12u-jdk-12.0.2-10-4/test/langtools/tools/javac/lambda/lambdaExpression/ |
H A D | LambdaTest2.java | 80 IntInt ii3 = n -> { return 43; }; in main() local 90 assertTrue(ii3.iiMethod(1) == 43); in main()
|
/dports/java/openjdk11-jre/jdk11u-jdk-11.0.13-8-1/test/langtools/tools/javac/lambda/lambdaExpression/ |
H A D | LambdaTest2.java | 80 IntInt ii3 = n -> { return 43; }; in main() local 90 assertTrue(ii3.iiMethod(1) == 43); in main()
|
/dports/java/openjdk15/jdk15u-jdk-15.0.6-1-1/test/langtools/tools/javac/lambda/lambdaExpression/ |
H A D | LambdaTest2.java | 80 IntInt ii3 = n -> { return 43; }; in main() local 90 assertTrue(ii3.iiMethod(1) == 43); in main()
|
/dports/java/openjdk16/jdk16u-jdk-16.0.2-7-1/test/langtools/tools/javac/lambda/lambdaExpression/ |
H A D | LambdaTest2.java | 80 IntInt ii3 = n -> { return 43; }; in main() local 90 assertTrue(ii3.iiMethod(1) == 43); in main()
|
/dports/java/openjdk14/jdk14u-jdk-14.0.2-12-1/test/langtools/tools/javac/lambda/lambdaExpression/ |
H A D | LambdaTest2.java | 80 IntInt ii3 = n -> { return 43; }; in main() local 90 assertTrue(ii3.iiMethod(1) == 43); in main()
|