PRECISION |
書式 | RANGE(X) |
機能 | PRECISIONは、引数Xと同じ型および同じ種別型パラメタの 数体系における10進精度を求める。 |
引数 | X:実数型,複素数型でスカラまたは配列 |
戻り値 | 型、種別型パラメタは基本整数型で形状はスカラである。 |
INTEGER,PARAMETER :: dp=SELECTED_REAL_KIND(10) REAL :: x; REAL(KIND=dp) :: y WRITE(*,*) PRECISION(x) ![例] 6 WRITE(*,*) RANGE(x) ![例] 37 WRITE(*,*) PRECISION(y) ![例] 15 WRITE(*,*) RANGE(y) ![例] 307