次のコマンドを使用して、初期データ ファイルを fortran 90 プログラムに読み込もうとしています。
!---- 初期データファイルを開く ----
open(50,file=FILE_INITIAL)!---- 読み取りステータス ----
read(50,'(a3)') tmp3
最初の行を読み取ろうとすると、次のエラーが発生します。
Fortran ランタイム エラー: ファイルの終わり
「end=」ステートメントでこれを修正できますが、次のデータ行を読み取ることができません。
このコードは別のサーバーではうまく機能しましたが、実行しようとしている別のサーバーは機能していないことに注意してください。
ファイルの内容は次のとおりです。
CNT $
0.0000000E+00 $
105000 $
1 1 0.6000000E+19 0.2302255E+06 -0.8082365E+06 -0.1359744E+07 -0.1569188E+03 0.1889497E+ 0.0000000E+00 0.1317501E+07 $
2 1 0.600000000E+19 0.4091322E+06 -0.7740022E+06 -0.1390028E+07 -0.1547697E+03 0.1907412E+03 0.105918E+0642E+0642E+062E 0000000E+00 0.132030302E+07 $
3 1 0.600000000E+19 0.5670843E+06 -0.7934081E+06 -0.1364818E+07 -0.1560887E+03 0.1897379E+03 0.145752060052060055206457052 0.0000000E+00 0.1214425E+07$