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.

Syntax

RESULT = 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 Standard
AIMAG(Z) COMPLEX Z REAL GNU extension
DIMAG(Z) COMPLEX(8) Z REAL(8) GNU extension
IMAG(Z) COMPLEX Z REAL GNU extension
IMAGPART(Z) COMPLEX Z REAL GNU extension

Standard

Fortran 77 and later, has overloads that are GNU extensions

Class

Elemental function

Name	Argument	Return type	Standard
`AIMAG(Z)`	`COMPLEX Z`	`REAL`	GNU extension
`DIMAG(Z)`	`COMPLEX(8) Z`	`REAL(8)`	GNU extension
`IMAG(Z)`	`COMPLEX Z`	`REAL`	GNU extension
`IMAGPART(Z)`	`COMPLEX Z`	`REAL`	GNU extension