24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 2360  |  回复: 6

lx_PICO

铁虫 (正式写手)

[交流] for77里if 后面跟数字的格式是什么意思? 已有3人参与

if (j-nc(k)) 22,21,22
21            kk=nc(k-1)+1
        go to 23
22      continue

22,21,22,是指逻辑为真后的执行顺序?以前都是看的f90,没见过这样的格式
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询


小木虫: 金币+0.5, 给个红包,谢谢回帖
这个叫算数if语句 (IF - Arithmetic)
如果 j-nc(k) < 0 就 goto 22
如果 j-nc(k) = 0 就 goto 21
如果 j-nc(k) > 0 就 goto 22

这个f90 也承认的,用的人比较少。因为有了if-else then block, 实际上不需要这个。
2楼2015-05-30 14:52:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lx_PICO

铁虫 (正式写手)

引用回帖:
2楼: Originally posted by pippi6 at 2015-05-30 14:52:32
这个叫算数if语句 (IF - Arithmetic)
如果 j-nc(k) < 0 就 goto 22
如果 j-nc(k) = 0 就 goto 21
如果 j-nc(k) > 0 就 goto 22

这个f90 也承认的,用的人比较少。因为有了if-else then block, 实际上不 ...

哦,是早期版本的fortran语法吧?我百度都找不到相关资料,for77的书也没说这种用法,请问哪里能看到相关的资料?谢谢了
3楼2015-05-30 16:11:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询


小木虫: 金币+0.5, 给个红包,谢谢回帖
引用回帖:
3楼: Originally posted by lx_PICO at 2015-05-30 16:11:58
哦,是早期版本的fortran语法吧?我百度都找不到相关资料,for77的书也没说这种用法,请问哪里能看到相关的资料?谢谢了...

fortran help for CVF
look for IF - Arithmetic
4楼2015-05-30 16:36:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询


小木虫: 金币+0.5, 给个红包,谢谢回帖
引用回帖:
4楼: Originally posted by pippi6 at 2015-05-30 16:36:44
fortran help for CVF
look for IF - Arithmetic...

查help,这是学习Fortran的最好办法

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : DFMAIN.CHM
  • 2015-05-30 16:43:14, 3.6 M
5楼2015-05-30 16:43:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

seanbsd

木虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
这个只能去看Fortran77的帮助文件了,有些平台版本有差异,未必是对问题最合适的解答。
6楼2015-06-04 13:17:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bingo555

禁虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
本帖内容被屏蔽

7楼2015-06-07 20:26:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lx_PICO 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 070300化学求调剂 +14 小黄鸭宝 2026-03-30 14/700 2026-04-02 10:07 by oooqiao
[考研] 266求调剂 +10 阳阳哇塞 2026-04-01 10/500 2026-04-02 09:07 by vgtyfty
[考研] 考研调剂 +12 Amber00 2026-03-31 12/600 2026-04-02 09:04 by sanrepian
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +8 哇呼哼呼哼 2026-04-01 8/400 2026-04-01 21:41 by cal0306
[考研] 286求调剂 +5 lim0922 2026-03-26 5/250 2026-04-01 19:08 by 客尔美德
[考研] 294分080500材料科学与工程求调剂 +15 柳溪边 2026-03-26 16/800 2026-04-01 17:07 by 七度不信任
[硕博家园] 考研调剂 +5 骆驼男人 2026-04-01 5/250 2026-04-01 14:28 by syjjj0321
[论文投稿] chinese chemical letters英文版投稿求助 120+4 Yishengeryi 2026-03-30 5/250 2026-04-01 14:11 by 陆小果画大饼
[考研] 086000生物与医药298调剂求助 +4 元元青青 2026-03-31 6/300 2026-04-01 11:13 by syh9288
[考研] 322求调剂 +8 三水sss 2026-04-01 8/400 2026-04-01 10:19 by 唐沐儿
[考研] 301求调剂 +8 axibli 2026-04-01 8/400 2026-04-01 09:51 by 我的船我的海
[考研] 333求调剂 +4 阿科逸 2026-03-31 4/200 2026-04-01 09:11 by jp9609
[考研] 309分085801求调剂 +7 学员Gtwj7W 2026-03-31 7/350 2026-04-01 02:36 by BruceLiu320
[考研] 材料与化工272求调剂 +25 阿斯蒂芬2004 2026-03-28 25/1250 2026-03-31 16:27 by hypershenger
[考研] 0703化学 +20 妮妮ninicgb 2026-03-27 20/1000 2026-03-31 13:33 by 无际的草原
[考研] 调剂求院校招收 +7 鹤鲸鸽 2026-03-28 7/350 2026-03-31 11:21 by oooqiao
[考研] 哈尔滨工业大学材料与化工专硕378求调剂 +3 塔比乌斯 2026-03-30 3/150 2026-03-30 22:55 by 无际的草原
[考研] 0703化学321分求调剂 +10 三dd. 2026-03-30 11/550 2026-03-30 19:24 by markhwc
[考研] 本科新能源科学与工程,一志愿华理能动285求调剂 +7 AZMK 2026-03-28 11/550 2026-03-28 21:01 by xxxsssccc
[考研] 材料与化工(0856)304求B区调剂 +8 邱gl 2026-03-27 8/400 2026-03-28 12:42 by 唐沐儿
信息提示
请填处理意见