aimag(3I)

NAME
     AIMAG, IMAG, DIMAG, QIMAG - Returns imaginary part of a complex number

SYNOPSIS
     AIMAG ([Z=]z)
     IMAG ([Z=]z)
     DIMAG ([Z=]z)
     QIMAG ([Z=]z)

STANDARDS
     Fortran

     Fortran extensions:  IMAG, DIMAG, QIMAG

DESCRIPTION
     AIMAG, IMAG, DIMAG, and QIMAG return the imaginary part of a complex
     number.  AIMAG is the generic function name; the others are specifics.
     These are elemental intrinsic functions.  IMAG is a nonstandard
     intrinsic elemental function and is a synonym for AIMAG.  These
     functions accept the following argument:

     x         Must be of type single-precision complex, double-precision
               complex, or quad-precision complex.  See the RETURN VALUES
               section for information on input data types and return
               values.

               The terms single precision, double precision, and quad
               precision differ depending on your platform.  For
               platform-specific information, see the TERMINOLOGY section
               of the INTRO_INTRIN(3I) man page.

     These functions evaluate y = xi, where z = xr,xi.

NOTES
     The AIMAG intrinsic function name can be passed as an argument; the
     others cannot.

RETURN VALUES
     AIMAG and IMAG return the imaginary part of their complex arguments.

     DIMAG returns the double-precision imaginary part of its
     double-precision complex argument.

     QIMAG returns the quad-precision imaginary part of its quad-precision
     complex argument.

EXAMPLES
     The following program gives the imaginary part of the complex number
     (1.0,2.0).  After running the program, RESULT = 2.0.

          PROGRAM AIMTEST
          REAL RESULT
          RESULT=AIMAG( (1.0,2.0) )
          PRINT *, RESULT
          STOP
          END