24小时热门版块排行榜

>论坛更新日志 (1870)
>虫友互识 (84)
>导师招生 (31)
>论文投稿 (26)
>文献求助 (25)
>基金申请 (23)
>考研 (23)
>硕博家园 (21)
>考博 (21)
>公派出国 (21)
>找工作 (20)
>休闲灌水 (19)
>教师之家 (18)
>博后之家 (16)
>有机交流 (15)
>论文道贺祈福 (14)

返回列表

hbnuwangshuling

铜虫 (小有名气)

应助: 0 (幼儿园)
金币: 5898.7
散金: 5
红花: 1
帖子: 191
在线: 40.8小时
虫号: 552029
注册: 2008-04-28
专业: 凝聚态物性 II ：电子结构

[交流] 【求助】fortran报错信息是定义语句的错误如何改？

我的fortran程序报错信息是f(3): error #5082: Syntax error, found 'DIMENSION' when expecting one of: PRECISION COMPLEX
DOUBLE DIMENSION YP(Nr,Nc),YPI(Nr,Nc),Yeqr(Nr,Nc),YF(Nr,Nc)
---------------^

我的程序开头三行是 IMPLICIT DOUBLE precision(A-H,O-Z)
PARAMETER (Nc=3,Nr=3,MR=100,PI=3.1415926)
DOUBLE DIMENSION YP(Nr,Nc),YPI(Nr,Nc),Yeqr(Nr,Nc),YF(Nr,Nc)
我应该怎么改正呢？

回复此楼

» 猜你喜欢

求标准粉末衍射卡号 ICDD 01-076-1802 已经有0人回复
新西兰Robinson研究所招收全奖PhD 已经有0人回复
物理学I论文润色/翻译怎么收费? 已经有121人回复
石墨烯转移--二氧化硅衬底石墨烯已经有0人回复
笼目材料中量子自旋液体基态的证据已经有0人回复
数学教学论硕士可以读数学物理博士吗？已经有0人回复
德国亥姆霍兹Hereon中心汉堡分部招镁合金腐蚀裂变SCC课题方向2026公派博士生已经有4人回复
澳门大学应用物理及材料工程研究院潘晖教授课题组诚招博士后已经有11人回复
求助NH4V4O10晶体的CIF文件已经有0人回复

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

很简单的Fortran赋值出错啦，求大神们帮忙找bug... 已经有11人回复
Fortran程序在linux下编译的问题已经有5人回复
求助FORTRAN软件已经有7人回复
fortran语言教程已经有178人回复
fortran程序出现Error: Error in opening the Library module file.[MSIMSLMD] 已经有7人回复
编一个fortran程序已经有17人回复
fortran的array bounds exceeded错误已经有5人回复
求助：intel visual fortran的格式问题已经有14人回复
一个采用fortran在linux下运行的程序的安装问题已经有9人回复
急求fortran运行错误原因，在线等已经有7人回复
Fortran数据读入格式的修改已经有5人回复
请教 fortran 运行错误的原因已经有13人回复
FORTRAN新手求助主程序循环问题已经有10人回复
如何改变fortran的浮点精度已经有28人回复
C语言与Fortran语言之间的转化已经有9人回复
一般英文稿写好之后怎么改语法和一些语句的错误大家一般都是怎么走这个过程的已经有18人回复
【求助】Fortran语言赋值问题？已经有3人回复
Fortran的格式化输入输出问题已经有14人回复
fortran两个问题，文件中的空格，屏幕同一行覆盖输出已经有23人回复
【求助】初学fortran，已经有15人回复
【求助】Fortran 如何读取文件中特定行的内容已经有16人回复
【交流】Fortran语言答疑专帖已经有157人回复

1楼 2010-10-23 17:57:30

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

ykwang

金虫 (正式写手)

计算强帖: 5
应助: 0 (幼儿园)
金币: 3171.7
红花: 1
帖子: 639
在线: 386.4小时
虫号: 500302
注册: 2008-02-13
专业: 理论和计算化学

★
dongdong3881(金币+1):多谢参与 2010-10-24 09:23:54
hbnuwangshuling(金币+5):谢谢指教！现在能算了！ 2010-10-25 18:13:33

去掉DOUBLE DIMENSION YP(Nr,Nc),YPI(Nr,Nc),Yeqr(Nr,Nc),YF(Nr,Nc)前面的DOUBLE，因为你已经声明采用隐含双精度了。此外，你既然是用双精度，参数PI=3.1415926并不能保证PI为双精度，应该写为PI=3.1415926535897932D0。

[ Last edited by ykwang on 2010-10-23 at 21:38 ]

赞一下(1人)

回复此楼

Nothing_Is_Impossible!

2楼2010-10-23 20:52:39