display_2valdiff_max Subroutine
public subroutine display_2valdiff_max(val1, val2, undef, cout, vout)
Display the maximum of the difference between val1 and val2
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| double precision, | intent(in) | :: | val1(:,:) |
Input 1 |
||
| double precision, | intent(in) | :: | val2(size(val1,1),size(val1,2)) |
Input 2 |
||
| double precision, | intent(in), | optional | :: | undef |
Undefined value |
|
| character(len=*), | intent(out), | optional | :: | cout |
Maximum value by character |
|
| real, | intent(out), | optional | :: | vout |
Maximum value by float |