| 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