Max1 Intrinsic
..............
Max1(A-1, A-2, ..., A-n)
Max1: `INTEGER(KIND=1)' function.
A: `REAL(KIND=1)'; at least two such arguments must be provided;
scalar; INTENT(IN).
Intrinsic groups: (standard FORTRAN 77).
Description:
Archaic form of `MAX()' that is specific to one type for A and a
different return type. Note:Max Intrinsic.