1

我有三个数组，x，y，z。我想将这些打印到前面带有字符“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 回答