/dports/science/PETSc/petsc-3.14.1/src/snes/tutorials/ |
H A D | ex75.c | 77 PetscScalar t135,t136,t138,t140,t141,t142,t143,t152,t160,t162; in SolKxSolution() local 227 t152 = t2 * t10 * BB; in SolKxSolution() 229 … t2 * t142 * BB) * t115 + (-0.2e1 * t2 * t136 * AA - t152) * t121 + (-0.2e1 * t2 * t142 * AA + t15… in SolKxSolution()
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwxc/maxima/f77/ |
H A D | nwxcm_c_pw91lda.F | 1362 t152 = 1/t1**2.0d+0 1370 5 *t152*t153*t7-1.1708185015918181d-2*t151)-1.3127055298329 1372 7 5616998143394d-1*t154*t39*t8-5.469606374303773d-2*t152*t1 1374 9 71406d-1*t41*t42*t6*t89+1.763392293402975d-2*t10*t152*t88 1397 3 74303773d-2*t152*t153*t19-6.407931356509611d-3*t151)-1.31 1400 6 394d-1*t154*t20*t39-5.469606374303773d-2*t152*t153*t20)+4 1402 8 t152*t22*t88+7.053569173611901d-2*t22*t39*t87-6.348212256 1418 7 t39-5.469606374303773d-2*t152*t153*t28-7.424439106586571d 1423 < 293402975d-2*t152*t31*t88+7.053569173611901d-2*t31*t39*t8
|
H A D | nwxcm_c_vs98.F | 4165 t152 = t151+t149+t147 7909 t152 = -3.04966d-3*t48*t72*t74 7919 t160 = t154+t153+t152 11090 6 5d-2*t152*t317*t69*t94-2.0329863913187946d-2*t152*t156* 13227 t153 = t152+t150+t148 15503 t152 = t151+t149+t147 16463 < +0*t128*t152*t233*t238*t62+4.824593849607761d+1*t152*t2 16479 < 9585130625d-2*t124*t152*t78+6.0d+0*t126*t127*t128*t152* 16626 3 09305675375d-2*t124*t152*t78+4.0d+0*t126*t127*t128*t152 18509 6 t152*t77*t97+1.524739793489096d-2*t139*t152*t72*t97+4.6 [all …]
|
H A D | nwxcm_c_b97.F | 521 t152 = 1/rhob**3.6666666666666664d+0 565 5 33d-1*gammabb*t152*t42*t8+1.0666666666666667d-1*t151*t37* 568 8 bb*t152*t75*t76+2.4000000000000002d-5*gammabb*t152*t71*t7 569 9 4*t75-4.8000000000000004d-5*gammabb*t152*t70*t71*t74+1.44 570 : 00000000000002d-7*gammabb*t149*t152*t70*t72)+1.0d+0*t43*t 1376 t152 = -1.3127055298329054d-1*t142*t143*t96-1.73447766040861 2521 t152 = 1/rhoa**1.1666666666666665d+1 2527 t155 = -5.184000000000001d-9*t145*t152*t36*t43 2654 t201 = 2.5920000000000004d-9*t145*t152*t2*t39 2734 1 000000006d-2*t152*t2*t7*t90-2.0480000000000004d-1*t1*t152 [all …]
|
H A D | nwxcm_x_m06.F | 1503 t152 = 1/rhob**7.333333333333333d+0 1603 7 77777777778d+1*t152*t49*t94*t96-t156*t57*t91*t96+9.777777 1615 3 948928286386303d-4*t115*t152*t94+3.531915643569816d-2*gam 3590 t152 = 1.6597866666666666d-2*t105*taua+1.8257653333333332d-2 3597 4 33333333333333d+1*gammaaa*t107*t108*t51*t53*taua-t152*t45 3598 5 *t52*t57+2*t108*t150*t45*t57-gammaaa*t1*t152*t52*t56+5.33 3601 8 t108*t152*t54*t55+6*t150*t151*t54*t55+2.2222222222222224d 3603 : *t52*t53-2*gammaaa*t1*t108*t152*t45*t53+6*gammaaa*t1*t150 3610 t156 = -1.0d+0*t152*t5*t58-1.3333333333333333d+0*t102*t107*t 3992 7 51*t152*t49*t50*t51+32*t104*t108*t152*t49*t50-96*t104*t15 [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwxc/maxima/f77/ |
H A D | nwxcm_c_pw91lda.F | 1362 t152 = 1/t1**2.0d+0 1370 5 *t152*t153*t7-1.1708185015918181d-2*t151)-1.3127055298329 1372 7 5616998143394d-1*t154*t39*t8-5.469606374303773d-2*t152*t1 1374 9 71406d-1*t41*t42*t6*t89+1.763392293402975d-2*t10*t152*t88 1397 3 74303773d-2*t152*t153*t19-6.407931356509611d-3*t151)-1.31 1400 6 394d-1*t154*t20*t39-5.469606374303773d-2*t152*t153*t20)+4 1402 8 t152*t22*t88+7.053569173611901d-2*t22*t39*t87-6.348212256 1418 7 t39-5.469606374303773d-2*t152*t153*t28-7.424439106586571d 1423 < 293402975d-2*t152*t31*t88+7.053569173611901d-2*t31*t39*t8
|
H A D | nwxcm_c_vs98.F | 4165 t152 = t151+t149+t147 7909 t152 = -3.04966d-3*t48*t72*t74 7919 t160 = t154+t153+t152 11090 6 5d-2*t152*t317*t69*t94-2.0329863913187946d-2*t152*t156* 13227 t153 = t152+t150+t148 15503 t152 = t151+t149+t147 16463 < +0*t128*t152*t233*t238*t62+4.824593849607761d+1*t152*t2 16479 < 9585130625d-2*t124*t152*t78+6.0d+0*t126*t127*t128*t152* 16626 3 09305675375d-2*t124*t152*t78+4.0d+0*t126*t127*t128*t152 18509 6 t152*t77*t97+1.524739793489096d-2*t139*t152*t72*t97+4.6 [all …]
|
H A D | nwxcm_c_b97.F | 521 t152 = 1/rhob**3.6666666666666664d+0 565 5 33d-1*gammabb*t152*t42*t8+1.0666666666666667d-1*t151*t37* 568 8 bb*t152*t75*t76+2.4000000000000002d-5*gammabb*t152*t71*t7 569 9 4*t75-4.8000000000000004d-5*gammabb*t152*t70*t71*t74+1.44 570 : 00000000000002d-7*gammabb*t149*t152*t70*t72)+1.0d+0*t43*t 1376 t152 = -1.3127055298329054d-1*t142*t143*t96-1.73447766040861 2521 t152 = 1/rhoa**1.1666666666666665d+1 2527 t155 = -5.184000000000001d-9*t145*t152*t36*t43 2654 t201 = 2.5920000000000004d-9*t145*t152*t2*t39 2734 1 000000006d-2*t152*t2*t7*t90-2.0480000000000004d-1*t1*t152 [all …]
|
H A D | nwxcm_x_m06.F | 1503 t152 = 1/rhob**7.333333333333333d+0 1603 7 77777777778d+1*t152*t49*t94*t96-t156*t57*t91*t96+9.777777 1615 3 948928286386303d-4*t115*t152*t94+3.531915643569816d-2*gam 3590 t152 = 1.6597866666666666d-2*t105*taua+1.8257653333333332d-2 3597 4 33333333333333d+1*gammaaa*t107*t108*t51*t53*taua-t152*t45 3598 5 *t52*t57+2*t108*t150*t45*t57-gammaaa*t1*t152*t52*t56+5.33 3601 8 t108*t152*t54*t55+6*t150*t151*t54*t55+2.2222222222222224d 3603 : *t52*t53-2*gammaaa*t1*t108*t152*t45*t53+6*gammaaa*t1*t150 3610 t156 = -1.0d+0*t152*t5*t58-1.3333333333333333d+0*t102*t107*t 3992 7 51*t152*t49*t50*t51+32*t104*t108*t152*t49*t50-96*t104*t15 [all …]
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/gga_exc/ |
H A D | gga_x_pbeint.c | 366 double t149, t152, t157, t162, t165, t166, t170, t171; in func_ferr() local 489 t152 = 0.1e1 / t72 / t26; in func_ferr() 490 … * t17 * t129 * t27 - t63 * t67 * t136 * t73 / 0.24e2 + t145 * t146 * t149 * t152 / 0.162e3) * t11; in func_ferr() 509 …t197 = (-t12 * t181 * t27 / 0.9e1 + t63 * t185 * t186 / 0.72e2 - t145 * t66 * t191 * t152 / 0.432e… in func_ferr() 518 t226 = (-t63 * t65 * t97 * t73 / 0.288e3 + t145 * sigma[0] * t220 * t152 / 0.1152e4) * t11; in func_ferr() 566 t341 = t149 * t152; in func_ferr() 593 t440 = (t142 * t144 * t220 * t152 / 0.384e3 - t282 * t431 * t436 / 0.9216e4) * t11; in func_ferr() 671 double t150, t152, t153, t156, t157, t161, t162, t164; in func_pol() local 908 t152 = t7 * t148 * t150; in func_pol() 909 t153 = t152 / 0.2e1; in func_pol() [all …]
|
H A D | gga_x_g96.c | 365 double t152, t153, t155, t156, t157, t158, t159, t160; in func_pol() local 617 t152 = 0.1e1 / t65 / t9; in func_pol() 618 t153 = t15 * t152; in func_pol() 650 t191 = t37 * t152; in func_pol() 860 t434 = t14 * t152; in func_pol() 871 t450 = t36 * t152; in func_pol() 1285 t1102 = t127 * t152; in func_pol() 1296 t1128 = t175 * t152; in func_pol() 1325 t1257 = t198 * t152 * t31 * t200; in func_pol() 1329 t1273 = t220 * t152 * t49 * t222; in func_pol()
|
H A D | gga_x_dk87.c | 37 double t142, t146, t148, t149, t150, t151, t152, t153; in func_unpol() local 169 t152 = t97 * t151; in func_unpol() 170 t153 = t150 * t152; in func_unpol() 204 …e5 * t66 * t96 * t227 - 0.7e1 / 0.5832e4 * t66 * t8 * t105 * params->a1 * t152 + 0.7e1 / 0.1458e4 … in func_unpol() 266 …- 0.7e1 / 0.8748e4 * t66 * t182 * t227 + 0.49e2 / 0.4374e4 * t66 * t393 * t152 + 0.28e2 / 0.2187e4… in func_unpol() 369 double t149, t152, t154, t155, t159, t163, t170, t174; in func_ferr() local 495 t152 = 0.1e1 / t74 / t35; in func_ferr() 497 t155 = t31 * t152 * t154; in func_ferr() 546 t288 = t152 * t154; in func_ferr() 569 t352 = params->alpha * t152; in func_ferr() [all …]
|
H A D | gga_x_bpccac.c | 209 t152 = 0.1e1 / t12; in func_unpol() 210 t153 = t87 * t152; in func_unpol() 215 t163 = t108 * t152; in func_unpol() 221 t180 = t64 * t152; in func_unpol() 301 t347 = t255 * t152; in func_unpol() 333 t427 = t355 * t152; in func_unpol() 438 t675 = t519 * t152; in func_unpol() 477 t821 = t204 * t152; in func_unpol() 478 t830 = t152 * t332; in func_unpol() 488 t864 = t667 * t152; in func_unpol() [all …]
|
H A D | gga_x_ft97.c | 651 t152 = t60 * t60; in func_ferr() 652 t153 = t152 * t15; in func_ferr() 658 t161 = t152 * t60; in func_ferr() 680 t216 = t152 * rho[0]; in func_ferr() 683 t221 = t152 * t45; in func_ferr() 705 t276 = 0.1e1 / t152; in func_ferr() 731 t336 = 0.1e1 / t7 / t152; in func_ferr() 735 t344 = t152 * t66; in func_ferr() 739 t351 = t152 * t152; in func_ferr() 810 t553 = t152 * t61; in func_ferr() [all …]
|
H A D | gga_c_am05.c | 37 double t143, t144, t145, t146, t151, t152, t153, t157; in func_unpol() local 179 t152 = t19 * t5; in func_unpol() 180 t153 = t152 * t44; in func_unpol() 255 t310 = t152 * t98; in func_unpol() 352 t603 = t152 * t209; in func_unpol() 1048 t152 = 0.1e1 / t30; in func_pol() 1049 t153 = t151 * t152; in func_pol() 1163 t338 = t337 * t152; in func_pol() 1198 t395 = t344 * t152; in func_pol() 1407 t785 = t784 * t152; in func_pol() [all …]
|
H A D | gga_x_lg93.c | 442 double t125, t126, t127, t145, t147, t151, t152, t153; in func_ferr() local 570 t152 = t151 * t121; in func_ferr() 573 vsigma[0] = -0.93652500000000000000e-2 * t78 * t147 + 0.15625000000000000000e-9 * t152 * t153; in func_ferr() 844 double t147, t148, t150, t151, t152, t153, t154, t156; in func_pol() local 1225 t152 = t16 * t16; in func_pol() 1226 t153 = 0.1e1 / t152; in func_pol() 1373 t375 = 0.1e1 / t152 / t9; in func_pol() 1452 t491 = 0.1e1 / t152 / t143; in func_pol() 1897 t1147 = 0.1e1 / t152 / t366; in func_pol() 2930 t3050 = 0.1e1 / t152 / t895; in func_pol() [all …]
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/mgga_vxc/ |
H A D | mgga_x_tb09.c | 2383 v2rhosigma[0] = t152 * t4; in func_ferr() 2556 v3rho2sigma[0] = t465 * t4 + t152 * t122 / 0.3e1; in func_ferr() 4602 t152 = t39 * t40; in func_pol() 5421 t1637 = t152 * t154 * t1634 / 0.12e2; in func_pol() 5485 t1715 = t152 * t222 * t1712 / 0.12e2; in func_pol() 6394 t4217 = t152 * t749 * t1634 * t159 / 0.24e2; in func_pol() 6482 t4362 = t152 * t842 * t1712 * t227 / 0.24e2; in func_pol() 8230 t11692 = t152 * t749 * t1634 * t303; in func_pol() 8232 t11697 = t152 * t749 * t357 * t1634; in func_pol() 8308 t11842 = t152 * t842 * t1712 * t331; in func_pol() [all …]
|
/dports/science/tinker/tinker/other/ |
H A D | drotpole.f | 183 real*8 t148,t150,t152,t153 local 314 t152 = t91 * t76 426 d(3,1,1,1) = t152 - 0.5d0*t153*t93 447 d(1,2,1,1) = t152*t97 - 0.5d0*(t153*t285 + t287*t21) 454 & - t152*t40 + 0.5d0*(t153*t317 + t287*t15)
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/mgga_exc/ |
H A D | hyb_mgga_x_dldf.c | 176 t152 = 0.1e1 / t70 / t27 * t31; in func_unpol() 180 t158 = t152 * t156 * t58; in func_unpol() 203 t215 = t152 * t213 * sigma[0]; in func_unpol() 224 t264 = t152 * t213; in func_unpol() 266 t322 = t152 * t156 * t100; in func_unpol() 293 t400 = t152 * t398 * sigma[0]; in func_unpol() 302 t416 = t152 * t156 * t124; in func_unpol() 318 t472 = t152 * t398; in func_unpol() 326 t479 = t152 * t477 * sigma[0]; in func_unpol() 355 t527 = t152 * t477; in func_unpol() [all …]
|
H A D | mgga_x_ms.c | 370 t331 = t92 * t152; in func_unpol() 400 t396 = t152 * t37; in func_unpol() 407 t407 = t152 * t147; in func_unpol() 433 t450 = t152 * t167; in func_unpol() 549 t696 = t202 * t152; in func_unpol() 585 t765 = t152 * t237; in func_unpol() 599 t794 = t152 * t256; in func_unpol() 646 t940 = t152 * t99; in func_unpol() 669 t979 = t152 * t328; in func_unpol() 676 t994 = t152 * t38; in func_unpol() [all …]
|
H A D | mgga_xc_zlp.c | 37 double t152, t156, t161, t165, t167, t170; in func_unpol() local 167 t152 = 0.1e1 / t11 / t42; in func_unpol() 173 t165 = t152 * t31; in func_unpol() 383 double t152, t156, t161, t165, t167, t170; in func_ferr() local 513 t152 = 0.1e1 / t11 / t42; in func_ferr() 519 t165 = t152 * t31; in func_ferr() 730 double t149, t152, t153, t158, t159, t160, t163, t164; in func_pol() local 921 t152 = 0.1e1 / t20 / t72 / rho[0]; in func_pol() 922 t153 = lapl[0] * t152; in func_pol() 1271 t574 = t66 * t152; in func_pol() [all …]
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/lda_exc/ |
H A D | lda_x_rel.c | 361 double t140, t143, t146, t152, t154, t158, t160, t163; in func_pol() local 509 t152 = t79 * t113 * t99; in func_pol() 522 …0 + t125 - 0.3e1 / 0.32e2 * t63 * t64 * t146 * t55 + 0.56250000000000000000e0 * t152 + t158 + t185; in func_pol() 537 …2e2 * t63 * t205 + 0.28125000000000000000e0 * t210 + 0.28125000000000000000e0 * t152 + t158 + t185; in func_pol()
|
H A D | lda_c_vwn_4.c | 37 double t142, t143, t144, t146, t149, t152, t156, t158; in func_unpol() local 171 t152 = t149 * t114 * t117 * t69; in func_unpol() 298 …1 * t139 + 0.39765745675026770179e-1 * t146 + 0.79531491350053540358e-1 * t152 - 0.159062982700107… in func_unpol() 384 double t142, t143, t144, t146, t149, t152, t156, t158; in func_ferr() local 518 t152 = t149 * t114 * t117 * t69; in func_ferr() 731 double t141, t144, t145, t146, t147, t150, t152, t153; in func_pol() local 1006 t152 = -t147 * t114 / 0.6e1 - t150 * t122; in func_pol() 1008 t154 = t152 * t153; in func_pol() 1232 t540 = t152 * t539; in func_pol() 1608 t1328 = t152 * t1327; in func_pol() [all …]
|
H A D | lda_c_vwn.c | 37 double t142, t143, t144, t146, t149, t152, t156, t158; in func_unpol() local 171 t152 = t149 * t114 * t117 * t69; in func_unpol() 298 …1 * t139 + 0.39765745675026770179e-1 * t146 + 0.79531491350053540358e-1 * t152 - 0.159062982700107… in func_unpol() 384 double t142, t143, t144, t146, t149, t152, t156, t158; in func_ferr() local 518 t152 = t149 * t114 * t117 * t69; in func_ferr() 731 double t141, t144, t145, t146, t147, t150, t152, t153; in func_pol() local 1006 t152 = -t147 * t114 / 0.6e1 - t150 * t122; in func_pol() 1008 t154 = t152 * t153; in func_pol() 1232 t540 = t152 * t539; in func_pol() 1612 t1335 = t152 * t1334; in func_pol() [all …]
|
/dports/science/multiwfn/gMultiwfn-3.4.1-0-14-ge873677/src/ |
H A D | DFTxclib.F | 2750 t152 = t25**2 2751 t153 = 1/t152 2887 #*t152 2895 #*t152 3005 #*t152 3013 #*t152 3133 t152 = t25**2 3134 t153 = 1/t152 3905 t152 = t5*t4 4278 t152 = t5*t4 [all …]
|