| 查看: 571 | 回复: 2 | |||
| 本帖产生 1 个 程序强帖 ,点击这里进行查看 | |||
[交流]
【求助】紧急求助FORTRAN运行问题
|
|||
|
附件中是一个简单的fortran90程序,在fortran powerstation 4.0 中编译运行正常,但在compaq visural fortran 6.0中,编译提示没有错误,但在运行时总会出错,无法进行,请高手帮忙!急!!! 程序见附件 |
» 猜你喜欢
国自科送审了吗
已经有7人回复
收到国自然专家邀请后几年才会有本子送过来评
已经有5人回复
研究生做的很差,你们会让毕业吗?
已经有6人回复
26年博士申请自荐-电催化
已经有5人回复
2026博士或科研助理转27年博士
已经有5人回复
夜,静悄悄的
已经有4人回复
考博
已经有6人回复
一篇MDPI论文改变了学习工作和生活
已经有5人回复
26年申博自荐-计算机视觉
已经有4人回复
» 抢金币啦!回帖就可以得到:
工科男,工作稳定,希望能遇到有趣的她
+1/172
在广东佛山,等一个她
+1/77
西安交通大学高分子化工新材料创新中心诚聘科研助理
+1/73
山东征女友,坐标济南
+1/70
北京邮电大学电子科学与技术招收博士
+1/40
西北工业大学物理科学与技术学院-诚聘【AI与光学交叉方向】博士后
+1/30
南京邮电大学李巍教授招收2026博士生(5月12日前有效)
+1/20
暨南大学中医学院邓力课题组博士后招聘【中西医结合/交叉学科方向】
+1/20
类器官/器官芯片 有编制研究员
+1/13
香港理工大学汪志勋课题组招收2026年9月入学全奖博士生一名
+1/12
双一流天津工业大学电信学院李鸿强教授招收2026年申请审核制博士
+1/8
招收2026年秋季入学新能源材料方向博士生
+1/7
成都中医药大学药学院 谢恬教授招收2026级药物化学,有机合成方向的博士生
+1/6
湘潭大学材料学院“特种化学电源”创新团队补招2026年秋入学博士生
+1/4
上海交通大学复合材料研究所诚聘科研助理
+1/3
英国伦敦布鲁内尔大学高薪招聘欧盟玛丽居里全奖博士
+1/3
香港科技大学 招生 全奖博士 -- 机器人/电子/材料
+1/3
双一流高校南林化学工程学院-国家级青年人才团队招2026级博士(最后一波)
+1/2
南京大学医学院附属鼓楼医院院士团队招聘博士后、科研助理
+1/2
大湾区大学-中山大学联培博士招生(电磁方向)
+1/1
★ ★ ★
panjunxing(金币+10): 非常感谢! 2011-03-03 19:46:28
余泽成(金币+3, 程序强帖+1): 谢谢参与应助!欢迎常来程序语言版! 2011-03-06 22:06:34
panjunxing(金币+10): 非常感谢! 2011-03-03 19:46:28
余泽成(金币+3, 程序强帖+1): 谢谢参与应助!欢迎常来程序语言版! 2011-03-06 22:06:34
|
请按照下面把其中一个函数改一下 subroutine init1() use base integer::i,j,idum real::ra,ran2 idum=123 do i=0,n do j=0,n ra=ran2(idum) fei_old(i,j)=0.01*(2.0*ra-1.0)-0.0 END DO END DO end subroutine ========= fortran编程最好在主程序开始前及每个子程序开始时定义变量之前加入 implicit none 这样如果程序变量定义不恰当,编译器会指出来。 |
2楼2011-03-03 19:08:32
3楼2011-03-03 19:10:22












回复此楼