研究室の過去のF77数値計算ライブラリを引き継ぐことになって、g77だと走るけど
ifc (ver.9)だと実行時にエラーになるコードがあって質問させてくらさい。

原因は

open(3, file='xyz.dat', status='old')
中略
read (3,*,end=120) x,y,z

という文で、file endに達したときに 行番号120に飛ばないで落ちるという
ことくらいまでしかわかっていません。

ifort -check -traceback

で調べてみると、上記read文で
Program received signal SIGSEGV, Segmentation fault.
0x08087a80 in for__io_return ()
となって止まります。
最近ずっとMATLABでヘタレコーディングに慣れきっていて、goto文とか見るのが
数年ぶりで萎えてます。