aimag(3f) - [FORTRAN:INTRINSIC:NUMERIC:TYPE] Imaginary part of complex number
result = 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.
Z The type of the argument shall be COMPLEX.
The return value is of type REAL with the kind type parameter of the argument.
Sample program:
program demo_aimag use, intrinsic :: iso_fortran_env, only : real_kinds, & & real32, real64, real128 implicit none complex(kind=real32) z4 complex(kind=real64) z8 z4 = cmplx(1.e0, 0.e0) z8 = cmplx(0.e0_real64, 1.e0_real64,kind=real64) print *, aimag(z4), aimag(z8) end program demo_aimag
[[FORTRAN 77]] and later
Elemental function
aimag (3) | March 11, 2021 |