| 查看: 1120 | 回复: 13 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】关于fortran编程的
|
|||
|
这是我有fortran编写的一个程序，就是执行不出来，请哪位高手指点一下是那个地方出错了，老是提示有一个错误 PROGRAM SUBROUTINE FAC(I) COMMON RO(0:49) RO(0)=1 DO 1 I1=1,I RO(I1)=RO(I1-1)*I1 1 CONTINUE RETURN END c 谢谢！ [ Last edited by 忘尘天空 on 2009-2-9 at 17:20 ] |
回复此楼» 猜你喜欢
面上再次挂了，太难了，躺也躺不了，倦也卷不过，小学校之殇！
已经有25人回复
-
2026年国自然面上资助率
已经有22人回复
-
面上提前没消息，有中的吗
已经有15人回复
-
基础研究怎么拉横向，学校到款任务越来越多，难以完成 拉横向，都有哪些途径啊
已经有12人回复
-
这种情况还有戏吗
已经有12人回复
-
微信指数没变化，科研之友没阅读
已经有19人回复
-
准备明年的基金了
已经有7人回复
-
2027年申博
已经有3人回复
-
一个有机合成实验室都需要哪些设备？
已经有7人回复
-
HXDI做水性聚氨酯乳液，是不是特别容易出渣
已经有3人回复
holiday
铁杆木虫 (正式写手)
梨园园长
- 应助: 4 (幼儿园)
- 贵宾: 0.03
- 金币: 5226.5
- 红花: 3
- 帖子: 370
- 在线: 7.3小时
- 虫号: 483311
- 注册: 2007-12-26
- 专业: 核物理
2楼2009-02-09 16:58:00
lianghust
铁杆木虫 (正式写手)
- 应助: 4 (幼儿园)
- 金币: 6353
- 散金: 1
- 帖子: 711
- 在线: 322.1小时
- 虫号: 186357
- 注册: 2006-02-16
- 性别: GG
- 专业: 理论和计算化学
3楼2009-02-09 17:01:35
4楼2009-02-09 17:29:43
5楼2009-02-09 17:31:48
holiday
铁杆木虫 (正式写手)
梨园园长
- 应助: 4 (幼儿园)
- 贵宾: 0.03
- 金币: 5226.5
- 红花: 3
- 帖子: 370
- 在线: 7.3小时
- 虫号: 483311
- 注册: 2007-12-26
- 专业: 核物理
6楼2009-02-09 17:48:40
7楼2009-02-09 18:58:45
maomao1210
金虫 (正式写手)
- 应助: 2 (幼儿园)
- 金币: 1432.8
- 散金: 242
- 红花: 16
- 沙发: 1
- 帖子: 991
- 在线: 442.1小时
- 虫号: 253215
- 注册: 2006-05-20
- 性别: MM
- 专业: 考古理论
8楼2009-02-17 15:28:33
quantumfang
至尊木虫 (职业作家)
小木虫中医研究院院长
- 应助: 0 (幼儿园)
- 金币: 31993.4
- 红花: 2
- 帖子: 3167
- 在线: 57.9小时
- 虫号: 299070
- 注册: 2006-11-20
- 性别: GG
- 专业: 凝聚态物性 II ：电子结构
★ ★
musi429(金币+2,VIP+0):多谢交流~ 2-18 01:03
musi429(金币+2,VIP+0):多谢交流~ 2-18 01:03
|
对于PROGRAM 和 SUBROUTINE 两个关键词，二者不能在同一个过程里面同时存在 或者是PROGRAM，或者是SUBROUTINE， 而且，PROGRAM要有个名字，例如 PROGRAM portal IMPLICIT none return end PROGRAM portal 语法最好严禁 例如：最后一行END结束什么？如果涉及到f90 module用法这会出问题 提倡使用f90方式。 例如： DO I1=1,I RO(I1)=RO(I1-1)*I1 enddo 隐含变量类型不被推荐。 尽管f77的代码可能会比f90的快那么一点点，但是f77很严格。f90除了自由之外，还加入了很多适合并行的特性 |
9楼2009-02-18 00:19:40
argo
铁杆木虫 (著名写手)
上善若水
- 应助: 4 (幼儿园)
- 金币: 9672.8
- 散金: 200
- 红花: 34
- 帖子: 1940
- 在线: 486.4小时
- 虫号: 507533
- 注册: 2008-02-19
- 性别: GG
- 专业: 凝聚态物性 II ：电子结构
10楼2009-02-18 09:30:17