Below is a sample of a code that runs with Intel but not GFORTRAN.
Writing a real in binary format is an extension of the Fortran standard.
My Question:
What is the best way to do this?
How do you extract the binary of a real for printing?
Thank you.
IMPLICIT NONE
integer :: ii = 1
real :: xx = 1.0e00
write(*,'(1x, a7, 1x, b32.32)') ' ii = ', ii
! next line runs with IVF but not GFORTRAN
write(*,'(1x, a7, 1x, b32.32)') ' xx = ', xx
end
Writing a real in binary format is an extension of the Fortran standard.
My Question:
What is the best way to do this?
How do you extract the binary of a real for printing?
Thank you.
IMPLICIT NONE
integer :: ii = 1
real :: xx = 1.0e00
write(*,'(1x, a7, 1x, b32.32)') ' ii = ', ii
! next line runs with IVF but not GFORTRAN
write(*,'(1x, a7, 1x, b32.32)') ' xx = ', xx
end
