| /dports/science/nwchem-data/nwchem-7.0.2-release/src/nwxc/maxima/f77/ |
| H A D | nwxcm_c_tpss03.F | 13314 t930 = -1.252637628753944d+4*gammaaa*t206*t207*t397*t398*t
13648 3 0+t939+t938+t937+t936+t935+t934+t933+t932+t931+t930+t92
13664 3 9+t938+t937+t936+t935+t934+t933+t932+t931+t930+t929)+7.
19961 t930 = 2.7242157771351844d-1*t141*t143*t321*t475*t476*t477
19973 2 385d-1*t150*t152*t475*t477*t485*t933+t932+t931+t930+t92
20027 8 931+t930+t929+t928+t927+t926+t925+t924+t923+t921+t920+t
24187 t930 = -2.2247762179937342d+0*t143*t145*t262*t263*t335*t46
24240 5 32+t931+t930+t929+t928+t927+t926+t925+t924+t923+t922+t9
24290 7 34+t933+t932+t931+t930+t929+t928+t927+t926+t925+t924+t9
28163 t930 = -8.172647331405554d-1*t140*t144*t149*t262*t326*t43*
[all …]
|
| H A D | nwxcm_x_wpbe.F | 9134 t930 = 3.75d-1*t750*t923
9144 t940 = t939+t938+t937+t932+t931+t930
11007 5 d-1*t184*t50*(t935+t934+t933+t932+t931+t930)+4.572375d-1*
|
| /dports/science/libxc/libxc-5.0.0/src/maple2c/lda_exc/ |
| H A D | lda_xc_ksdt.c | 82 double t922, t925, t927, t928, t929, t930, t933, t937; in func_unpol() local
592 t930 = t929 * t492; in func_unpol()
601 …0.3e1 / 0.4e1 * t489 * t490 * t250 * t492 - t918 * t922 / 0.54e2 + t927 * t930 / 0.108e3 + t284 * … in func_unpol()
984 …08 + 0.9e1 / 0.2e1 * t489 * t981 * t250 * t492 - 0.4e1 / 0.81e2 * t2058 * t930 - 0.2e1 / 0.9e1 * t… in func_unpol()
2219 double t923, t924, t927, t928, t930, t931, t932, t935; in func_pol() local
4473 t930 = t928 * t517 / 0.12e2; in func_pol()
4483 …t947 = -0.3e1 / 0.4e1 * t898 + t909 * t376 / 0.2e1 - t363 * t924 / 0.2e1 - t930 + t932 * t124 / 0.… in func_pol()
4627 …t1251 = -0.3e1 / 0.4e1 * t1162 * t897 + t1228 * t376 / 0.2e1 - t363 * t1236 / 0.2e1 - t930 + t1240… in func_pol()
|
| /dports/science/libxc/libxc-5.0.0/src/maple2c/mgga_exc/ |
| H A D | mgga_x_edmgga.c | 71 double t919, t921, t925, t928, t930, t934, t935, t947; in func_unpol() local
592 t930 = t821 * t352; in func_unpol()
593 …1 * t925 - 0.64858199692921511265e-3 * t928 - 0.38241975308641975308e-1 * t930 + 0.127473251028806… in func_unpol()
613 …-1 * t925 + 0.25943279877168604506e-2 * t928 + 0.15296790123456790123e0 * t930 - 0.509893004115226… in func_unpol()
|
| H A D | hyb_mgga_xc_wb97mv.c | 84 double t930, t933, t934, t935, t938, t939, t940, t943; in func_unpol() local
784 t930 = t422 * t929; in func_unpol()
791 …16 * t912 - 0.105744e0 * t407 * t925 - 0.67676160000000000000e-2 * t928 * t930 + 0.105744e0 * t412… in func_unpol()
799 …t990 = 0.329112e0 * t437 * t925 + 0.21063168000000000000e-1 * t946 * t930 - 0.329112e0 * t440 * t9… in func_unpol()
2756 double t930, t931, t932, t934, t936, t937, t938, t940; in func_ferr() local
3281 t930 = 0.1e1 / t506 / t105; in func_ferr()
3282 t931 = t95 * t930; in func_ferr()
3575 …41096000000000000000e0 * t231 * t910 * t940 + 0.13218100589565368422e2 * t231 * t930 * t784 * t945; in func_ferr()
|
| H A D | mgga_x_mbrxh_bg.c | 86 double t929, t930, t931, t932, t933, t936, t939, t942; in func_unpol() local
1155 t930 = t924 * t929; in func_unpol()
1174 …3e1 * t930 * t933 + 0.6e1 * t930 * t936 + 0.3e1 * t266 * t939 + 0.3e1 * t942 * t404 + t256 * t289 … in func_unpol()
2670 … * t266 * t5208 - 0.36e2 * t5161 * t293 + 0.8e1 * t5197 * t394 - 0.36e2 * t930 * t5211 - t95 * t52… in func_unpol()
2676 …t5250 = -0.8e1 * t266 * t5222 + 0.4e1 * t930 * t5225 - 0.4e1 / 0.3e1 * t5197 * t390 - 0.18e2 * t91… in func_unpol()
2685 … / 0.3e1 * t266 * t5264 - 0.2e1 / 0.3e1 * t5268 * t5269 + 0.2e1 / 0.3e1 * t930 * t5272 - 0.8e1 * t… in func_unpol()
2715 …t930 * t5356 + t5166 * t94 * t97 - 0.8e1 / 0.3e1 * t266 * t5361 - t5314 * t5365 / 0.9e1 + t95 * t5… in func_unpol()
2720 …* t289 + 0.8e1 / 0.3e1 * t5197 * t398 + 0.20e2 * t5268 * t5393 - 0.20e2 * t930 * t5396 - 0.24e2 * … in func_unpol()
|
| H A D | mgga_x_vt84.c | 3342 double t929, t930, t932, t939, t942, t945, t952, t953; in func_ferr() local
4084 t930 = t159 * t929; in func_ferr()
4085 t932 = t923 / 0.32e2 + 0.27e2 / 0.80e2 * t432 * t925 - 0.86805555555555555554e-3 * t930; in func_ferr()
4719 …8148148148148147e-1 * t2760 - 0.10416666666666666666e-1 * t2763 - 0.30092592592592592592e-1 * t930; in func_ferr()
5866 …1620 * t9229 + 0.3e1 / 0.4e1 * t1620 * t9232 - 0.80246913580246913578e0 * t930 + 0.833333333333333… in func_ferr()
|
| H A D | mgga_x_sa_tpss.c | 7438 double t928, t929, t930, t932, t933, t935, t936, t938; in func_pol() local
8712 t930 = t128 * t929; in func_pol()
8713 t932 = t8 * t238 * t930; in func_pol()
9848 t3730 = t8 * t919 * t930; in func_pol()
12621 t10939 = t8 * t3756 * t930; in func_pol()
|
| H A D | mgga_c_revtpss.c | 2731 double t913, t916, t919, t922, t927, t930, t934, t945; in func_ferr() local
3368 t930 = t15 * t160; in func_ferr()
3381 t977 = t13 * t930; in func_ferr()
3552 …t1448 = 0.16562821945185185185e-2 * t13 * t930 * t39 + 0.68493333333333333332e-1 * t185 * t934 * t… in func_ferr()
4614 double t930, t931, t932, t935, t936, t937, t938, t939; in func_pol() local
9881 t930 = t361 * t909; in func_pol()
9882 t931 = t288 * t930; in func_pol()
10854 t2780 = t930 * t947; in func_pol()
10862 t2796 = t215 * t235 * t930; in func_pol()
13742 t9186 = t215 * t493 * t930; in func_pol()
[all …]
|
| H A D | mgga_x_mggac.c | 23504 double t925, t927, t928, t929, t930, t931, t932, t933; in func_pol() local
28628 t930 = t927 * t929; in func_pol()
28629 t931 = t923 * t930; in func_pol()
30525 t3681 = t3680 * t930; in func_pol()
31017 t4385 = t4255 * t930; in func_pol()
32849 t7023 = t7020 * t930; in func_pol()
34634 t9292 = t9289 * t930; in func_pol()
43310 t22355 = t22354 * t930; in func_pol()
43724 t23546 = t23541 * t930; in func_pol()
46235 t33416 = t33322 * t930; in func_pol()
[all …]
|
| H A D | mgga_x_br89.c | 13903 double t911, t916, t917, t922, t923, t926, t930, t933; in func_ferr() local
15886 t930 = t328 * t922; in func_ferr()
15891 …t943 = t850 - 0.2e1 * t621 * t923 - t625 * t926 / 0.3e1 - t183 * t860 + 0.2e1 * t625 * t930 + 0.2e… in func_ferr()
15904 …t990 = t850 - 0.2e1 * t744 * t923 - t748 * t926 / 0.3e1 - t205 * t860 + 0.2e1 * t748 * t930 + 0.2e… in func_ferr()
17699 t6172 = t3652 * t930; in func_ferr()
17964 …t6779 = -0.12e2 * t4825 * t930 + 0.6e1 * t4825 * t941 - 0.3e1 * t4831 * t6771 + t625 * t6775 - t61… in func_ferr()
20806 ….2e1 / 0.3e1 * t748 * t15940 - t2977 * t15943 / 0.18e2 + 0.2e1 * t13922 * t930 + 0.4e1 * t2988 * t… in func_ferr()
27232 …t56528 = t1259 * t56439 * t748 - 0.2e1 * t56359 * t748 * t9811 + 0.72e2 * t46049 * t930 - 0.16e2 *… in func_ferr()
27790 double t927, t928, t929, t930, t931, t932, t933, t934; in func_pol() local
33809 t930 = t929 * t296; in func_pol()
[all …]
|
| H A D | hyb_mgga_x_js18.c | 4281 double t930, t933, t937, t938, t941, t944, t947, t955; in func_ferr() local
5102 t930 = t929 * t110; in func_ferr()
5128 …9 * t814 + t882 * t88 + 0.35e2 / 0.81e2 * t888 * t114 + 0.35e2 / 0.81e2 * t930 * t114 + 0.70e2 / 0… in func_ferr()
5640 t2724 = t930 * t32; in func_ferr()
7385 …5 * t12590 - 0.13772539116678629376e-1 * t4944 * t12593 - 0.57275491621318330108e-4 * t930 * t1901; in func_ferr()
|
| H A D | mgga_c_kcis.c | 2760 double t918, t920, t923, t924, t926, t928, t930, t932; in func_ferr() local
3336 t930 = t372 * t892; in func_ferr()
3339 …918 / 0.8e1 + t920 / 0.8e1 - t924 / 0.8e1 + t926 / 0.8e1 - t928 / 0.8e1 + t930 / 0.8e1 - t932 / 0.… in func_ferr()
3768 …v3rho2sigma[0] = -t924 / 0.4e1 + t918 / 0.4e1 + t914 / 0.4e1 + t934 / 0.4e1 + t930 / 0.4e1 + t926 … in func_ferr()
|
| H A D | mgga_c_rscan.c | 7393 double t919, t920, t922, t927, t930, t933, t939, t941; in func_ferr() local
8675 t930 = t308 * t910; in func_ferr()
8811 … + 0.174080e2 * t386 * t309 - 0.26112e1 * t304 * t927 + 0.8704e0 * t117 * t930 - 0.414635113228230… in func_ferr()
9659 …32049307253333e4 * t3080 * t430 - 0.11520e3 * t3083 + 0.261120e2 * t386 * t930 - 0.26112e1 * t304 … in func_ferr()
11538 …398044685280e6 * t3526 * t1023 - 0.46080e3 * t8771 + 0.4700160e3 * t854 * t930 - 0.522240e2 * t117… in func_ferr()
14643 double t923, t926, t929, t930, t932, t933, t935, t936; in func_pol() local
23769 t930 = t747 * t929; in func_pol()
23776 …088826475632e1 * t542 * t923 + 0.362942158544e0 * t542 * t926 - 0.192e1 * t930 + 0.192e1 * t933 + … in func_pol()
23777 t948 = -t760 - 0.3e1 * t930 + t762 + 0.3e1 * t933 + t936; in func_pol()
|
| /dports/science/libxc/libxc-5.0.0/src/maple2c/gga_exc/ |
| H A D | gga_x_gg99.c | 82 double t930, t931, t932, t937, t943, t948, t949, t950; in func_unpol() local
664 t930 = t30 * t929; in func_unpol()
684 …8e1 * t837 * t920 + 0.27e2 / 0.4e1 * t837 * t924 + 0.3e1 / 0.32e2 * t27 * t930 * t932 - 0.3e1 / 0.… in func_unpol()
1105 …t2435 = 0.3e1 / 0.32e2 * t27 * t930 * t2391 - 0.3e1 / 0.16e2 * t511 * t2396 + 0.21e2 / 0.16e2 * t3… in func_unpol()
|
| H A D | gga_x_wpbeh.c | 12954 double t920, t921, t924, t925, t930, t933, t936, t937; in func_pol() local
16768 t930 = t61 * t657; in func_pol()
16769 t933 = 0.64753871e1 * t652 * t69 - 0.64753871e1 * t930 * t663; in func_pol()
17310 t2231 = 0.64753871e1 * t2084 * t69 - 0.64753871e1 * t930 * t2093; in func_pol()
17522 …* t69 - 0.129507742e2 * t2737 * t663 + 0.129507742e2 * t2740 * t2724 - 0.64753871e1 * t930 * t2709; in func_pol()
19345 … t663 - 0.64753871e1 * t2737 * t2093 + 0.129507742e2 * t2740 * t7763 - 0.64753871e1 * t930 * t7395; in func_pol()
19914 … t69 - 0.129507742e2 * t7758 * t2093 + 0.129507742e2 * t2740 * t9570 - 0.64753871e1 * t930 * t9583; in func_pol()
20846 … - 0.388523226e2 * t12211 * t12020 + 0.388523226e2 * t2740 * t12214 - 0.64753871e1 * t930 * t12001; in func_pol()
24629 …3 + 0.259015484e2 * t2740 * t24336 + 0.129507742e2 * t2740 * t24339 - 0.64753871e1 * t930 * t24362; in func_pol()
26954 …006 - 0.64753871e1 * t2737 * t9583 + 0.129507742e2 * t2740 * t33011 - 0.64753871e1 * t930 * t32885; in func_pol()
[all …]
|
| H A D | gga_x_hjs.c | 2271 double t925, t926, t927, t930, t931, t932, t933, t936; in func_ferr() local
2880 t930 = t262 * t262; in func_ferr()
2881 t931 = 0.1e1 / t930; in func_ferr()
3096 t1652 = 0.1e1 / t930 / t262; in func_ferr()
3808 t4430 = t930 * t930; in func_ferr()
|
| H A D | gga_c_optc.c | 2242 double t919, t922, t923, t925, t926, t928, t929, t930; in func_pol() local
4793 t930 = t929 * t454; in func_pol()
4794 t931 = t720 * t930; in func_pol()
5608 t2560 = t2165 * t930; in func_pol()
7745 t7601 = t6575 * t930; in func_pol()
13025 t23415 = t3283 * t930; in func_pol()
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwxc/maxima/f77/ |
| H A D | nwxcm_x_wpbe.F | 9134 t930 = 3.75d-1*t750*t923
9144 t940 = t939+t938+t937+t932+t931+t930
11007 5 d-1*t184*t50*(t935+t934+t933+t932+t931+t930)+4.572375d-1*
|