Next: FLOOR, Previous: FDATE, Up: Intrinsic Procedures
FLOAT — Convert integer to default realFLOAT(I) converts the integer I to a default real value.
X = FLOAT(I)
| I | The type shall be INTEGER(*).
|
REAL
program test_float
integer :: i = 1
if (float(i) /= 1.) call abort
end program test_float