Fortran コンパイルエラーについて

Fortranでコンパイルを行ったところ下記のエラーが発生し、原因がわからずにいます。
Fortranに関しては全くの初心者です。

コマンドプロンプト -----------------

C:\>g95 aaa.f90
Warning(115):Line 100 of aaa.f90 is being truncated
In file aaa.f90:100

　else if(hnum(mnum(ic-1,jc-1)) .eq. 45 .and. basin_num(nr) .eq. anum(mnum(ic-1,jc-1)) .and. znum(mnum(ic-1,jc-1)) .eq. 'obs') then
1
Error:Unexpected junk after ELSE statement at (1)

aaa.f90ファイルは他の方が作成したものでそのaaa.exeもあるので、見よう見まねで
Fortranをインストールし、試みましたがエラーでEXEが作成されませんでした。

Fortranはｖ4.1.2（g95 0.93)、使用しているOSはWindows7Professional（32ビット）です。

エラーがでている行のコードしか記述できず申し訳ないのですが、エラーの意味だけでも教えていただけますでしょうか。

ご教示頂きますようよろしくお願いします。

No.1 ベストアンサー 回答者： f272 回答日時： 2011/06/29 12:18

Line 100 of aaa.f90 is being truncated

ということは100行目が途中(132カラム)までしか読み込まれていません。
したがってelse if文が完結せずにわけのわからない文になっているわけです。

else if(hnum(mnum(ic-1,jc-1)) .eq. 45 .and. basin_num(nr) .eq. anum(mnum(ic-1,jc-1)) .and. znum(mnum(ic-1,jc-1)) .eq. 'obs') then

これをたとえば

else if(hnum(mnum(ic-1,jc-1)) .eq. 45 .and. basin_num(nr) .eq. anum(mnum(ic-1,jc-1)) &
& .and. znum(mnum(ic-1,jc-1)) .eq. 'obs') then

と2行に分ければうまくいくでしょう。

この回答へのお礼

本当に本当にありがとうございます＞＜。。
エラーの詳細まで教えていただきありがとうございました。

お礼日時：2011/06/29 12:36