Searched refs:efield_nuclear (Results 1 – 3 of 3) sorted by relevance
64 REAL(KIND=dp) :: edispersion, efield_nuclear component
224 ec_env%efield_nuclear = -SUM(ci(:)*fieldpol(:))
467 ec_env%efield_nuclear = 0.0_dp754 ec_env%efield_nuclear = 0.0_dp1619 ec_env%eband = eband + ec_env%efield_nuclear