Clicky
Showing changes from revision #2 to #3:
(追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)
precision(x)
returns the decimal precision in the model of the type of x
.
Fortran 95 and later
(削除) Inquiry function (削除ここまで)(追記) Inquiry function (追記ここまで)
result = precision(x)
x
- Shall be of type real
or complex
.The return value is of type integer
and of the default integer kind.
program prec_and_range
real(kind=4) :: x(2)
complex(kind=8) :: y
print *, precision(x), range(x)
print *, precision(y), range(y)
end program prec_and_range