replace_undef Subroutine
public subroutine replace_undef(ioval2d, undeflag, undefv)
replace ioval2d with undefv at the point undeflag == .true.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| double precision, | intent(inout) | :: | ioval2d(:,:) |
base |
||
| logical, | intent(in) | :: | undeflag(size(ioval2d,1),size(ioval2d,2)) |
flag for undefined point |
||
| double precision, | intent(in) | :: | undefv |
undefined value |