Searched refs:sabc_contr (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | qs_o3c_methods.F | 64 REAL(KIND=dp), ALLOCATABLE, DIMENSION(:, :, :) :: sabc, sabc_contr local
217 ALLOCATE (sabc_contr(nsgfa(iset), nsgfb(jset), nsgfc(kset)))
219 CALL abc_contract(sabc_contr, sabc, &
223 sabc_contr(1:nsgfa(iset), 1:nsgfb(jset), 1:nsgfc(kset))
226 CALL abc_contract(sabc_contr, sdabc(:, :, :, i), &
230 sabc_contr(1:nsgfa(iset), 1:nsgfb(jset), 1:nsgfc(kset))
231 CALL abc_contract(sabc_contr, sabdc(:, :, :, i), &
235 sabc_contr(1:nsgfa(iset), 1:nsgfb(jset), 1:nsgfc(kset))
239 DEALLOCATE (sabc_contr)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | qs_o3c_methods.F | 83 REAL(KIND=dp), ALLOCATABLE, DIMENSION(:, :, :) :: sabc, sabc_contr local
236 ALLOCATE (sabc_contr(nsgfa(iset), nsgfb(jset), nsgfc(kset)))
238 CALL abc_contract(sabc_contr, sabc, &
242 sabc_contr(1:nsgfa(iset), 1:nsgfb(jset), 1:nsgfc(kset))
245 CALL abc_contract(sabc_contr, sdabc(:, :, :, i), &
249 sabc_contr(1:nsgfa(iset), 1:nsgfb(jset), 1:nsgfc(kset))
250 CALL abc_contract(sabc_contr, sabdc(:, :, :, i), &
254 sabc_contr(1:nsgfa(iset), 1:nsgfb(jset), 1:nsgfc(kset))
258 DEALLOCATE (sabc_contr)
|