COMPLEX; scalar; INTENT(IN).
Converts A to
If A is type
COMPLEX, its real part
is converted (if necessary) to
and its imaginary part is disregarded.
Although this intrinsic is not standard Fortran,
it is a popular extension offered by many compilers
DOUBLE COMPLEX, since it offers
the easiest way to extract the real part of a
value without using the Fortran 90
in a way that produces a return value inconsistent with
the way many FORTRAN 77 compilers handle
DOUBLE COMPLEX value.
See RealPart Intrinsic, for information on a GNU Fortran intrinsic that avoids these areas of confusion.
See Dble Intrinsic, for information on the standard FORTRAN 77
See REAL() and AIMAG() of Complex, for more information on this issue.