| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/shg_int/ |
| H A D | generic_shg_integrals.F | 1131 INTEGER, DIMENSION(:), POINTER :: la_max, lb_max, lca_max, npgfa, npgfb, & local
1142 NULLIFY (la_max, lb_max, lca_max, npgfa, npgfb, npgfca)
1169 lca_max => fba%lmax
1183 lca_max_set = MAXVAL(lca_max)
1213 laa_max = la_max(iset) + lca_max(kset)
1219 lca_max(kset), npgfca(kset), zetca(:, kset), &
1288 lbb_max, lca_max, lcb_max, li_max, & local
1306 lca_max = MAXVAL(fba%lmax)
1309 laa_max = la_max + lca_max
1332 size_int(3, :) = (/lca_max, lcb_max/)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/shg_int/ |
| H A D | generic_shg_integrals.F | 1131 INTEGER, DIMENSION(:), POINTER :: la_max, lb_max, lca_max, npgfa, npgfb, & local
1142 NULLIFY (la_max, lb_max, lca_max, npgfa, npgfb, npgfca)
1169 lca_max => fba%lmax
1183 lca_max_set = MAXVAL(lca_max)
1213 laa_max = la_max(iset) + lca_max(kset)
1219 lca_max(kset), npgfca(kset), zetca(:, kset), &
1288 lbb_max, lca_max, lcb_max, li_max, & local
1306 lca_max = MAXVAL(fba%lmax)
1309 laa_max = la_max + lca_max
1332 size_int(3, :) = (/lca_max, lcb_max/)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | generic_os_integrals.F | 521 … INTEGER, DIMENSION(:), POINTER :: la_max, la_min, lb_max, lb_min, lca_max, & local
534 NULLIFY (la_max, la_min, lb_max, lb_min, lca_max, lca_min, npgfa, npgfb, &
565 lca_max => fba%lmax
606 ncoc = npgfca(kaset)*(ncoset(lca_max(kaset)) - ncoset(lca_min(kaset) - 1))
615 … lca_max(kaset), lca_min(kaset), npgfca(kaset), rpgfca(:, kaset), zetca(:, kaset), &
628 … lca_max(kaset), lca_min(kaset), npgfca(kaset), rpgfca(:, kaset), zetca(:, kaset), &
639 … lca_max(kaset), npgfca(kaset), zetca(:, kaset), lca_min(kaset), &
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | generic_os_integrals.F | 521 … INTEGER, DIMENSION(:), POINTER :: la_max, la_min, lb_max, lb_min, lca_max, & local
534 NULLIFY (la_max, la_min, lb_max, lb_min, lca_max, lca_min, npgfa, npgfb, &
565 lca_max => fba%lmax
606 ncoc = npgfca(kaset)*(ncoset(lca_max(kaset)) - ncoset(lca_min(kaset) - 1))
615 … lca_max(kaset), lca_min(kaset), npgfca(kaset), rpgfca(:, kaset), zetca(:, kaset), &
628 … lca_max(kaset), lca_min(kaset), npgfca(kaset), rpgfca(:, kaset), zetca(:, kaset), &
639 … lca_max(kaset), npgfca(kaset), zetca(:, kaset), lca_min(kaset), &
|