| 查看: 246 | 回复: 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
» 猜你喜欢
情人节自我反思：在爱情中有过遗憾吗？
已经有7人回复
-
基金正文30页指的是报告正文还是整个申请书
已经有5人回复
-
今年春晚有几个节目很不错，点赞！
已经有6人回复
-
过年走亲戚时感受到了所开私家车的鄙视链
已经有5人回复
