Next: , Previous: ADJUSTR, Up: Intrinsic Procedures


8.8 AIMAG — Imaginary part of complex number

Description:
AIMAG(Z) yields the imaginary part of complex argument Z. The IMAG(Z) and IMAGPART(Z) intrinsic functions are provided for compatibility with g77, and their use in new code is strongly discouraged.
Option:
f95, gnu
Class:
elemental function
Syntax:
X = AIMAG(Z)
Arguments:

Z The type of the argument shall be COMPLEX(*).

Return value:
The return value is of type real with the kind type parameter of the argument.
Example:
          program test_aimag
            complex(4) z4
            complex(8) z8
            z4 = cmplx(1.e0_4, 0.e0_4)
            z8 = cmplx(0.e0_8, 1.e0_8)
            print *, aimag(z4), dimag(z8)
          end program test_aimag
     

Specific names:

Name Argument Return type Option
DIMAG(Z) COMPLEX(8) Z REAL(8) f95, gnu
IMAG(Z) COMPLEX(*) Z REAL(*) gnu
IMAGPART(Z) COMPLEX(*) Z REAL(*) gnu