replace_val_2d Subroutine
public subroutine replace_val_2d(ival2d, orgval, repval)
replace orgval with repval in ival2d array
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| double precision, | intent(inout) | :: | ival2d(:,:) |
base |
||
| double precision, | intent(in) | :: | orgval |
replace from this |
||
| double precision, | intent(in) | :: | repval |
replace to this |