| 查看: 276 | 回复: 0 | ||
[求助]
读取矩阵的问题
|
|
我想要读取一个hessian.txt文件中，count=3，n*n的矩阵， 由于此文本太大，贴在附件中了 程序如下： OPEN(UNIT=3,FILE='hessian.txt',STATUS='unknown') bb2='count=' nn2=3 32 read(3,'(a6)') bbb if(bbb.eq.bb2)then backspace(3) 33 read(3,'(7x,i5)') nnn if(nnn.eq.nn2)then write(*,*) 'nnn',nnn do i=1,nvar read(3,*) j,H(i,1:nvar) enddo else goto 33 endif else goto 32 endif close(3) endif 结果就是读不出来啊？？急求高手帮我看看呗？？？ |
回复此楼» 本帖附件资源列表
-
欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com - 附件 1 : hessian.txt
2015-08-14 15:19:49, 4.41 M
» 猜你喜欢
＠_＠
已经有3人回复
-
*^O^*
已经有3人回复
-
重庆理工大学副校长遇刺身亡 传涉案副教授疑因积怨行凶
已经有6人回复
-
面上项目没有好文章就没希望了吗？
已经有20人回复
-
前几天时间戳更新了
已经有10人回复
-
困死了
已经有8人回复
-
还有课题组有博士名额吗
已经有6人回复
-
博士申请
已经有3人回复
