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)

IMPLEMENTATION
     UNICOS, UNICOS/mk, IRIX systems

     CF90, MIPSpro 7 Fortran 90, MIPSpro Fortran 77

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 data type and kind type for single-precision,
               double-precision, and quad-precision values differ depending
               on your platform.  For platform-specific information, see
               the TERMINOLOGY section of the INTRO_INTRIN(3I) man page.

     These functions evaluate y = x , where z = x ,x .
                                   i             r  i
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

SEE ALSO
     Intrinsic Procedures Reference Manual for the printed version of this
     man page.