ＳＥＬＥＣＴＥＤ＿ＲＥＡＬ＿ＫＩＮＤ
copyright

green dotＳＥＬＥＣＴＥＤ＿ＲＥＡＬ＿ＫＩＮＤ

書式 SELECTED_REAL_KIND([P][,R])
機能 有効けた数P、指数範囲Rを指定すると実数型の種別型パラメタを戻す 関数である。
有効けた数、指数範囲を満足する種別型パラメタが複数あるときは、 精度が最小である種別型パラメタを戻す。
引数 少なくとも１つの引数は、指定しなければならない。
P(省略可能)：整数型
R(省略可能)：整数型
戻り値 型、種別型パラメタは基本整数型である。

green dotサンプルプログラム

実数の取り扱う精度を約10けた以上にする。 
    INTEGER,PARAMETER :: dp=SELECTED_REAL_KIND(10)
    REAL(KIND=dp) :: x,f           ! 種別型パラメタdpの変数
    x=3.141592653589793_dp         ! 種別型パラメタdpの定数
    f=SIN(x/4.0_dp)+COS(x/4.0_dp)  ! 種別型パラメタdpの計算
    WRITE(*,*) f


実行例

    1.4142135623…
line-end