DREAL(Z)
returns the real part of complex variable Z.
GNU extension
Elemental function
RESULT = DREAL(A)
A | The type shall be COMPLEX(8) . |
The return value is of type REAL(8)
.
program test_dreal complex(8) :: z = (1.3_8,7.2_8) print *, dreal(z) end program test_dreal
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-7.2.0/gfortran/DREAL.html