Searched refs:oor2l (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | hartree_local_methods.F | 120 REAL(dp), DIMENSION(:, :), POINTER :: oor2l, r2l local
130 oor2l => grid_atom%oorad2l
166 I1_down = I1_down + oor2l(ir, l_ang + 1)*rho_1(ir, iso)
167 I2_down = I2_down + oor2l(ir, l_ang + 1)*rho_2(ir, iso)
171 (oor2l(nr, l_ang + 1)*I1_up + r2l(nr, l_ang)*I1_down)
173 (oor2l(nr, l_ang + 1)*I2_up + r2l(nr, l_ang)*I2_down)
177 I1_down = I1_down - oor2l(ir, l_ang + 1)*rho_1(ir, iso)
179 I2_down = I2_down - oor2l(ir, l_ang + 1)*rho_2(ir, iso)
182 (oor2l(ir, l_ang + 1)*I1_up + r2l(ir, l_ang)*I1_down)
184 (oor2l(ir, l_ang + 1)*I2_up + r2l(ir, l_ang)*I2_down)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | hartree_local_methods.F | 120 REAL(dp), DIMENSION(:, :), POINTER :: oor2l, r2l local
130 oor2l => grid_atom%oorad2l
166 I1_down = I1_down + oor2l(ir, l_ang + 1)*rho_1(ir, iso)
167 I2_down = I2_down + oor2l(ir, l_ang + 1)*rho_2(ir, iso)
171 (oor2l(nr, l_ang + 1)*I1_up + r2l(nr, l_ang)*I1_down)
173 (oor2l(nr, l_ang + 1)*I2_up + r2l(nr, l_ang)*I2_down)
177 I1_down = I1_down - oor2l(ir, l_ang + 1)*rho_1(ir, iso)
179 I2_down = I2_down - oor2l(ir, l_ang + 1)*rho_2(ir, iso)
182 (oor2l(ir, l_ang + 1)*I1_up + r2l(ir, l_ang)*I1_down)
184 (oor2l(ir, l_ang + 1)*I2_up + r2l(ir, l_ang)*I2_down)
|