Node: RealPart Intrinsic, Next: Rename Intrinsic (subroutine), Previous: Real Intrinsic, Up: Table of Intrinsic Functions
RealPart(Z)
RealPart: REAL function, the KIND= value of the type being that of argument Z.
Z: COMPLEX; scalar; INTENT(IN).
Intrinsic groups: gnu.
Description:
The real part of Z is returned, without conversion.
Note: The way to do this in standard Fortran 90
is REAL(Z).
However, when, for example, Z is COMPLEX(KIND=2),
REAL(Z) means something different for some compilers
that are not true Fortran 90 compilers but offer some
extensions standardized by Fortran 90 (such as the
DOUBLE COMPLEX type, also known as COMPLEX(KIND=2)).
The advantage of REALPART() is that, while not necessarily
more or less portable than REAL(), it is more likely to
cause a compiler that doesn't support it to produce a diagnostic
than generate incorrect code.
See REAL() and AIMAG() of Complex, for more information.