Next: FLOOR, Previous: FGETC, Up: Intrinsic Procedures
FLOAT
— Convert integer to default realFLOAT(I)
converts the integer I to a default real value.
RESULT = 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