FIXME : Add documentation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
complex, | intent(in) | :: | f | |||
complex, | intent(in) | :: | fnew | |||
real, | intent(in) | :: | dtinv |
pure complex function fdot_t (f,fnew, dtinv)
complex, intent (in) :: f, fnew
real, intent (in) :: dtinv
fdot_t = (fnew-f)*dtinv
end function fdot_t