Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | i | |||
integer, | intent(in) | :: | j | |||
integer, | intent(in) | :: | k | |||
integer, | intent(in) | :: | l |
function nullUMat(i, j, k, l) result(hel)
use constants
integer, intent(in) :: i, j, k, l
HElement_t(dp) :: hel
! This functions shows the behaviour of an empty UMat
unused_var(i)
unused_var(j)
unused_var(k)
unused_var(l)
hel = 0.0_dp
end function nullUMat