求助一个文件读写的问题

liux578 · 发表于 2015-8-17 20:27:01

如图所示的数据文件，我想用fortran把X Y Z对应下面的数据存入到一个数组中和写入到一个文件中，要求只存X Y Z的数据（坐标），其他的不要，请问该怎么操作？多谢指导

liux578 · 发表于 2015-8-17 21:23:43

非常感谢

liux578 · 发表于 2015-8-18 20:44:49

群主，请问怎样把读出来的数据赋值给一个数组啊

liux578 · 发表于 2015-8-18 20:45:09

楚香饭发表于 2015-8-17 20:35
[mw_shl_code=fortran,true]Program www_fcode_cn
Implicit None
Integer :: i , ierr

群主，请问怎样把读出来的数据赋值给一个数组啊

liux578 · 发表于 2015-8-18 21:55:30

百事可乐发表于 2015-8-18 21:24
[mw_shl_code=fortran,true]Program www_fcode_cn
Implicit None
Integer :: i , k , ierr , N , GetFi ...

Open(14,File="xyzn.txt")
Open(13,File="gp_pos_new.txt")
call GetFileN( 13 )
write(14,'(1E11.4E2,2E12.4E3)')xyzn
End Program Data_Processing

运行完了，xyzn.txt还是全部为0，不知道咋回事，下午弄的也全部是0，用你这个方法还都是0

liux578 · 发表于 2015-8-19 08:26:48

vvt 发表于 2015-8-18 22:51
你乱改代码当然结果不正确

能明示么

liux578 · 发表于 2015-8-19 08:28:46

liux578 发表于 2015-8-19 08:26
能明示么

我再好好看看

liux578 · 发表于 2015-8-19 08:54:58

百事可乐发表于 2015-8-18 21:24
[mw_shl_code=fortran,true]Program www_fcode_cn
Implicit None
Integer :: i , k , ierr , N , GetFi ...

群主，是我搞错了，多谢

[文件读写] 求助一个文件读写的问题