![]() |
(git:b77b4be)
|
given the response wavefunctions obtained by the application of the (rxp), p, and ((dk-dl)xp) operators, here the current density vector (jx, jy, jz) is computed for the 3 directions of the magnetic field (Bx, By, Bz) More...
Functions/Subroutines | |
subroutine, public | mult_g_ov_g2_grid (pw_pool, rho_gspace, funcg_times_rho, idir, my_chi) |
Given the current density on the PW grid in reciprcal space (obtained by FFT), calculate the integral \int_{r}[ ((r-r') x j(r))/|r-r'|^3 ] = Bind(r') which in reciprcal space reads (for G/=0) i G/|G|^2 x J(G) | |
given the response wavefunctions obtained by the application of the (rxp), p, and ((dk-dl)xp) operators, here the current density vector (jx, jy, jz) is computed for the 3 directions of the magnetic field (Bx, By, Bz)
subroutine, public qs_linres_nmr_epr_common_utils::mult_g_ov_g2_grid | ( | type(pw_pool_type), pointer | pw_pool, |
type(pw_c1d_gs_type), intent(in) | rho_gspace, | ||
type(pw_c1d_gs_type), intent(inout) | funcg_times_rho, | ||
integer, intent(in) | idir, | ||
real(dp), intent(in) | my_chi | ||
) |
Given the current density on the PW grid in reciprcal space (obtained by FFT), calculate the integral \int_{r}[ ((r-r') x j(r))/|r-r'|^3 ] = Bind(r') which in reciprcal space reads (for G/=0) i G/|G|^2 x J(G)
pw_pool | ... |
rho_gspace | ... |
funcG_times_rho | ... |
idir | ... |
my_chi | ... |
This method would not work for a non periodic system It should be generalized like the calculation of Hartree
Definition at line 56 of file qs_linres_nmr_epr_common_utils.F.