24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 2339  |  回复: 20
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

1xiaohua1

木虫 (正式写手)

[求助] 请高手指点如何成功运行fun.f90和main.f90

  假如现在有两个Fortran程序fun.f90和main.f90,其中main.f90是主程序,fun.f90是在主程序中调用的子程序,将这两个文件放到一个目录下,如何使用fortran成功编译并运行主程序,获得运算结果?
              (需要在主程序中添加什么语句,以及如何运行和编译主程序,一切都在window系统VS软件下进行)
  
求高手指点,给出详细的操作
回复此楼

» 猜你喜欢

活着,就要不停地做事
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

1xiaohua1

木虫 (正式写手)

引用回帖:
10楼: Originally posted by virtualzx at 2013-11-12 01:56:51
先改下主程序,加上
real, external :: fun

然后改一下子程序
function  fun(x,y) result(z)

然后直接编译,就可以了...

好的,我先试试
活着,就要不停地做事
13楼2013-11-13 21:31:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 21 个回答

Carpathia

银虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★
感谢参与,应助指数 +1
jjdg: 金币+1, 感谢参与 2013-11-12 01:23:20
1xiaohua1: 金币+2 2013-11-14 16:39:40
1xiaohua1: 金币+1 2013-12-13 22:51:01
前提两个文件都加入project,主程序中要加入interface,指定fun里面的函数,main里面确定要有program入口,然后可以编译了
追求理想的道路上东张西望
2楼2013-11-10 20:47:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhg19

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★
感谢参与,应助指数 +1
1xiaohua1: 金币+1 2013-11-11 15:06:45
jjdg: 金币+1, 感谢参与 2013-11-12 01:23:27
1xiaohua1: 金币+2 2013-11-14 16:39:46
楼主可尝试在主程序末尾添加:
include 'fun.f90'
3楼2013-11-10 23:05:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

1xiaohua1

木虫 (正式写手)

引用回帖:
3楼: Originally posted by zhg19 at 2013-11-10 23:05:33
楼主可尝试在主程序末尾添加:
include 'fun.f90'

谢谢了,我加了运行不了
活着,就要不停地做事
4楼2013-11-11 15:06:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿北京科技材料科学与工程288分,求调剂 +8 是辰啊 2026-04-02 8/400 2026-04-02 11:33 by Sammy2
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +10 哇呼哼呼哼 2026-04-01 11/550 2026-04-02 11:31 by lnilvy
[考研] 一志愿同济大学323分(080500)求调剂 +5 yikeniu 2026-04-01 5/250 2026-04-02 11:17 by xiaoranmu
[考研] 354求调剂 +4 lxb598 2026-03-31 5/250 2026-04-02 09:55 by Jaylen.
[考研] 301求调剂 +13 A_JiXing 2026-04-01 13/650 2026-04-02 09:01 by sanrepian
[考研] 理学07化学 303求调剂 +14 睿08 2026-03-27 15/750 2026-04-02 08:46 by 花??
[考研] 求生物学调剂 +8 15172915737 2026-04-01 8/400 2026-04-02 06:49 by ilovexiaobin
[考研] 一志愿上海海洋大学083200食品学硕,求调剂,接受其他专业 +5 what张 2026-04-01 5/250 2026-04-01 22:35 by guanxin1001
[考研] 一志愿西安交大材料学硕(英一数二)347,求调剂到高分子/材料相关专业 +7 zju51 2026-03-31 9/450 2026-04-01 19:35 by CFQZAFU
[考研] 调剂 +3 好好读书。 2026-04-01 3/150 2026-04-01 17:06 by zhouyuwinner
[考研] 309求调剂 +19 谁不是少年 2026-03-29 19/950 2026-04-01 15:47 by jp9609
[考研] 英一数二生物信息学287分,本科生物科学,求调剂 +3 碧水xyz 2026-03-29 4/200 2026-04-01 15:35 by plum
[考研] 调剂 +5 好好读书。 2026-03-28 7/350 2026-04-01 15:32 by 王亮_大连医科大
[考研] 求调剂 +4 DADA怪 2026-03-31 4/200 2026-04-01 14:30 by ZXlzxl0425
[考研] 086000生物与医药 初试274求调剂 +5 小叮当来了 2026-03-30 6/300 2026-04-01 14:25 by mxj1203
[考研] 339求调剂 +5 zjjkt 2026-03-31 5/250 2026-04-01 09:18 by JourneyLucky
[考研] 281求调剂 +5 亚克西good 2026-03-26 7/350 2026-03-30 20:42 by dophin1985
[考研] 081200-11408-276学硕求调剂 +6 崔wj 2026-03-26 6/300 2026-03-29 01:11 by hanserlol
[考研] 085405 考的11408求各位老师带走 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 09:19 by 乐呵呵的追梦人
[考研] 352分 化工与材料 +5 海纳百川Ly 2026-03-27 5/250 2026-03-28 03:39 by fmesaito
信息提示
请填处理意见