24小时热门版块排行榜    

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

shiyongjie

银虫 (正式写手)

[交流] 【求助】module 里面封装的程序的形参能是指针类型的吗?【已完结】 已有2人参与

散50金币,求解决方法

问题描述如下:
在module 里定义个一个子程序。如
module aa
  contains
    subroutine   test(a,pointer)
     ..................
     .......................
    end subroutine
end module
当我在主程序main中调用子程序test的时候,需要使用use aa,use是显示定义接口的。而fortran规定使用指针作为函数指针时,必须使用interface 。即在主程序中必须使用
interface
  subroutine  test
end interface
这样一来,又是use,又是interface,两次定义了接口,就出错了。

请问各位有什么办法来解决这个问题。前提是test必须封装在module里,而且形参必须是指针类型。

[ Last edited by 余泽成 on 2010-9-25 at 23:09 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hakekill

木虫 (小有名气)


shiyongjie(金币+5): 2010-09-24 20:57:46
余泽成(金币+1):谢谢参与应助! 2010-09-24 21:35:34
这个问题是这样的,如果不用module来封装,使用指针作为函数形参时必须使用interface,但是用module来封装后,interface就不需要了,这个信息已经包含在module里面了。主程序只需要use就行了。
2楼2010-09-24 08:43:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shiyongjie

银虫 (正式写手)

谢谢你的回答。但是仍然有问题,我把程序封装在module里面,用了use,把interface去掉了。结果编译的时候就出现问题了,说需要使用interface来定义。
另外,说明一下,我这个module是编译成DLL文件的
3楼2010-09-24 21:00:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hakekill

木虫 (小有名气)

shiyongjie(金币+45):已经解决了。金币都给你吧 2010-09-25 12:24:01
你试着在module里面就给出interface看看,即在contain前面给出。
4楼2010-09-25 09:22:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hakekill

木虫 (小有名气)


小木虫(金币+0.5):给个红包,谢谢回帖交流
你的解决方法是怎么样的?
5楼2010-09-25 14:20:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shiyongjie

银虫 (正式写手)

引用回帖:
Originally posted by hakekill at 2010-09-25 14:20:05:
你的解决方法是怎么样的?

呵呵,其实就是你最开始说的方法。很奇怪,最开始调试的时候,不知道是不是哪儿写错了,还是怎么的。只用use老是出错。后来等第二天去搞就都好了。
6楼2010-09-27 08:03:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 shiyongjie 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +9 哇呼哼呼哼 2026-04-02 10/500 2026-04-06 19:47 by jean5056
[考研] 304求调剂 +10 c297914 2026-04-05 11/550 2026-04-06 19:00 by lijunpoly
[考研] 385分 生物学(071000)求调剂 +12 qf626 2026-04-01 12/600 2026-04-06 17:36 by 52305043001
[考研] 0854求调剂 +7 亨氏番茄沙司 2026-04-06 8/400 2026-04-06 17:27 by 土木硕士招生
[考研] 材料调剂 +9 一样YWY 2026-04-06 9/450 2026-04-06 17:17 by lijunpoly
[考研] (调剂)一志愿报考哈尔滨工业大学0857资源与环境专业378分考生 +7 狠狠加油 2026-04-05 8/400 2026-04-06 16:52 by momo皓
[考研] 290求调剂085701 +11 1314捧花 2026-04-02 11/550 2026-04-06 13:31 by zllcz
[考研] 材料调剂 +14 壹贰贰亿 2026-04-04 14/700 2026-04-05 23:31 by 来看流星雨10
[考研] 复试调剂 +13 呼呼?~+123456 2026-04-05 13/650 2026-04-05 22:07 by 醉翁wl
[考研] 材料调剂 +7 dxy调剂 2026-04-04 7/350 2026-04-05 09:15 by 陌秋26
[考研] 0710生物学336分求调剂 +6 kiyy 2026-04-01 8/400 2026-04-04 10:10 by kiyy
[考研] 求调剂 +8 akdhjs 2026-04-03 8/400 2026-04-03 18:17 by 戴维ING
[考研] 一志愿华东理工大学,080500学硕,317分,求调剂 +13 s1145 2026-03-31 15/750 2026-04-03 11:44 by msi123
[考研] 302求调剂 +9 zyx上岸! 2026-04-02 9/450 2026-04-02 23:07 by 马儿快快地跑
[考研] 372分材料与化工(085600)一志愿湖南大学求调剂 +5 蓝笺片 2026-04-02 6/300 2026-04-02 21:37 by dongzh2009
[考研] 求调剂 302分初试 0854 +5 伶可乐 2026-04-02 5/250 2026-04-02 17:53 by 笔落锦州
[考研] 求调剂 +7 Aniyaio 2026-04-02 7/350 2026-04-02 16:42 by zzsw+
[考研] 26考研调剂 +4 Wnz.20030617 2026-04-01 5/250 2026-04-02 16:11 by 1939136013狗壮
[考研] 材料调剂 +12 一样YWY 2026-04-01 12/600 2026-04-02 09:15 by olim
[考研] 求调剂,一志愿南京师范大学计算机专硕,初试373,六级通过, +3 计算机追梦人 2026-04-01 3/150 2026-04-02 07:57 by fxue1114
信息提示
请填处理意见