/dports/science/libxc/libxc-5.0.0/src/maple2c/lda_exc/ |
H A D | lda_x_sloc.c | 258 double t770, t776, t788, t791, t815, t837, t845, t856; in func_pol() local 578 t776 = t341 * t79 * t31; in func_pol() 580 …0 * t776 + t452 * t751 + t454 * t767 + 0.11e2 * t62 * t751 + 0.3e1 * t62 * t754 + t62 * t760 + 0.1… in func_pol()
|
H A D | lda_x_rel.c | 388 double t756, t760, t762, t773, t776, t815, t820, t823; in func_pol() local 719 t776 = 0.1e1 / t267 / t65; in func_pol() 720 …t776 + 0.16e2 / 0.9e1 * t191 * t132 - 0.16e2 / 0.3e1 * t191 * t269 - 0.8e1 / 0.27e2 * t260 * t218 … in func_pol()
|
H A D | lda_xc_teter93.c | 384 double t771, t776, t778, t781, t783, t784, t790, t799; in func_pol() local 768 t776 = t1 * t738; in func_pol() 769 t778 = -0.24e2 * t366 + 0.24e2 * t776; in func_pol() 897 t1393 = 0.12e2 * t366 + 0.24e2 * t776; in func_pol() 921 t1505 = 0.24e2 * t366 + 0.24e2 * t776; in func_pol()
|
H A D | lda_x_1d_exponential.c | 270 double t741, t753, t767, t768, t769, t775, t776, t778; in func_pol() local 667 …t776 = t297 * t189 * t49 * t3 + t297 * t345 * t34 * t3 + t297 * t741 * t5 * t3 + 0.2e1 * t132 * t2… in func_pol() 683 …463784300365e0 * t324 - t358 - t386 + t2 * (-0.79577471545947667883e-1 * (t776 + t803) * t14 - 0.7… in func_pol()
|
H A D | lda_xc_bn05.c | 790 double t754, t758, t764, t766, t768, t775, t776, t777; in func_pol() local 1532 t776 = t775 * t84; in func_pol() 1547 …t776 + t778 - t782 - 0.4e1 / 0.81e2 * t785 + 0.2e1 / 0.27e2 * t788 - 0.5e1 / 0.81e2 * t48 * t792 *… in func_pol() 2205 t2371 = t48 * t300 * t776; in func_pol() 2495 t3121 = t1389 * t776; in func_pol() 2520 …3032 - t3036 + t23 * t74 * t3158 / 0.9e1 + 0.4e1 * t299 * t1320 + 0.2e1 * t776 * t484 + 0.2e1 * t7… in func_pol() 3330 t5944 = t48 * t779 * t776; in func_pol() 3353 …6020 * t6021 + 0.4e1 / 0.27e2 * t661 * t6025 * t798 - t661 * t85 * t777 * t776 / 0.3e1 + 0.2e1 / 0… in func_pol() 3481 …34 * t6063 - 0.5e1 / 0.27e2 * t661 * t3134 * t299 * t709 + t661 * t1382 * t776 * t257 / 0.9e1 - t6… in func_pol() 3538 … / 0.81e2 * t5920 + 0.6e1 * t778 * t1320 + 0.2e1 * t2284 * t484 + 0.6e1 * t776 * t1320 + 0.2e1 * t… in func_pol() [all …]
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/gga_exc/ |
H A D | gga_c_tca.c | 1454 t776 = t775 * t274; in func_pol() 1456 t779 = t776 * t277 * t777; in func_pol() 1523 t864 = t776 * t277 * t278 * t557; in func_pol() 1544 t893 = t776 * t892; in func_pol() 2021 t2282 = t776 * t317 * t2280; in func_pol() 2137 t2493 = t776 * t317 * t2488; in func_pol() 2196 t2656 = t776 * t317 * t2651; in func_pol() 2269 t2837 = t776 * t317 * t2835; in func_pol() 2304 t2899 = t776 * t277 * t945 * t133; in func_pol() 2413 t3075 = t776 * t277 * t945 * t557; in func_pol() [all …]
|
H A D | gga_x_g96.c | 416 double t776, t777, t780, t783, t784, t786, t789, t792; in func_pol() local 1067 t776 = t112 * t74; in func_pol() 1068 t777 = t776 * t60; in func_pol() 1093 t818 = t776 * t91; in func_pol() 1469 …t776 * t146 - t291 * t292 * t461 / 0.137e3 - 0.4e1 / 0.411e3 * t2118 - 0.4e1 / 0.411e3 * t2120 + 0… in func_pol() 1485 …/ 0.411e3 * t2097 + 0.2e1 / 0.1233e4 * t2125 * t292 * t505 + 0.8e1 / 0.1233e4 * t769 * t776 * t200; in func_pol() 1492 …04 + t2205 / 0.411e3 - 0.28e2 / 0.1233e4 * t291 * t2132 * t91 + 0.8e1 / 0.411e3 * t821 * t776 * t8; in func_pol() 1513 …t776 * t245 - 0.2e1 / 0.411e3 * t2179 * t292 * t591 - 0.4e1 / 0.411e3 * t2274 - t769 * t292 * t605… in func_pol()
|
H A D | gga_k_tflw.c | 345 double t771, t775, t776, t778, t779, t784, t790, t791; in func_pol() local 991 t776 = t55 * t775; in func_pol() 992 …1 * t762 - 0.20e2 / 0.9e1 * t126 * t127 * t296 + t55 * t56 * t771 / 0.2e1 + 0.16e2 / 0.27e2 * t776; in func_pol() 1064 … / 0.27e2 * t757 + t760 / 0.3e1 - 0.10e2 / 0.9e1 * t762 + 0.4e1 / 0.9e1 * t776 + t784 / 0.3e1 + 0.… in func_pol() 1101 …* t980 - 0.8e1 / 0.9e1 * t983 + 0.20e2 / 0.81e2 * t757 + 0.8e1 / 0.27e2 * t776 + 0.8e1 / 0.27e2 * … in func_pol() 1124 … + 0.110e3 / 0.27e2 * t454 * t527 * t190 - t942 - t955 + 0.4e1 / 0.27e2 * t776 + 0.4e1 / 0.27e2 * … in func_pol()
|
H A D | gga_k_mpbe.c | 386 double t678, t720, t728, t734, t769, t776; in func_ferr() local 639 t776 = sigma[0] * t276; in func_ferr() 641 …t776 * t545 / 0.55296e5 + t79 * t130 * t177 / 0.768e3 - t79 * t776 * t335 / 0.6912e4 + 0.5e1 / 0.2… in func_ferr() 715 double t762, t763, t765, t769, t775, t776, t780, t781; in func_pol() local 1212 t776 = t42 * t775; in func_pol() 1233 …/ 0.972e3 * t138 * t776 * t143 - 0.19e2 / 0.162e3 * t357 * t781 * t360 + t356 * t787 * t791 / 0.48… in func_pol()
|
H A D | gga_x_ak13.c | 747 double t762, t764, t765, t766, t771, t772, t776, t777; in func_pol() local 1300 t776 = 0.1e1 / t86 / t246; in func_pol() 1301 t777 = t50 * t776; in func_pol() 1312 t798 = t14 * t776; in func_pol() 1663 t1491 = 0.10e2 / 0.27e2 * t7 * t15 * t776 * t45; in func_pol() 1664 t1495 = 0.10e2 / 0.27e2 * t7 * t51 * t776 * t70; in func_pol() 1748 t1838 = t776 * t70; in func_pol() 1757 t1880 = t776 * t45; in func_pol()
|
H A D | gga_k_lc94.c | 501 double t713, t723, t726, t758, t776, t779, t782, t785; in func_ferr() local 820 t776 = 0.32e2 / 0.27e2 * t33 * t641 * t341 * t121; in func_ferr() 825 …t776 + t779 + t782) * t47 - 0.3e1 * t785 * t104 - 0.3e1 * t434 * t211 - t239 * t395 - t657 * t136 … in func_ferr() 937 double t770, t772, t773, t774, t775, t776, t778, t780; in func_pol() local 1494 t776 = t7 * t775; in func_pol() 1495 t778 = 0.3e1 * t336 - 0.3e1 * t776; in func_pol() 1644 t1087 = -t336 - 0.3e1 * t776; in func_pol() 1658 t1124 = -0.3e1 * t336 - 0.3e1 * t776; in func_pol()
|
H A D | gga_c_cs1.c | 62 double t699, t741, t745, t772, t776; in func_unpol() local 370 t776 = t6 / t299; in func_unpol() 372 …0e-13 * t776 * t543) / 0.4e1 + t28 * t31 * (0.57943019520e-7 * t227 * t176 * t27 - 0.1854176624640… in func_unpol() 663 double t770, t771, t772, t773, t774, t775, t776, t777; in func_pol() local 1346 t776 = t775 * t60; in func_pol() 1347 t777 = 0.5e1 / 0.27e2 * t776; in func_pol() 1893 … * t761 + 0.2e1 * t765 + t1708 - 0.4e1 / 0.3e1 * t773 + 0.20e2 / 0.27e2 * t776 - 0.4e1 / 0.9e1 * t… in func_pol()
|
H A D | gga_x_cap.c | 844 double t766, t768, t770, t775, t776, t781, t782, t786; in func_pol() local 1407 t776 = t768 * t113 * t775; in func_pol() 1416 …e2 * t766 * t776 + 0.2e1 / 0.81e2 * t766 * t782 - 0.2e1 / 0.81e2 * t786 * t793 - 0.2e1 / 0.81e2 * … in func_pol() 1685 …t1388 * t1392 / 0.288e3 - t1396 * t793 / 0.288e3 - t1396 * t782 / 0.288e3 - t1396 * t776 / 0.864e3; in func_pol() 1874 …t1823 = 0.721e3 / 0.81e2 * t110 * t1790 * t115 - 0.116e3 / 0.243e3 * t1794 * t776 - 0.116e3 / 0.24… in func_pol() 1877 …7 * t793 + 0.116e3 / 0.243e3 * t1747 * t782 + 0.116e3 / 0.729e3 * t1747 * t776 - 0.16e2 / 0.243e3 … in func_pol() 2124 …72 * t793 + 0.35e2 / 0.864e3 * t3172 * t782 + 0.35e2 / 0.2592e4 * t3172 * t776 + 0.11e2 / 0.1296e4… in func_pol()
|
H A D | gga_k_ol2.c | 521 double t760, t761, t763, t765, t770, t776, t777, t781; in func_pol() local 1058 t776 = t316 * t127; in func_pol() 1059 t777 = 0.1e1 / t776; in func_pol() 1140 t928 = params->cc / t49 / t776; in func_pol() 1620 …0.16e2 * t416 * t974 + 0.256e3 * t979 * t1016 - 0.1024e4 * params->cc / t50 / t776 * t1865 * t167); in func_pol()
|
H A D | gga_x_b86.c | 627 double t772, t774, t776, t778, t780, t782, t784, t786; in func_pol() local 1210 t776 = t321 * t97; in func_pol() 1211 t778 = t698 * t286 * t776; in func_pol() 1582 t1661 = t698 * t703 * t776; in func_pol() 1611 …77 * t8 * t330 / 0.2e1 - t262 * t263 * t835 * t63 / 0.6e1 + t698 * t784 * t776 / 0.3e1 + t285 * t1… in func_pol() 1721 … + t2302 - t2380 / 0.3e1 - t2383 - 0.2e1 / 0.9e1 * t2425 + t972 * t2367 * t776 / 0.9e1 + t2354 * t… in func_pol()
|
H A D | gga_x_kt.c | 411 double t775, t776, t779, t780, t782, t785, t786, t789; in func_pol() local 977 t776 = t775 * t329; in func_pol() 992 …v3rho2sigma[0] = 0.32e2 / 0.9e1 * t776 + t779 - 0.32e2 / 0.9e1 * t780 - 0.32e2 / 0.9e1 * t782 + 0.… in func_pol() 1013 …v3rho2sigma[3] = 0.16e2 / 0.9e1 * t776 + t779 - 0.16e2 / 0.9e1 * t780 - 0.16e2 / 0.9e1 * t782 + 0.… in func_pol()
|
H A D | gga_x_am05.c | 1636 double t776, t779, t780, t784, t785, t786, t788, t791; in func_pol() local 2277 t776 = t220 * t314 * t774; in func_pol() 2291 …8e2 * t764 * t318 + 0.11e2 / 0.8e1 * t321 * t770 + 0.2e1 / 0.9e1 * t764 * t776 + 0.2e1 * t321 * t7… in func_pol() 2376 …0 / 0.12e2 - t1000 * t318 / 0.6e1 - 0.3e1 / 0.8e1 * t426 * t329 - t1000 * t776 / 0.12e2 - 0.3e1 / … in func_pol() 2429 …t1154 = -t1138 * t140 / 0.32e2 + t1138 * t776 / 0.32e2 + 0.9e1 / 0.32e2 * t1143 * t1144 - 0.3e1 / … in func_pol() 2753 …* t1753 * t140 - 0.23e2 / 0.9e1 * t1753 * t318 - 0.14e2 / 0.9e1 * t1753 * t776 + 0.7e1 / 0.3e1 * t… in func_pol() 3062 … 0.24e2 + t2635 * t318 / 0.24e2 + 0.3e1 / 0.32e2 * t1143 * t329 - t2635 * t776 / 0.24e2 - t2635 * … in func_pol() 3412 …6 * t1781 + 0.1037e4 / 0.81e2 * t4196 * t318 + 0.274e3 / 0.27e2 * t4196 * t776 - 0.137e3 / 0.9e1 *… in func_pol() 3582 …5316 * t1796 - 0.25e2 / 0.4e1 * t5316 * t1760 - 0.37e2 / 0.18e2 * t5316 * t776 + 0.19e2 / 0.6e1 * … in func_pol() 3680 …261e3 / 0.32e2 * t5924 * t4224 + 0.15e2 / 0.4e1 * t5924 * t4256 + t5924 * t776 / 0.24e2 - t5924 * … in func_pol() [all …]
|
H A D | gga_k_apbe.c | 456 double t770, t771, t772, t773, t774, t775, t776, t779; in func_pol() local 1103 t776 = 0.1e1 / t775; in func_pol() 1104 t779 = t773 * t776 * t2 * t469; in func_pol() 1499 t1866 = t772 * t776; in func_pol() 1629 … t2395 - 0.2e1 / 0.3e1 * t2352 - t2236 - 0.19e2 / 0.180e3 * t934 * t462 * t776 * t938 + 0.341e3 / … in func_pol()
|
H A D | gga_x_2d_pbe.c | 404 double t776, t777, t780, t783, t787, t788, t789, t792; in func_pol() local 1069 t776 = t282 * t80; in func_pol() 1070 t777 = t776 * sigma[2]; in func_pol() 1449 …- 0.50611679643957322115e-2 * t2042 - 0.14279550879839503628e-3 * t2069 * t776 * sigma[2] * t66 + … in func_pol()
|
H A D | gga_k_pw86.c | 525 double t774, t776, t778, t780, t782, t784, t785, t787; in func_pol() local 1074 t776 = t333 * t128; in func_pol() 1075 t778 = t572 * t127 * t776; in func_pol() 1448 t1684 = t572 * t268 * t776; in func_pol() 1607 ….225e3 * t1001 * t1002 * t709 - 0.14e2 / 0.135e3 * t2670 - t2576 * t990 * t776 / 0.135e3 - 0.2e1 /… in func_pol()
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/mgga_exc/ |
H A D | mgga_x_msb.c | 3756 t776 = t7 * t15; in func_pol() 3757 t778 = t776 * t325 * t141; in func_pol() 3804 t864 = t776 * t325 * t228; in func_pol() 3863 t951 = t776 * t372 * t141; in func_pol() 3889 t1029 = t776 * t372 * t228; in func_pol() 4451 t2109 = t776 * t853 * t141; in func_pol() 4452 t2112 = t776 * t325 * t420; in func_pol() 4556 t2350 = t776 * t853 * t228; in func_pol() 4559 t2356 = t776 * t325 * t9; in func_pol() 4576 t2382 = t776 * t325 * t632; in func_pol() [all …]
|
H A D | mgga_x_regtpss.c | 4365 double t775, t776, t777, t779, t780, t781, t782, t784; in func_ferr() local 5145 t776 = t774 * t775; in func_ferr() 5146 t777 = t773 * t776; in func_ferr() 5741 t2294 = t2293 * t776; in func_ferr() 6045 t3110 = t3109 * t776; in func_ferr() 8402 double t767, t768, t770, t776, t779, t786, t787, t788; in func_pol() local 9733 t776 = t118 * t120; in func_pol() 9734 …e1 / 0.3e1 * t359 * t770 * t70 - 0.67148919753086419755e0 * t367 * t753 - 0.646416e0 * t776 * t768; in func_pol() 12498 …5e1 / 0.12e2 * t7029 * t6256 + 0.1292832e1 * t776 * t7033 + 0.1292832e1 * t776 * t7037 + 0.1292832… in func_pol() 13713 …* t9619 + 0.1292832e1 * t776 * t9622 - 0.67148919753086419755e0 * t1048 * t9619 - 0.3878496e1 * t7… in func_pol() [all …]
|
H A D | mgga_c_bc95.c | 3414 t776 = t16 * t775; in func_pol() 3419 t781 = t776 * t780; in func_pol() 3695 t1200 = t776 * t1199; in func_pol() 3907 t1582 = t776 * t1581; in func_pol() 4553 t2367 = t776 * t2366; in func_pol() 4555 t2370 = t776 * t2336; in func_pol() 5159 t3357 = t776 * t3356; in func_pol() 5163 t3362 = t776 * t3361; in func_pol() 5166 t3366 = t776 * t3365; in func_pol() 5615 t4230 = t776 * t4229; in func_pol() [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/xc/ |
H A D | xc_pbe.F | 465 t702, t71, t714, t717, t72, t720, t73, t74, t740, t743, t748, t75, t758, t77, t776, t78, & local 919 t776 = A_1**2 928 + t11/t293/t123*t261/t296/t26/t776*t654/0.2e1_dp 1560 t77, t775, t776, t779, t78, t785, t789, t79, t795, t798, t8, t80, t801, t812, t82, t820, & local 2073 t776 = t2*phirhoa 2081 trhoarhoa = t775*t776*phi1rhoa + t779*t776*k_s1rhoa/ & 2212 trhoarhob = t775*t776*phirhob + t779*t776*k_srhob/ & 2373 trhoanorm_drho = -t1739*t776/0.2e1_dp - t1741*t789/ &
|
/dports/science/cp2k-data/cp2k-7.1.0/src/xc/ |
H A D | xc_pbe.F | 465 t702, t71, t714, t717, t72, t720, t73, t74, t740, t743, t748, t75, t758, t77, t776, t78, & local 919 t776 = A_1**2 928 + t11/t293/t123*t261/t296/t26/t776*t654/0.2e1_dp 1560 t77, t775, t776, t779, t78, t785, t789, t79, t795, t798, t8, t80, t801, t812, t82, t820, & local 2073 t776 = t2*phirhoa 2081 trhoarhoa = t775*t776*phi1rhoa + t779*t776*k_s1rhoa/ & 2212 trhoarhob = t775*t776*phirhob + t779*t776*k_srhob/ & 2373 trhoanorm_drho = -t1739*t776/0.2e1_dp - t1741*t789/ &
|