| 查看: 266 | 回复: 4 | |||
| 当前主题已经存档。 | |||
jkr74木虫 (正式写手)
|
[交流]
【求助】这句怎么执行的？
|
||
|
有一段代码是这样的： ...................................................... IF(COORDS(2).GT.width) GOTO 1500 ELSE GOTO 1500 ENDIF H(1) = strip_h GOTO 2000 ************************************************************* CALCULATION OF STANDARD CONVECTION COEFFICIENT. 1500 ....................................................... 上面的width是一给定的常量，比如是0.5. COORDS(2).是变量。假如COORDS(2)=0.4时，会不会执行H(1) = strip_h 和 GOTO 2000呢？ 感觉不管如何H(1) = strip_h 和 GOTO 2000都不会执行 |
回复此楼» 猜你喜欢
请问哪里可以有青B申请的本子可以借鉴一下。
已经有4人回复
-
真诚求助：手里的省社科项目结项要求主持人一篇中文核心，有什么渠道能发核心吗
已经有6人回复
-
孩子确诊有中度注意力缺陷
已经有14人回复
-
三甲基碘化亚砜的氧化反应
已经有4人回复
-
请问下大家为什么这个铃木偶联几乎不反应呢
已经有5人回复
-
请问有评职称，把科研教学业绩算分排序的高校吗
已经有5人回复
-
2025冷门绝学什么时候出结果
已经有3人回复
-
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有4人回复
-
康复大学泰山学者周祺惠团队招收博士研究生
已经有6人回复
-
AI论文写作工具：是科研加速器还是学术作弊器？
已经有3人回复
hakekill
木虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 1709.3
- 帖子: 131
- 在线: 19小时
- 虫号: 246017
- 注册: 2006-04-29
- 性别: GG
- 专业: 水环境与生态水利
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
nono2009(金币+2):谢谢应助！ 2010-03-09 09:56
小木虫(金币+0.5):给个红包，谢谢回帖交流
nono2009(金币+2):谢谢应助！ 2010-03-09 09:56
|
我的理解是这样的： IF() THEN ...... IF(COORDS(2).GT.width) GOTO 1500 ELSE GOTO 1500 ENDIF 也就是说endif对应的if还在前面，只是如果endif对应的if的判断为真就执行部分程序，比如说求COORDS(2)的值，然后再对这个值做判断，如果为真，就跳到1500；如果endif对应的if为假就直接跳到1500. 对于你给的例子，对COORDS(2)与width做判断为假，则结束endif对应的if结构，接下来就执行H(1)=strip_h了 |
2楼2010-03-09 09:21:51
ftp0000
木虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 1822.1
- 帖子: 292
- 在线: 6.6小时
- 虫号: 585530
- 注册: 2008-08-08
- 专业: 凝聚态物性 II ：电子结构
3楼2010-03-09 12:16:20
jkr74
木虫 (正式写手)
- 应助: 7 (幼儿园)
- 金币: 1590.6
- 散金: 200
- 红花: 1
- 帖子: 570
- 在线: 463.3小时
- 虫号: 752697
- 注册: 2009-04-19
- 性别: GG
- 专业: 力学
|
............................................................................ C IF(JLTYP.EQ.11)THEN IF(COORDS(2).GT.width) GOTO 1500 ELSE GOTO 1500 ENDIF H(1) = strip_h GOTO 2000 ************************************************************* CALCULATION OF STANDARD CONVECTION COEFFICIENT. 1500 .............................................................................. 我开始也是这样理解的，但是上面的第一句显然是注释语句！ |
4楼2010-03-10 11:04:11
jkr74
木虫 (正式写手)
- 应助: 7 (幼儿园)
- 金币: 1590.6
- 散金: 200
- 红花: 1
- 帖子: 570
- 在线: 463.3小时
- 虫号: 752697
- 注册: 2009-04-19
- 性别: GG
- 专业: 力学
余泽成:想尽快得到回复的话可以引用上面应助者的回复！ 2010-03-10 13:19
jjdg:2000在外面，是无论如何都会跳过去的吧！ 2010-03-10 15:21
jjdg:2000在外面，是无论如何都会跳过去的吧！ 2010-03-10 15:21
|
通过仔细推敲我的理解是这样的，首先那个C可能是笔误！ 这段代码的结构是这样的： IF(JLTYP.EQ.11)THEN IF(COORDS(2).GT.width) GOTO 1500 ELSE GOTO 1500 ENDIF H(1) = strip_h GOTO 2000 ************************************************************* CALCULATION OF STANDARD CONVECTION COEFFICIENT. 1500 ......................................................................... 第一句IF(JLTYP.EQ.11)THEN 判断是肯定为真的（根据其他方面可以得到），假如 IF(COORDS(2).GT.width) 为假，就开始执行 ENDIF后面的语句了。 |
5楼2010-03-10 11:16:45