DIGITS |
書式 | DIGITS(X) |
機能 | 引数Xと同じ型および同じ種別型パラメタの数体系の 有効けた数(表1のq、表2のpの値)を求める。 |
引数 | X:整数型、実数型でスカラまたは配列 |
戻り値 | 型、種別型パラメタは基本整数型で、形状はスカラである。 |
INTEGER,PARAMETER :: k=SELECTED_INT_KIND(10) INTEGER,PARAMETER :: dp=SELECTED_REAL_KIND(10) INTEGER :: i !基本整数型の変数 INTEGER(KIND=k) :: j !種別型パラメタkの変数 REAL :: x !基本実数型の変数 REAL(KIND=dp) :: y !種別型パラメタdpの変数 WRITE(*,*) DIGITS(i) !基本整数型の有効桁数q [例] 31 WRITE(*,*) DIGITS(j) !種別型kの有効桁数q [例] 63 WRITE(*,*) DIGITS(x) !基本実数型の有効桁数p [例] 24 WRITE(*,*) DIGITS(y) !種別型dpの有効桁数p [例] 53
r | 2以上の整数 | |
q | 正の整数 | |
0以上r未満 | ||
s | +1または-1 |
b,p | 2以上の整数 | |
0以上b未満(f1≠0) | ||
s | +1または -1 | |
e | 最小値の整数eminから最大値の 整数 emaxまでの間の整数 |