Searched refs:E_rpa_qp (Results 1 – 3 of 3) sorted by relevance
621 SAFE_ALLOCATE(pol%E_rpa_qp, (pol%nq))622 pol%E_rpa_qp = 0.0D+00
1269 pol%E_rpa_qp(iq) = E_rpa1348 E_rpa = E_rpa + pol%qw_rpa(iq) * pol%E_rpa_qp(iq)
512 real(DP), allocatable :: E_rpa_qp(:) ! RPA energy contribution from each q-point component