### 8.10 `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.
Standard:
  Fortran 77 and later, has overloads that are GNU extensions
Class:
  Elemental function
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