| 查看: 1261 | 回复: 14 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
lon91ong木虫 (初入文坛)
|
[交流]
请教一下这样的程序逻辑分支用Fortran怎么写更高效呢？
|
||
|
在C语言中都是用select case做下面的分支的，但是fortran中的select case跟C的似乎有所不同，分支图如下： 情况1--->流程入口1 | ↓ 情况2--->流程入口2 | ↓ 情况3--->流程入口3 | ↓ default--->流程入口4 | ↓ 流程结尾 具体而言，fortran中的select case的每一条case都类似于C中的case... break; 而无 break的情况不知该怎么写更高效一些 请教大侠 |
回复此楼» 猜你喜欢
AI论文写作工具：是科研加速器还是学术作弊器？
已经有5人回复
-
Bioresource Technology期刊，第一次返修的时候被退回好几次了
已经有8人回复
-
寻求一种能扛住强氧化性腐蚀性的容器密封件
已经有7人回复
-
到新单位后，换了新的研究方向，没有团队，持续积累2区以上论文，能申请到面上吗
已经有8人回复
-
申请2026年博士
已经有6人回复
-
请问哪里可以有青B申请的本子可以借鉴一下。
已经有5人回复
-
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有5人回复
-
2025冷门绝学什么时候出结果
已经有7人回复
-
请问有评职称，把科研教学业绩算分排序的高校吗
已经有6人回复
-
康复大学泰山学者周祺惠团队招收博士研究生
已经有6人回复
锐利的碎片
木虫 (正式写手)
star watcher
- 应助: 136 (高中生)
- 金币: 3637.1
- 散金: 252
- 红花: 22
- 帖子: 988
- 在线: 1224.9小时
- 虫号: 961933
- 注册: 2010-03-05
- 专业: 凝聚态物性 II ：电子结构
★ ★ ★
小木虫: 金币+0.5, 给个红包，谢谢回帖
lon91ong: 金币+2, 靠谱的交流 2014-12-12 14:54:32
小木虫: 金币+0.5, 给个红包，谢谢回帖
lon91ong: 金币+2, 靠谱的交流 2014-12-12 14:54:32
|
fortran的select case里面是可以写多个值的 program main implicit none integer i do i = 1, 10 select case(i) case(1,2,3) print *,"Bingo" case default print *,"Oops" end select end do end program main 所以C的那种形式不太必要 详细的参考http://www.cs.mtu.edu/~shene/COU ... /chap03/select.html |
11楼2014-12-12 07:18:34
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
3楼2014-12-10 07:24:55
lon91ong
木虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 3771.1
- 散金: 18
- 帖子: 47
- 在线: 28.7小时
- 虫号: 597382
- 注册: 2008-09-09
- 性别: GG
- 专业: 声学
6楼2014-12-10 10:39:36
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
7楼2014-12-10 14:30:30