读文件问题？

quartzbj · 发表于 2005-7-8 15:46

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？我要加入

x

数据文件(a.0)如下:
NEQ,NX,NY,NSTEN 3 20 53 4 COEF. MATRIX CC(NEQ*NEQ,(NXX+2)*(NYY+2)) ((CC(K,I,J),K=1,9),I=1,im+2),j=1,jm+2) 1. 0. 0. 0. 1. 0. 0. 0. 1. 1. 0. 0. 0. 1. 0. 0. 0. 1. 1. 0. 0. 0. 1. 0. 0. 0. 1. (部分忽略)
51.7351588 -0.0237233664 -0.000252668768 -0.0237233664 49.6040083 0. -0.000252668768 0. 3859.02479 51.7257063 -0.0237674169 -0.000253089232 -0.0237674169 49.6042068 0. -0.000253089232 0. 3845.3221 (要读入的)
0. 0. 0.
0. 0. 0. (忽略)
51.7351588 -0.0237233664 -0.000252668768 -0.0237233664 49.6040083 0. -0.000252668768 0. 3859.02479 51.7257063 -0.0237674169 -0.000253089232 -0.0237674169 49.6042068 0. -0.000253089232 0. 3845.3221 (要读入的)
高手帮忙写一下程序!谢谢!

aspen · 发表于 2005-7-8 16:23

不知道你用什么语言，我一般用的是fortran
要读入的用read(unit,format)，不读入的行用read(unit,'(n/)')跳过，根据你数据文件的格式写一下就行，很简单的，命令如果不熟悉的话参考fortran里的帮助，写得很详细

[此贴子已经被作者于2005-7-8 17:58:52编辑过]

FSI · 发表于 2005-7-8 16:56

rewind 是回到文件起始位置，肯定不能用在这里
读入数据一般按'行'来读就行了，没什么问题。要忽略或者部分忽略的数据，它们的特点你肯定都知道，根据这些特点来读数据，试试吧。

aspen · 发表于 2005-7-8 17:58

<DIV class=quote>以下是引用FSI在2005-7-8 16:56:50的发言： 
rewind 是回到文件起始位置，肯定不能用在这里
读入数据一般按'行'来读就行了，没什么问题。要忽略或者部分忽略的数据，它们的特点你肯定都知道，根据这些特点来读数据，试试吧。</DIV> [em04]是我一开始搞错了,现已修改

[此贴子已经被作者于2005-7-8 19:30:41编辑过]

quartzbj · 发表于 2005-7-9 20:36

<DIV class=quote>以下是引用aspen在2005-7-8 16:23:29的发言： 
不知道你用什么语言，我一般用的是fortran
要读入的用read(unit,format)，不读入的行用跳过，根据你数据文件的格式写一下就行，很简单的，命令如果不熟悉的话参考fortran里的帮助，写得很详细 </DIV>
read(unit,'(n/)')编译时有错误,使用read(unit,'(/)')倒是可以,但是跳过两行. 
怎么可以跳过一行那.?

[此贴子已经被aspen于2005-7-9 21:09:19编辑过]

aspen · 发表于 2005-7-9 21:09

<DIV class=quote>以下是引用quartzbj在2005-7-9 20:36:32的发言： 
read(unit,'(n/)')编译时有错误,使用read(unit,'(/)')倒是可以,但是跳过两行. 
怎么可以跳过一行那.? </DIV>

n是数字，比如你要向下跳三行那就是read(unit,'(2/)')
向下跳五行那就是read(unit,'(4/)')
如果是向下跳一行，那read(unit,'( )')，注意'( )'中间是一个空格

账号		自动登录	找回密码
密码			我要加入

[Fortran] 读文件问题？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。