Searched refs:nprjc (Results 1 – 5 of 5) sorted by relevance
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | sap_kind_types.F | 290 maxsgf, na, nb, ncoa, ncoc, nkind, nlist, nneighbor, nnl, np, nppnl, nprjc, nseta, nsgfa, & local 465 nprjc = spotential(kkind)%sgp_potential%nppnl 466 IF (nprjc == 0) CYCLE 514 nprjc = nprj_ppnl(l)*nco(l) 515 IF (nprjc == 0) CYCLE 545 nb = nprjc 552 prjc = prjc + nprjc 586 sab(1:na, first_col:first_col + nprjc - 1) = ai_work(1:na, 1:nprjc, i) 596 … work(1:np, 1:nb) = MATMUL(sab(1:np, first_col:first_col + nprjc - 1), cprj(1:nprjc, 1:nb))
|
H A D | core_ppnl.F | 106 ncoa, ncoc, nkind, nlist, nneighbor, nnl, np, nppnl, nprjc, nseta, nsgfa, prjc, sgfa, slot local 312 nprjc = spotential(kkind)%sgp_potential%nppnl 313 IF (nprjc == 0) CYCLE 350 nprjc = nprj_ppnl(l)*nco(l) 351 IF (nprjc == 0) CYCLE 364 nb = nprjc 373 prjc = prjc + nprjc 404 … work(1:np, 1:nb) = MATMUL(sab(1:np, first_col:first_col + nprjc - 1), cprj(1:nprjc, 1:nb))
|
H A D | commutator_rpnl.F | 85 nlist, nneighbor, nnode, np, nppnl, nprjc, nseta, nsgfa, nthread, prjc, sgfa local 258 nprjc = nprj_ppnl(l)*nco(l) 259 IF (nprjc == 0) CYCLE 273 CALL dgemm("N", "N", ncoa, nprjc, ncoc, 1.0_dp, sab(1, 1, i), ldsab, & 276 prjc = prjc + nprjc
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | core_ppnl.F | 109 nprjc, nseta, nsgfa, nthread, prjc, sgfa local 271 nprjc = spotential(kkind)%sgp_potential%nppnl 272 IF (nprjc == 0) CYCLE 330 nprjc = nprj_ppnl(l)*nco(l) 331 IF (nprjc == 0) CYCLE 345 … CALL dgemm("N", "N", ncoa, nprjc, ncoc, 1.0_dp, sab(1, first_col + 1), SIZE(sab, 1), & 348 prjc = prjc + nprjc 367 CALL dgemm("N", "N", ncoa, nppnl, nprjc, 1.0_dp, sab(1, first_col), ldsab, &
|
H A D | commutator_rpnl.F | 78 nlist, nneighbor, nnode, np, nppnl, nprjc, nseta, nsgfa, nthread, prjc, sgfa local 251 nprjc = nprj_ppnl(l)*nco(l) 252 IF (nprjc == 0) CYCLE 266 CALL dgemm("N", "N", ncoa, nprjc, ncoc, 1.0_dp, sab(1, 1, i), ldsab, & 269 prjc = prjc + nprjc
|