DREAL — Double real part functionDREAL(Z) returns the real part of complex variable Z. RESULT = DREAL(A) | A | The type shall be COMPLEX(8). |
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-5.4.0/gfortran/DREAL.html