如何在 Fortran 中将整数值转换为实际值？

Question

我不知道如何将 4 字节整数值编码为 4 字节实数。 在C语言中... 我想做这样的事情。 浮点值 = ((float)&intValue))

我想完成以下代码......

  real function castingInt32_to_real( intValue )

  implicit none
  integer,intent(in) :: intValue
  
  !
  ! if intValue == 1065353216(0x3f800000)  Its means 1.0 on Intel.

  !I want to do following....
  castingInt32_to_real <-- 1.0
  
  end function

Answer 1

给定一个 BOZ 实体，您可以使用

real

内在子程序将其转换为实数。考虑一下，

program main
   real x
   x = real(z'3f800000', kind(1.e0))
   print *,x
end program main

用 gfortran 给出

% gfortran -o z a.f90
% ./z
   1.00000000