| 查看: 1182 | 回复: 7 | |||
astringent铜虫 (著名写手)
|
[交流]
【求助】请教编译过程中的两个问题【已完结】 已有3人参与
|
|
我在编译的时候遇到下面几个问题，请大家帮忙看看 （1）我在程序中写的是 do i=1，n if (条件1) then ----- elseif (条件2) then ------ elseif (条件3) then ------ endif if（条件4）A=1 enddo 但在编译时出现下面的错误： endif 1 Error: Expecting END DO statement at (1) 这是为什么呢？ （2）我在调用子程序test（nattot）时，遇到下面的错误 double precision :: xxx(nattot),yyy(nattot),zzz(nattot) 1 Error: Variable 'nattot' cannot appear in the expression at (1) 我在子程序test中，只声明了nattot是整型并没有赋值，但是在主程序中我声明nattot是整型，并且赋值了interger：：nattot=10.难道需要将nattot用parameter定义？ [ Last edited by nono2009 on 2010-11-17 at 09:52 ] |
回复此楼» 猜你喜欢
» 本主题相关价值贴推荐，对您同样有帮助:
【求助】请教如何在超算上运行fortran程序
已经有4人回复
- 【求助】请教在超算上运行fortran程序的具体方法
已经有1人回复
- 【求助】vasp5.2异常退出的问题
已经有16人回复
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
2楼2010-11-13 11:23:41
ykwang
金虫 (正式写手)
- 程序强帖: 2
- 应助: 0 (幼儿园)
- 金币: 3171.7
- 红花: 1
- 帖子: 639
- 在线: 386.4小时
- 虫号: 500302
- 注册: 2008-02-13
- 专业: 理论和计算化学
3楼2010-11-13 12:19:59
astringent
铜虫 (著名写手)
- 应助: 16 (小学生)
- 金币: 2210.7
- 散金: 1233
- 红花: 4
- 帖子: 1180
- 在线: 354.8小时
- 虫号: 900839
- 注册: 2009-11-12
- 专业: 理论和计算化学
4楼2010-11-13 18:09:58
ykwang
金虫 (正式写手)
- 程序强帖: 2
- 应助: 0 (幼儿园)
- 金币: 3171.7
- 红花: 1
- 帖子: 639
- 在线: 386.4小时
- 虫号: 500302
- 注册: 2008-02-13
- 专业: 理论和计算化学
5楼2010-11-13 18:51:08
astringent
铜虫 (著名写手)
- 应助: 16 (小学生)
- 金币: 2210.7
- 散金: 1233
- 红花: 4
- 帖子: 1180
- 在线: 354.8小时
- 虫号: 900839
- 注册: 2009-11-12
- 专业: 理论和计算化学
6楼2010-11-14 01:28:50
ykwang
金虫 (正式写手)
- 程序强帖: 2
- 应助: 0 (幼儿园)
- 金币: 3171.7
- 红花: 1
- 帖子: 639
- 在线: 386.4小时
- 虫号: 500302
- 注册: 2008-02-13
- 专业: 理论和计算化学
7楼2010-11-14 02:17:49
astringent
铜虫 (著名写手)
- 应助: 16 (小学生)
- 金币: 2210.7
- 散金: 1233
- 红花: 4
- 帖子: 1180
- 在线: 354.8小时
- 虫号: 900839
- 注册: 2009-11-12
- 专业: 理论和计算化学
8楼2010-11-14 05:26:14
