24小时热门版块排行榜    

查看: 1036  |  回复: 3

swordfish612

木虫 (正式写手)

[求助] Fortran2003面向对象求助

最近在尝试采用Fortran2003的面向对象的新功能,结果编了下面一段程序编译通不过,用的是intel visual fortran,

Module clsTEST
IMPLICIT NONE
TYPE,ABSTRACT,PUBLIC::TEST
      INTEGER:N
      CONTAINS

     PROCEDURE(CREATE),PUBLIC,DEFERRED::CREATE
END TYPE clsTEST

ABSTRACT INTERFACE
    SUBROUTINE CREATE(THIS)
    IMPLICIT NONE
    CLASS(TEST)::THIS
    END SUBROUTINE CREATE
END INTERFACE
END Module clsTEST


编译的时候总报错“This derived type name has not been declared(TEST)”,错误指向CLASS(TEST)::THIS  这一行。明明按书上的代码写的,可怎么都通不过。。。
求请高手指点
回复此楼

» 猜你喜欢

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

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

绿遍山原

铜虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
swordfish612: 金币+20, ★★★★★最佳答案 2013-08-31 18:00:52
xzhdty: 金币+1, 谢谢参与 2013-09-01 07:55:52
ABSTRACT INTERFACE
    SUBROUTINE CREATE(THIS)
    IMPORT TEST   !加入这一行
    IMPLICIT NONE
    CLASS(TEST)::THIS
    END SUBROUTINE CREATE
END INTERFACE
要夢遊,不要催眠。
2楼2013-08-31 12:35:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

swordfish612

木虫 (正式写手)

引用回帖:
2楼: Originally posted by 绿遍山原 at 2013-08-31 12:35:23
ABSTRACT INTERFACE
    SUBROUTINE CREATE(THIS)
    IMPORT TEST   !加入这一行
    IMPLICIT NONE
    CLASS(TEST)::THIS
    END SUBROUTINE CREATE
END INTERFACE

可以推荐学习fortran2003的书或资料吗?这方面的好像比较少,我看的chapman的那本翻译成中文的,但是感觉讲得不好,而且好像还有错误啊
3楼2013-08-31 18:02:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

绿遍山原

铜虫 (小有名气)

引用回帖:
3楼: Originally posted by swordfish612 at 2013-08-31 18:02:52
可以推荐学习fortran2003的书或资料吗?这方面的好像比较少,我看的chapman的那本翻译成中文的,但是感觉讲得不好,而且好像还有错误啊...

这个没怎么看到,现在编译器的支持都不是很够,所以chapman那本很多都没测试过。只是学习新特性的话,目前比较准确的是gfortran和xlf的manual。
要夢遊,不要催眠。
4楼2013-08-31 19:08:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 swordfish612 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 梁成伟老师课题组欢迎你的加入 +8 一鸭鸭哟 2026-03-14 9/450 2026-03-16 17:35 by 沐霖12138
[考研] 304求调剂 +3 曼殊2266 2026-03-14 3/150 2026-03-16 16:39 by houyaoxu
[考研] 277材料科学与工程080500求调剂 +3 自由煎饼果子 2026-03-16 3/150 2026-03-16 14:10 by 运气yunqi
[考研] 344求调剂 +3 knight344 2026-03-16 3/150 2026-03-16 09:42 by 无际的草原
[考研] 311求调剂 +6 冬十三 2026-03-15 6/300 2026-03-16 08:00 by wang_dand
[考研] 085601材料工程315分求调剂 +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
[基金申请] 现在如何回避去年的某一个专家,不知道名字 +3 zk200107 2026-03-12 6/300 2026-03-14 17:13 by zk200107
[考研] 材料与化工(0856)304求B区调剂 +7 邱gl 2026-03-10 11/550 2026-03-14 12:18 by 邱gl
[考研] 330求调剂 +3 ?酱给调剂跪了 2026-03-13 3/150 2026-03-14 10:13 by JourneyLucky
[考研] 307求调剂 +7 超级伊昂大王 2026-03-10 7/350 2026-03-14 00:49 by JourneyLucky
[考研] 271求调剂 +10 生如夏花… 2026-03-11 10/500 2026-03-14 00:35 by 卖报员小雨
[考研] 285 求调剂 资源与环境 一志愿北京化工大学 +3 未名考生 2026-03-10 3/150 2026-03-13 23:04 by JourneyLucky
[考研] 材料371求调剂 +9 鳄鱼? 2026-03-11 11/550 2026-03-13 22:53 by JourneyLucky
[考研] 材料与化工304求B区调剂 +5 邱gl 2026-03-11 6/300 2026-03-13 22:37 by JourneyLucky
[考研] 求调剂(材料与化工327) +4 爱吃香菜啦 2026-03-11 4/200 2026-03-13 22:11 by JourneyLucky
[考研] 四川大学085601材料工程专硕 初试294求调剂 +4 祝我们好在冬天 2026-03-11 4/200 2026-03-13 21:39 by peike
[考研] 工科,求调剂 +3 我887 2026-03-11 3/150 2026-03-13 21:39 by JourneyLucky
[考研] 281求调剂 +9 Koxui 2026-03-12 11/550 2026-03-13 20:50 by Koxui
[考研] 材料工程调剂 +4 咪咪空空 2026-03-11 4/200 2026-03-13 19:57 by JourneyLucky
[考研] 材料301分求调剂 +5 Liyouyumairs 2026-03-12 5/250 2026-03-13 14:42 by JourneyLucky
信息提示
请填处理意见