1

x、y、z の 3 つの配列があります。これらを、文字「C」を前に付けてファイルに出力したい:

write(88,FMT1) 'C',(x(i),y(i),z(i),i=1,187)

FMT1 は次のように定義されます: character(len=10) :: FMT1='(A,3f12.6)'

プログラムを実行すると、次の出力が得られます。

C   -1.084900    0.336400    1.074500
I���    0.365700   -3.548800    0.591000
�Ty@   -0.383200    1.417100    3.416700

等

ubuntu 12.04でgfortranを使用しています。

4

2 に答える 2

1 
write(88,'(a,3f12.6)') (('C',x(i),y(i),z(i)),i=1,187)
于 2013-02-26T18:56:04.260 に答える
1

文字「C」も繰り返す必要があります。

write(88, FMT1) ('C', x(i), y(i), z(i), i = 1, 187)
于 2013-02-26T18:56:16.517 に答える