- くだすれFORTRAN(超初心者用)その6
733 :デフォルトの名無しさん[sage]:2015/01/27(火) 15:08:58.38 ID:TDQ9+ev7 - >>730
もう解決しているかも知れないけれど、処理系がFortran2008と4倍精度をサポートしていれば iso_fortran_envモジュールのreal128という定数を使う言語仕様に準拠した方法がある。 program qfloat use iso_fortran_env implicit none real(kind = real128) :: q q = 1 / exp(1.0_real128) print *, q end program qfloat
|
|