Home
last modified time | relevance | path

Searched refs:iprj_ppnl (Results 1 – 4 of 4) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_interactions.F80 INTEGER :: handle, i, iexp_ppl, ikind, ip, iprj_ppnl, j, l, lppl, lppnl, lprj, lprj_ppnl, & local
227 DO iprj_ppnl = 1, nprj_ppnl(l)
228 lprj_ppnl = l + 2*(iprj_ppnl - 1)
232 cprj_ppnl(iprj_ppnl, l), &
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_interactions.F83 INTEGER :: handle, i, iexp_ppl, ikind, ip, iprj_ppnl, j, l, lppl, lppnl, lprj, lprj_ppnl, & local
229 DO iprj_ppnl = 1, nprj_ppnl(l)
230 lprj_ppnl = l + 2*(iprj_ppnl - 1)
234 cprj_ppnl(iprj_ppnl, l)))
/dports/science/cp2k-data/cp2k-7.1.0/src/subsys/
H A Dexternal_potential_types.F1100 iprj_ppnl, l, lp, lprj_ppnl, nprj, px, & local
1108 DO iprj_ppnl = 1, potential%nprj_ppnl(l)
1109 lp = iprj_ppnl - 1
1114 potential%cprj_ppnl(iprj_ppnl, l) = cp
1182 INTEGER :: i, ico, iprj, iprj_ppnl, iso, j, jco, & local
1188 DO iprj_ppnl = 1, potential%nprj_ppnl(l)
1189 iprj = nprj + (iprj_ppnl - 1)*nco(l)
1199 potential%hprj_ppnl(iprj_ppnl, &
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/subsys/
H A Dexternal_potential_types.F1107 iprj_ppnl, l, lp, lprj_ppnl, nprj, px, & local
1115 DO iprj_ppnl = 1, potential%nprj_ppnl(l)
1116 lp = iprj_ppnl - 1
1121 potential%cprj_ppnl(iprj_ppnl, l) = cp
1189 INTEGER :: i, ico, iprj, iprj_ppnl, iso, j, jco, & local
1195 DO iprj_ppnl = 1, potential%nprj_ppnl(l)
1196 iprj = nprj + (iprj_ppnl - 1)*nco(l)
1206 potential%hprj_ppnl(iprj_ppnl, &