读取和写入已包装到指定列数(本示例中为10列)的矢量数据(1维)的最佳方法是什么。
integer : data(100)
DATA (node)
11 12 13 14 15 16 17 18 19 20
20 21 23 34 35 31 91 32 31 34
11 12 13 14 15 16 17 18 19 20
11 12 13 14 15 16 17 18 19 20
21 34 31 34
我基本上想要读取这些数据并将其保存为1D向量。和副Versa(即以包裹的格式写出数据。干杯。尼尔
答案 0 :(得分:2)
已解决:它基本上只是列循环中的读取语句
read(7,*)(data(node),node=1,maxnodes)
并写下来:
write(7,10i10)(data(node),node=1,maxnodes)