| 查看: 990 | 回复: 7 | |||
| 当前主题已经存档。 | |||
gongxd325至尊木虫 (文坛精英)
|
[交流]
【求助】Fortran读字符串出错【已完成】
|
||
|
Fortran语句读一个文档中的字符时遇到的奇怪问题 CHARACTER TT*80 READ(1,'(A80)') TT 当字符TT以"F"开头时就出错，其他字符没有问题，不知道为何？如何解决？ [ Last edited by nono2009 on 2009-10-6 at 09:13 ] |
回复此楼» 猜你喜欢
对氯苯硼酸纯化
已经有3人回复
-
求助:我三月中下旬出站，青基依托单位怎么办？
已经有12人回复
-
不自信的我
已经有12人回复
-
假如你的研究生提出不合理要求
已经有5人回复
-
所感
已经有4人回复
-
论文终于录用啦！满足毕业条件了
已经有28人回复
-
要不要辞职读博？
已经有7人回复
-
北核录用
已经有3人回复
-
实验室接单子
已经有3人回复
-
磺酰氟产物，毕不了业了！
已经有8人回复
2楼2009-10-05 19:19:59
3楼2009-10-05 21:54:26
gongxd325
至尊木虫 (文坛精英)
- 应助: 177 (高中生)
- 金币: 37614.6
- 散金: 13187
- 红花: 109
- 帖子: 34003
- 在线: 1844小时
- 虫号: 233962
- 注册: 2006-03-30
- 性别: MM
- 专业: 理论和计算化学
|
谢谢楼上两位。 是这样的，有一组类似于下面形式的数据，每一行上有2个数字或者1个字符串 1.0 3.0 F2.out HF.out H2.out 编了个小程序读取，首先以数据形式读A,B，假如出错，则回退一行重新以字符形式读取，语句如下： READ(1,*,err=1)A,B goto 2 1 backspace (1) READ(1,'(A)')TT OPEN(3,FILE=TRIM(ADJUSTL(TT)),STATUS='UNKNOWN') ... 2 ... 结果发现，读“F”打头的行时出错，而其他均没问题。 研究了一下，问题应该是由于以数据形式读“F”打头的字符出错时无法转向到行号1引起的，不知道该如何解决 |
4楼2009-10-05 22:54:22
gongxd325
至尊木虫 (文坛精英)
- 应助: 177 (高中生)
- 金币: 37614.6
- 散金: 13187
- 红花: 109
- 帖子: 34003
- 在线: 1844小时
- 虫号: 233962
- 注册: 2006-03-30
- 性别: MM
- 专业: 理论和计算化学
5楼2009-10-05 23:05:11
gongxd325
至尊木虫 (文坛精英)
- 应助: 177 (高中生)
- 金币: 37614.6
- 散金: 13187
- 红花: 109
- 帖子: 34003
- 在线: 1844小时
- 虫号: 233962
- 注册: 2006-03-30
- 性别: MM
- 专业: 理论和计算化学
余泽成(金币+0,VIP+0):请耐心等待，求助需设定一定金币奖励！ 10-5 23:21
|
或者先以字符形式读，再从字符中读数字，也同样出错。 PROGRAM test2 IMPLICIT REAL*8 (A-H,O-Z) CHARACTER TT*80 OPEN(1,FILE='in',STATUS='OLD',ERR=99) OPEN(2,FILE='ou',STATUS='UNKNOWN') 2 if (EOF(1)) goto 99 READ(1,'(A)')TT READ(TT,*,err=1)A,B write(2,'(2F8.2)')A,B goto 2 1 write(2,'(A)')TRIM(ADJUSTL(TT)) goto 2 99 END |
6楼2009-10-05 23:13:03
nono2009
超级版主 (文学泰斗)
No gains, no pains.
-
专家经验: +21105 - 应助: 28684 (院士)
- 贵宾: 513.911
- 金币: 2555220
- 散金: 27828
- 红花: 2147
- 沙发: 66666
- 帖子: 1602255
- 在线: 65200.9小时
- 虫号: 827383
- 注册: 2009-08-13
- 性别: GG
- 专业: 工程热物理与能源利用
- 管辖: 科研家筹备委员会
7楼2009-10-06 07:40:47
gongxd325
至尊木虫 (文坛精英)
- 应助: 177 (高中生)
- 金币: 37614.6
- 散金: 13187
- 红花: 109
- 帖子: 34003
- 在线: 1844小时
- 虫号: 233962
- 注册: 2006-03-30
- 性别: MM
- 专业: 理论和计算化学
8楼2009-10-06 08:51:43