AIMAG — Imaginary part of complex number#

AIMAG(Z)#

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.

Parameters:: Z – The type of the argument shall be COMPLEX.
Returns:: The return value is of type REAL with the kind type parameter of the argument.

Standard:

Fortran 77 and later, has overloads that are GNU extensions

Class:

Elemental function

Syntax:

RESULT = AIMAG(Z)

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`	Fortran 77 and later
`DIMAG(Z)`	`COMPLEX(8) Z`	`REAL(8)`	GNU extension
`IMAG(Z)`	`COMPLEX Z`	`REAL`	GNU extension
`IMAGPART(Z)`	`COMPLEX Z`	`REAL`	GNU extension