fortran if文

質問

fortranのif文で、以下の様に場合わけしてプログラムしたのですが、
このようなエラー文が出ます。どう対処したらいいのか教えて下さい。

Error: An unterminated block exists.

プログラム↓
if(-0.5d0.LE.theta.LE.0.0d0) then
eta=2
if(0.0d0.LT.theta.LT.0.5d0) then
eta=5
if(0.5.LE.theta.LE.1.0d0) then
eta=3

場合わけの範囲指定の仕方が不味いのではないかと思っていますが、
どうしていいものかわからず・・
皆様のお力を貸して下さい。

回答No.1

asuncion · ベストアンサー

たぶん、こういうことではないでしょうか。

if(-0.5d0.LE.theta.LE.0.0d0) then
eta=2
else if(0.0d0.LT.theta.LT.0.5d0) then
eta=5
else if(0.5.LE.theta.LE.1.0d0) then
eta=3
end if

お礼

うまいこといきました☆
ありがとうございます♪

回答No.2

Tacosan

ついでにいうと if の条件もおかしい気がする.
.LE. などの比較演算子は non-associative だったと思うんだが.