>>351
とりあえず教科書か↓のページを開いて IF文と論理式について復習するんだ。
http://www.str.ce.akita-u.ac.jp/~gotou/zyouhou/f90/sec3.html#sec3

Fortran90以降が使えるのなら IF文ではなく、SELECT CASE文で書いた方が
きれいに書けるかも。