PC使って便利なことをメモ
gfortranにはisnan関数がない（？）ので、if文で代用する。
aが倍精度実数のとき、こんな感じ。
if(a*0.d0 /= 0.d0) then
write(*,*) a
stop
end if
NaN*0.d0がNaNになることを利用。
aが倍精度実数のとき、こんな感じ。
if(a*0.d0 /= 0.d0) then
write(*,*) a
stop
end if
NaN*0.d0がNaNになることを利用。
PR
Comment
コメントの修正にはpasswordが必要です。任意の英数字を入力して下さい。
カレンダー
| 11 | 2024/12 | 01 |
| S | M | T | W | T | F | S |
|---|---|---|---|---|---|---|
| 1 | 2 | 3 | 4 | 5 | 6 | 7 |
| 8 | 9 | 10 | 11 | 12 | 13 | 14 |
| 15 | 16 | 17 | 18 | 19 | 20 | 21 |
| 22 | 23 | 24 | 25 | 26 | 27 | 28 |
| 29 | 30 | 31 |
カテゴリー
フリーエリア
最新コメント
最新記事
(11/12)
(11/12)
(11/06)
(11/06)
(11/06)
最新トラックバック
プロフィール
ＨＮ：
trtr
性別：
非公開
自己紹介：
メインにvineを使ってます。
ときどきubuntu。
ときどきubuntu。
バーコード
ブログ内検索
最古記事
(05/27)
(05/27)
(05/27)
(05/30)
(05/30)