diagH_after_exc_3_base Function

private pure function diagH_after_exc_3_base(nI, E_0, exc) result(hel)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nI(nEl)
real(kind=dp), intent(in) :: E_0
type(Excite_3_t), intent(in) :: exc

Return Value real(kind=dp)


Contents