|
for 是字符串,值是 '(??(1x,f6.3))'
for(2:3) 表示子字符串,从第二个字符到第三个字符。即 ??
write( for(2:3) 是把上述的两个问号替换为 n 的值。比如 n = 30,则替换后,for 的值为 '(30(1x,f6.3))'
write( * , fmt=for) matrix(i,:)
等效于
write( * , for ) matrix(i,:)
根据上面的假设,则等效于
write(*,100) matrix(i,:)
100 format(30(1x,f6.3))
n是第二维,你说他是行也行,是列也行。(看你自己的规定) |
|