24小时热门版块排行榜    

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

hbnuwangshuling

铜虫 (小有名气)

[交流] 【求助】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)
我应该怎么改正呢?
回复此楼

» 猜你喜欢

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

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

ykwang

金虫 (正式写手)


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 ]
Nothing_Is_Impossible!
2楼2010-10-23 20:52:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 hbnuwangshuling 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 288求调剂 +8 没有答案_ 2026-04-05 8/400 2026-04-06 14:11 by lqwchd
[考研] 085600材料与化工301分求调剂院校 +14 刺痛jk 2026-04-06 15/750 2026-04-06 11:57 by lijunpoly
[考研] 281求调剂 +8 椰子蘑菇 2026-04-06 8/400 2026-04-06 10:38 by 蓝云思雨
[考研] 285求调剂 +12 哦呦呼o 2026-04-04 12/600 2026-04-06 09:48 by 蓝云思雨
[考研] 生物与医药273求调剂 +7 荔题南墙 2026-04-05 7/350 2026-04-06 09:26 by 286640313
[考研] 081200-11408-276学硕求调剂 +4 崔wj 2026-04-04 5/250 2026-04-05 14:06 by imissbao
[考研] 材料调剂 +11 一样YWY 2026-04-02 13/650 2026-04-04 23:10 by 无际的草原
[考研] 277工科求调剂 +7 1915668 2026-04-04 7/350 2026-04-04 17:21 by 啊俊!
[考研] 071000生物学调剂 +8 知昭蔓 2026-04-02 8/400 2026-04-03 10:36 by macy2011
[考研] 316求调剂 +14 舟自梗 2026-04-01 18/900 2026-04-03 10:28 by linyelide
[考研] 复试调剂 +3 bvzz 2026-04-01 3/150 2026-04-03 09:47 by 蓝云思雨
[考研] 求调剂22408 288分 +5 new382 2026-04-02 5/250 2026-04-03 09:13 by 醉在风里
[考研] 一志愿a区211,085601-307分求调剂 +13 党嘉豪 2026-03-31 26/1300 2026-04-03 08:33 by 495374996
[考研] 0856材料与化工调剂,339 +14 10213207 2026-03-31 14/700 2026-04-02 21:01 by 1104338198
[考研] 调剂 +3 好好读书。 2026-04-01 6/300 2026-04-02 15:49 by liumengping
[考研] 0805求调剂 +8 是水分 2026-03-31 8/400 2026-04-02 10:46 by guanxin1001
[考研] 一志愿北交大材料工程总分358 +8 cs0106 2026-04-01 9/450 2026-04-02 10:36 by 不吃魚的貓
[考研] 350求调剂 +7 阿佳~ 2026-03-31 7/350 2026-04-01 16:12 by yanflower7133
[考研] 求调剂 +4 DADA怪 2026-03-31 4/200 2026-04-01 14:30 by ZXlzxl0425
[考研] 材料调剂 +10 Eujd1 2026-03-31 11/550 2026-04-01 11:23 by ivanqyq
信息提示
请填处理意见