imag(3F)

NAME
     imag, aimag, dimag, qimag - FORTRAN imaginary part of complex argument

SYNOPSIS
     real r
     complex cxr
     double precision dp
     double complex cxd
     real *16 qp
     complex*32 cxq

     r = aimag(cxr)
     r = imag(cxr)

     dp = dimag(cxd)
     dp = imag(cxd)

     qp = qimag(cxq)
     qp = imag(cxq)

DESCRIPTION
     aimag returns the imaginary part of its single-precision complex
     argument.  dimag returns the double-precision imaginary part of its
     double-complex argument.  qimag returns the real*16 imaginary part of its
     complex*32 argument.  The generic form imag may be used with impunity as
     its argument will determine the type of the returned value.