/dports/science/libxc/libxc-5.0.0/src/maple2c/lda_exc/ |
H A D | lda_c_vwn_4.c | 847 double t2116, t2122, t2123, t2126, t2132, t2138, t2141, t2143; in func_pol() local 1920 t2138 = 0.23411326096918008589e1 * t2019 * t2 * t1734 * t514 * t127 * t1731; in func_pol() 1926 …t2173 = t2126 - t2132 + t2138 + t2141 - t2143 + t2147 + 0.22478670955426118383e-2 * t1239 * t1243 … in func_pol() 2009 …t2803 = t2132 - t2138 - t2141 + t2143 - t2147 - t2463 / 0.6e1 - t2788 - t2790 - t2793 + t2796 - t2… in func_pol() 2087 …58 / 0.8e1 + t2096 - t2100 - t2102 + t2106 - t2109 + t2113 + t2116 + t2122 - t2126 + t2132 - t2138; in func_pol() 2173 …t3167 = -t2102 + t2106 - t2109 + t2113 + t2116 + t2122 - t2126 + t2132 - t2138 - t2141 + t2143 - t… in func_pol() 2209 …t3396 = -t2100 - t2102 + t2106 - t2109 + t2113 + t2116 + t2122 - t2126 + t2132 - t2138 - t2141 + t… in func_pol() 2237 …t3566 = t2122 - t2126 + t2132 - t2138 - t2141 + t2143 - t2147 - t2788 - 0.16e2 * t3394 - 0.16e2 * … in func_pol()
|
H A D | lda_c_vwn_2.c | 846 double t2128, t2129, t2130, t2133, t2134, t2136, t2138, t2144; in func_pol() local 1960 t2138 = t645 * t395 * t68; in func_pol() 1961 …t2144 = t1802 + t1981 - t2125 - t2127 - t2130 + 0.2e1 * t1983 + t1986 + t2134 + t2136 + t2138 + t1… in func_pol() 2008 …+ t1798 + t1800 + t1802 + t1981 - t2125 - t2130 + t1983 + t2134 + 0.2e1 * t2138 + t1974 - t1976 - … in func_pol() 2045 t2301 = 0.3e1 * t2138; in func_pol() 2432 …t4636 = 0.8e1 * t2133 + 0.2e1 * t2136 + 0.6e1 * t2138 + t4148 - t4149 + t7 * (t4458 + t4533 + t455… in func_pol() 2458 …- t4367 - t4370 - t2295 - t2296 - t2298 - t2300 + t1984 + t4373 + 0.9e1 * t2138 + t4148 - t4149 - … in func_pol() 2477 …- 0.12e2 * t2294 - 0.4e1 * t2296 - 0.4e1 * t2298 - 0.12e2 * t2299 + 0.12e2 * t2138 + t4148 - t4149; in func_pol()
|
H A D | lda_c_pw.c | 593 double t2131, t2132, t2133, t2135, t2136, t2138, t2139, t2141; in func_pol() local 1588 t2138 = t1118 * t291; in func_pol() 1589 t2139 = 0.2e1 / 0.3e1 * t2138; in func_pol() 1644 … / 0.3e1 + 0.2e1 / 0.9e1 * t2349 - 0.28e2 / 0.27e2 * t2136 + 0.8e1 / 0.9e1 * t2138 - t2141 / 0.3e1; in func_pol()
|
H A D | lda_c_vwn_3.c | 861 double t2134, t2135, t2138, t2139, t2143, t2144, t2145, t2146; in func_pol() local 2144 t2138 = t492 * t1292; in func_pol() 2167 …t2221 = 0.90036293170409445925e-3 * t2135 * t457 + 0.20029022722162365848e-1 * t2138 * t1296 * t21… in func_pol() 2487 …7951122833778e-2 * t536 * t2133 * t94 * t457 - 0.14687949996252401622e0 * t2138 * t2869 * t2139 + … in func_pol()
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/gga_exc/ |
H A D | gga_c_chachiyo.c | 785 double t2134, t2136, t2138, t2140, t2143, t2146, t2150, t2153; in func_pol() local 1739 t2138 = t336 * t323 * t343; in func_pol() 1747 …t2162 = t2123 - t2095 - t2125 + t2108 - t2138 / 0.36e2 + t2143 / 0.24e2 + t2146 / 0.48e2 + 0.7e1 /… in func_pol() 1752 …t2175 = 0.7e1 / 0.27e2 * t2091 - t2124 - 0.7e1 / 0.96e2 * t2097 + t2128 - t2138 / 0.18e2 + t2143 /… in func_pol() 1763 …178 / 0.48e2 - t2034 + 0.7e1 / 0.36e2 * t2091 - 0.7e1 / 0.128e3 * t2097 - t2138 / 0.12e2 + 0.7e1 /… in func_pol() 1766 …2178 / 0.24e2 - t2060 + 0.7e1 / 0.18e2 * t2091 - 0.7e1 / 0.64e2 * t2097 - t2138 / 0.6e1 + 0.7e1 / … in func_pol()
|
H A D | gga_xc_th1.c | 546 double t2119, t2122, t2125, t2126, t2129, t2132, t2135, t2138; in func_pol() local 1453 t2138 = t818 * t289; in func_pol() 1454 t2139 = t1304 * t2138; in func_pol() 1481 t2199 = t1404 * t2138; in func_pol() 2052 t4469 = t80 * t3349 * t2138 * t164; in func_pol() 2070 …t4597 = 0.32e2 / 0.81e2 * t215 * t2199 + 0.40e2 / 0.81e2 * t33 * t3408 * t2138 * t164 - 0.8e1 / 0.… in func_pol() 2362 t6724 = t5101 * t2138; in func_pol() 2366 t6793 = t5252 * t2138; in func_pol()
|
H A D | gga_x_lag.c | 809 double t2128, t2131, t2132, t2134, t2138, t2144, t2164, t2166; in func_pol() local 2548 t2138 = t7 * t658 * t217; in func_pol() 2553 …t2179 = -0.27413137275378499088e-2 * t2138 * t175 * t18 * t227 + 0.10276735016205996654e-5 * t2144… in func_pol() 2665 …216120194648517704e-4 * t2104 * t805 * t785 - 0.13706568637689249544e-2 * t2138 * t864 * t2665 + 0… in func_pol() 2713 …3675081029983273e-6 * t1065 * t1067 * t2931 - 0.45688562125630831811e-3 * t2138 * t347 * t18 * t22… in func_pol() 2987 …951200993150474e-10 * t2062 * t1659 * t4395 + 0.34266421594223123858e-3 * t2138 * t1686 * t4395 - … in func_pol() 3152 ….46677561207574587982e-8 * t191 * t440 * t5264 - 0.64249540489168357237e-4 * t2138 * t1686 * t5268; in func_pol() 3231 …6097694232804659e-7 * t2144 * t1676 * t5521 - 0.64249540489168357237e-4 * t2138 * t1686 * t5521 - … in func_pol() 3288 …827612682482985347e-5 * t660 * t417 * t5703 - 0.64249540489168357237e-4 * t2138 * t1686 * t5707 - … in func_pol()
|
H A D | gga_x_wc.c | 744 double t2097, t2099, t2105, t2125, t2132, t2138, t2140, t2142; in func_pol() local 1804 t2138 = t105 * t423; in func_pol() 1805 t2140 = t383 * t2138 * t946; in func_pol() 1839 t2476 = t1039 * t2138 * t1040; in func_pol() 1844 t2499 = t383 * t2138 * t1044; in func_pol()
|
H A D | gga_c_w94.c | 551 double t2104, t2118, t2120, t2123, t2129, t2135, t2136, t2138; in func_pol() local 1538 t2138 = t272 * t678; in func_pol() 1540 …t2144 = t1979 - 0.25e2 / 0.36e2 * t2136 - 0.5e1 / 0.9e1 * t2138 - 0.5e1 / 0.6e1 * t2140 - 0.10e2 /… in func_pol() 1565 …1950 + 0.10e2 * t1960 + t1728 - 0.25e2 / 0.12e2 * t2136 - 0.5e1 / 0.3e1 * t2138 - 0.5e1 / 0.2e1 * … in func_pol()
|
H A D | gga_x_2d_pbe.c | 438 double t2081, t2097, t2113, t2115, t2117, t2119, t2121, t2138; in func_pol() local 1445 …t2138 = -0.50611679643957322116e-2 * t2113 - 0.90648550536122657418e-5 * t2115 + 0.142795508798395… in func_pol() 1451 v4rho3sigma[8] = t2138 + t2178; in func_pol()
|
H A D | gga_x_ev93.c | 927 double t2129, t2134, t2138, t2139, t2145, t2148, t2150, t2157; in func_pol() local 2324 t2138 = t4 * t6 / t371 / t2134; in func_pol() 2343 …3 * t2124 - 0.9e1 / 0.4e1 * t155 * t116 * t354 * t2129 - 0.5e1 / 0.27e2 * t2138 * t171 * t107 * t2… in func_pol() 2374 …* t184 * t793 - 0.3e1 * t115 * t412 * t354 * t8 * t355 - 0.5e1 / 0.27e2 * t2138 * t171 * t190 * t8… in func_pol() 2446 …9e1 - t2757 / 0.9e1 - t115 * t116 * t354 * t457 * t355 - 0.5e1 / 0.27e2 * t2138 * t171 * t463 * t3… in func_pol() 2510 …2 * t1275 / 0.2e1 - t292 * t116 * t185 * t1080 / 0.2e1 - 0.5e1 / 0.27e2 * t2138 * t171 * t1204 * t… in func_pol() 2539 …t116 * t66 * t3445 - t292 * t116 * t66 * t3450 / 0.2e1 - 0.5e1 / 0.27e2 * t2138 * t171 * t107 * t3… in func_pol()
|
H A D | gga_x_pbepow.c | 700 double t2108, t2112, t2118, t2121, t2131, t2134, t2138, t2145; in func_pol() local 1683 t2138 = t344 * t752 * t1032; in func_pol() 1685 …t2187 = -t2134 / 0.8e1 + t1911 / 0.4e1 - t2138 / 0.6e1 + t732 * t741 * t369 * t8 / 0.3e1 - t2145 /… in func_pol() 1718 …857 * t1032 + 0.2e1 / 0.3e1 * t747 * t345 * t380 * t389 - 0.2e1 / 0.3e1 * t2138 - 0.2e1 / 0.3e1 * … in func_pol()
|
H A D | gga_x_2d_b88.c | 658 double t2108, t2112, t2113, t2118, t2125, t2138, t2142, t2146; in func_pol() local 1619 t2138 = t305 * t305; in func_pol() 1624 … t893 * t112 + 0.4e1 * t578 * t138 * t821 - 0.3e1 / 0.2e1 * t1337 * t30 * t2138 - 0.6e1 * t183 * t… in func_pol()
|
H A D | gga_xc_th2.c | 481 double t2067, t2069, t2090, t2101, t2114, t2132, t2135, t2138; in func_pol() local 1359 t2138 = t1950 * t123; in func_pol() 1362 …25 - 0.44688000000000000000e0 * t2135 * t125 + 0.72943125000000000000e0 * t2138 * t125 - 0.2515103… in func_pol() 1880 t4125 = t2138 * t160; in func_pol()
|
H A D | gga_x_pw91.c | 1018 double t2129, t2130, t2132, t2136, t2138, t2143, t2145, t2166; in func_pol() local 2136 t2138 = t434 * t471; in func_pol() 2138 … / 0.6e1 + t2130 - 0.5e1 / 0.27e2 * t2132 - 0.25e2 / 0.6e1 * t2136 + t7 * t2138 * t189 / 0.2e1 - 0… in func_pol() 2196 …t2551 = t2487 / 0.9e1 + t2490 / 0.27e2 + t7 * t2138 * t206 / 0.3e1 + 0.2e1 / 0.9e1 * t2496 + t2499… in func_pol()
|
H A D | gga_k_thakkar.c | 796 double t2115, t2125, t2138, t2153, t2156, t2170, t2177, t2193; in func_pol() local 1785 …t2138 = t1695 + t1698 - 0.2e1 / 0.5e1 * t700 + 0.2e1 / 0.5e1 * t703 + 0.4e1 / 0.3e1 * t923 - 0.2e1… in func_pol() 1788 v4rho4[2] = t2115 + t2125 + t2138 + t2153; in func_pol()
|
H A D | gga_x_sfat.c | 123 double t2135, t2138, t2140, t2143, t2145, t2148, t2149, t2150; in func_unpol() local 975 t2138 = t45 * t800; in func_unpol() 976 t2140 = t208 * t2138 * t217; in func_unpol() 1606 double t2125, t2128, t2129, t2131, t2132, t2133, t2137, t2138; in func_ferr() local 2419 t2138 = t2137 * t2133; in func_ferr() 2421 ….3e1 * t258 * t2125 - 0.216e3 * t2131 * t2132 * t2133 - 0.135e3 * t1696 * t2138 - t180 * t1913 / 0… in func_ferr() 2786 …6 * t4917 * t14 + 0.2592e4 * t5038 * t812 * t304 * t14 - 0.90e2 * t4000 * t2138 + 0.2025e4 * t4070… in func_ferr() 3049 double t2093, t2097, t2100, t2103, t2122, t2127, t2137, t2138; in func_pol() local 4354 t2138 = t227 * t702; in func_pol() 4355 …457436691817e2 * t87 * t1965 + 0.75398223686155037724e2 * t2137 * t1383 * t2138 + 0.83775804095727… in func_pol() [all …]
|
/dports/science/libxc/libxc-5.0.0/src/maple2c/mgga_exc/ |
H A D | mgga_x_ms.c | 124 double t2095, t2096, t2097, t2103, t2108, t2109, t2134, t2138; in func_unpol() local 1033 t2138 = t1735 * t813; in func_unpol() 1199 …500e4 / 0.243e3 * t2138 * t815 * t3579 * t99 - 0.625e3 / 0.162e3 * t502 * t944 * t384 * t290 * t10… in func_unpol() 1242 …603 * t1214 - 0.20000e5 / 0.729e3 * t2621 * t1210 + 0.40000e5 / 0.729e3 * t2138 * t1345 * t4116 * … in func_unpol() 1255 …74 + 0.200e3 / 0.9e1 * t2615 * t442 * t34 * t1162 + 0.40000e5 / 0.729e3 * t2138 * t3085 * t1161 * … in func_unpol() 1272 …683e5 * t1472) + 0.20000000e8 / 0.19683e5 * t1416 + 0.20000e5 / 0.243e3 * t2138 * t815 * t4365 * t… in func_unpol() 1276 …t4418 = 0.40000e5 / 0.243e3 * t2138 * t1345 * t4381 * t115 - 0.20000e5 / 0.81e2 * t2144 * t1345 * … in func_unpol() 2812 double t2135, t2138, t2141, t2143, t2144, t2146, t2147, t2155; in func_pol() local 4289 t2138 = t643 * t805 * t239; in func_pol() 4293 …29e3 * t2132 - 0.312500e6 / 0.19683e5 * t2135 + 0.1250000e7 / 0.59049e5 * t2138 - 0.78125e5 / 0.19… in func_pol() [all …]
|
H A D | hyb_mgga_x_js18.c | 8562 double t2126, t2132, t2138, t2140, t2143, t2146, t2149, t2150; in func_pol() local 11079 t2138 = t147 * t1986; in func_pol() 13310 …t8949 = -t2138 * t8924 - 0.2e1 * t2138 * t8926 - t7644 * t8914 / 0.2e1 + 0.8e1 * t614 * t2830 * t5… in func_pol() 14549 …t13718 = t7655 * t13559 / 0.8e1 - t2138 * t13562 - 0.2e1 * t2138 * t13564 - t7644 * t13559 / 0.2e1… in func_pol() 15017 …t16000 = -0.360e3 * t15698 - t2138 * t15786 - 0.2e1 * t2138 * t15783 - t7644 * t15789 / 0.2e1 + 0.… in func_pol() 15883 ….2e1 * t2138 * t19363 - t7644 * t19360 / 0.2e1 - 0.12e2 * t614 * t5912 * t954 + 0.8e1 * t614 * t13… in func_pol() 19162 … + t35550) * t86 - 0.9e1 / 0.4e1 * t26574 * t35224 - 0.3e1 * t2138 * t35229 - 0.3e1 * t2138 * t352… in func_pol() 19834 …e1 * t7655 * t41301 + t26679 * t41308 / 0.16e2 - t2138 * t41366 - 0.3e1 * t2138 * t41297 - 0.3e1 *… in func_pol() 20058 …t2138 * t43586 + 0.1440e4 * t4489 * t2879 - 0.720e3 * t43610 + 0.1440e4 * t1454 * t8926 - 0.720e3 … in func_pol() 20359 …+ t26687 * t15789 / 0.8e1 + t7655 * t45788 / 0.8e1 - t2138 * t45780 - t2138 * t45777 - 0.2e1 * t21… in func_pol() [all …]
|
H A D | mgga_x_edmgga.c | 106 double t2134, t2135, t2137, t2138, t2141, t2142, t2145, t2147; in func_unpol() local 910 t2138 = t77 * t2137; in func_unpol() 912 v3sigmatau2[0] = -0.3e1 / 0.16e2 * t76 * t2138; in func_unpol() 1395 v4rhosigmatau2[0] = -t285 * t2138 / 0.4e1 - 0.3e1 / 0.16e2 * t76 * t77 * (t6090 + t6132); in func_unpol() 3406 double t2130, t2133, t2137, t2138, t2142, t2149, t2166, t2167; in func_pol() local 4787 t2138 = t470 * t179; in func_pol() 6741 …7735973502e-1 * t2133 * t825 * t6997 + 0.24923243437094339947e1 * t7106 * t2138 * t3164 - 0.124616… in func_pol() 6860 …45157315668e-1 * t705 * t3407 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1181 + 0.166154… in func_pol() 6974 …t2138 * t1263 - 0.12461621718547169973e1 * t2137 * t2149 * t1263 - 0.76217237139506171188e1 * t490… in func_pol() 7053 …45157315668e-1 * t705 * t3813 * t456 - 0.12461621718547169973e1 * t2137 * t2138 * t1335 + 0.166154… in func_pol() [all …]
|
H A D | mgga_c_m05.c | 3017 double t2133, t2134, t2135, t2136, t2138, t2140, t2142, t2146; in func_pol() local 5199 t2138 = t655 * t762; in func_pol() 7609 t6500 = t2138 * t1741; in func_pol() 7747 t6734 = t2138 * t1592; in func_pol() 8963 t8798 = t2138 * t2803; in func_pol() 8983 t8818 = t2138 * t2795; in func_pol() 11946 …0000e3 * t2138 * t6360 - 0.25731167197908056108e4 * t7027 * t1592 - 0.20000000000000000000e2 * t21… in func_pol() 12682 …t2138 * t8702 + 0.32000000000000000001e3 * t2140 * t8702 + 0.16000000000000000000e3 * t2184 * t870… in func_pol() 13095 …4 - 0.26666666666666666668e2 * t763 * t31033 + 0.80000000000000000002e1 * t2138 * t9541 + 0.800000… in func_pol() 13244 …t2138 * t9732 - 0.64000000000000000000e2 * t2140 * t9732 - 0.32000000000000000000e2 * t2184 * t973… in func_pol() [all …]
|
H A D | mgga_x_gdme.c | 786 double t2108, t2111, t2124, t2126, t2134, t2138, t2140, t2156; in func_pol() local 2283 t2138 = t191 * t881; in func_pol() 2286 … * t349 * t299 - 0.4e1 / 0.81e2 * t2051 * t840 * t2134 - 0.8e1 / 0.81e2 * t2138 - 0.2e1 / 0.81e2 *… in func_pol() 2301 …v4rho3lapl[6] = -0.8e1 / 0.81e2 * t2072 - 0.8e1 / 0.81e2 * t2124 - 0.8e1 / 0.27e2 * t2138 + t1986 … in func_pol()
|
H A D | mgga_c_vsxc.c | 155 double t2125, t2128, t2130, t2135, t2138, t2140, t2141, t2143; in func_unpol() local 1310 t2138 = t1829 * t346; in func_unpol() 3145 double t2138, t2144, t2147, t2152, t2154, t2158, t2159, t2164; in func_pol() local 5289 t2138 = 0.1e1 / t133 / t2136; in func_pol() 5292 …t2152 = 0.304e3 / 0.9e1 * t156 * t2138 + 0.88e2 / 0.9e1 * t162 * t2114 * t149 + 0.80e2 / 0.3e1 * t… in func_pol() 7523 t6420 = t2138 * tau[1]; in func_pol() 8251 …t7712 = 0.48e2 * t2434 * t2138 + 0.176e3 / 0.9e1 * t559 * t2114 + 0.88e2 / 0.9e1 * t7706 * t263 + … in func_pol() 8299 …t7801 = 0.608e3 / 0.9e1 * t793 * t2138 + 0.88e2 / 0.9e1 * t88 * t2114 * t149 + 0.80e2 / 0.3e1 * t7… in func_pol() 12811 t28715 = t1413 * t2138; in func_pol() 12814 …t2138 * t2330 - 0.64e2 * t4593 * t9097 + 0.6e1 * t15338 * t2936 - 0.6e1 * t24006 * t811 + 0.12e2 *… in func_pol() [all …]
|
H A D | mgga_x_tpss.c | 125 double t2138, t2139, t2141, t2144, t2145, t2146, t2148, t2159; in func_unpol() local 1058 t2138 = t178 * params->b; in func_unpol() 1059 t2139 = t2137 * t2138; in func_unpol() 1098 t2254 = t2253 * t2138; in func_unpol() 1146 t2388 = t2387 * t2138; in func_unpol() 1187 …t2504 = 0.27e2 / 0.16e2 * t678 * t2028 - 0.150e3 * t2496 * t2138 - 0.81e2 / 0.32e2 * t1066 * t2499… in func_unpol() 1491 …t562 * t4795 - 0.27e2 / 0.64e2 * t562 * t4798 - 0.75e2 / 0.32e2 * t4783 * t2138 - 0.225e3 / 0.512e… in func_unpol() 1848 double t2120, t2124, t2127, t2131, t2134, t2135, t2137, t2138; in func_ferr() local 2736 t2138 = t2137 * t32; in func_ferr() 2742 …t2173 = t21 * t2135 + t21 * t2138 + 0.2e1 * t21 * t2141 - t1712 * t514 / 0.8e1 - t1536 * t2147 / 0… in func_ferr() [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/xc/ |
H A D | xc_xbecke88_lr_adiabatic.F | 321 t2126, t2130, t2131, t2138, t2139, t214, t2143, t2147, t2160 local 1445 t2138 = -t1952 - 0.2222222223e0_dp*t1954 - t1958 + t1961 + t1965 + t1969 & 1450 t2139 = t2086 + t2138 3100 t2130, t2131, t2138, t2139, t214, t2143, t2147, t2160, t2169 local 4221 t2138 = -t1952 - 0.2222222223e0_dp*t1954 - t1958 + t1961 + t1965 + t1969 & 4226 t2139 = t2086 + t2138
|