fortranでテキストデータ読込できない。教えて下さい。
fortran95(g95)を使用しています。
以下のようなテキストファイルを読み込みたいのですができません。
a.txtの中身
-------------------------
0.000000 -11084.0 1.940757E-03
0.000000 -11059.6 6.324515E-04
0.000000 -11035.2 2.825573E-02
0.000000 -11010.7 1.419570E-03
--------------------------
----と-----の間のデータです。
最初に空白が3つ
次に8桁の実数
次に空白が1つ
次に8桁の実数（マイナス記号含む）
次に空白が2つ
最後に12桁の実数（指数含む）
となっています。
real :: z(3,4)
open(1,FILE='a.txt')
do j = 1, 4
read(1,1000,end=99)(z(k,j), k=1,3)
enddo
99 continue
close(1)
1000 format(F11.6,F9.1,E14.6)
上記のようなコードを作成しています。
do j = 1,4
write(*,*) (z(k,j),k=1,3)
enddo
上記のように出力させると
0. 0. 0.
0. 0. 0.
0. 0. 0.
0. 0. 0.
となります。
よくわからない。
分かる方、教えて下さい。
お願いします。
