nf_issyserr Function

function nf_issyserr() result(status)

Arguments

None

Return Value logical


Source Code

function nf_issyserr() result(status)
  logical :: status
  status=.false.
end function nf_issyserr