Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | i | |||
integer, | intent(in) | :: | j | |||
integer, | intent(in) | :: | k | |||
integer, | intent(in) | :: | l |
pure function get_umat_rs_hub_trans(i, j, k, l) result(hel)
! do i need an explicit get_umat_rs_hub_trans? or can i just reuse
! the one, whhich access the "normal" fcidump.. figure out!
integer, intent(in) :: i, j, k, l
HElement_t(dp) :: hel
hel = umat_rs_hub_trancorr_hop(i, j, k, l)
end function get_umat_rs_hub_trans