Next: AINT, Previous: ADJUSTR, Up: Intrinsic Procedures [Contents][Index]
AIMAG
— Imaginary part of complex numberAIMAG(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.
Fortran 77 and later, has overloads that are GNU extensions
Elemental function
RESULT = AIMAG(Z)
Z | The type of the argument shall be COMPLEX . |
The return value is of type REAL
with the
kind type parameter of the argument.
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
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 |