24小时热门版块排行榜    

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

JanLatte

新虫 (初入文坛)

[求助] 【fortran】程序运行阶段出现问题,请各位帮忙看看,多谢!

程序编译的时候没有问题,运行之后出现问题。

 http://\"【fortran】程序运行阶段出现问题,请各位帮忙看看,多谢!\"

可能有问题的代码如下:
  CALL POROSITY
      DO 500 J=2,NJM1
      TAL(J)=2-(2-1)*CONVER(J)
      DIFFL(J)=(1.39E-5)*(TMO(J)/273.2)**(1.75)
      DIFFP(J)=2*3*26*sqrt(8*R*TMO(J)/(50.24E-3))
      GAMC(J)=POR(J)*(1.0/DIFFL(J)+1.0/DIFFP(J))**(-1.0)/(TAL(J)*TAL(J))
  500 CONTINUE
      RETURN
      END

请各位帮忙看看,多谢!
回复此楼

» 猜你喜欢

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

JanLatte

新虫 (初入文坛)

内容已删除
2楼2015-09-14 16:24:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 JanLatte 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 327求调剂 +9 汲亦昊 2026-03-29 9/450 2026-04-02 11:44 by 运气yunqi
[考研] 309求调剂 +6 呆菇不是戴夫 2026-04-02 6/300 2026-04-02 10:27 by longlotian
[考研] 321求调剂 +9 y-yh 2026-04-01 10/500 2026-04-02 10:14 by 不吃魚的貓
[考研] 一志愿安徽大学计算机科学与技术学硕,331分求调剂 +5 蒋昌鹏qtj 2026-04-01 5/250 2026-04-02 08:10 by fxue1114
[考研] 调剂推荐 +10 清酒714 2026-03-26 12/600 2026-04-02 07:57 by 尚水阁主
[考研] 275求调剂 +12 waltzh 2026-04-01 12/600 2026-04-01 21:44 by chyhaha
[考研] 286求调剂 +16 PolarBear11 2026-03-26 16/800 2026-04-01 21:31 by 七度不信任
[考研] 290求调剂 +5 dfffsar 2026-03-29 5/250 2026-04-01 19:45 by 6781022
[考研] 材料与化工(0856)304求B区调剂 +8 邱gl 2026-03-30 16/800 2026-04-01 17:58 by 邱gl
[考研] 材料专硕306英一数二 +7 z1z2z3879 2026-03-31 7/350 2026-04-01 14:50 by ZXlzxl0425
[考研] 346求调剂 一志愿070303有机化学 +11 萝卜炖青菜 2026-03-28 12/600 2026-03-31 17:54 by xhai2011
[考研] 322求调剂:一志愿湖南大学 材料与化工(085600),已过六级。 +10 XX小邓 2026-03-29 10/500 2026-03-31 16:46 by 不吃魚的貓
[考研] 343求调剂 +8 爱羁绊 2026-03-28 8/400 2026-03-31 16:12 by 不吃魚的貓
[考研] 085404 22408 315分 +5 zhuangyan123 2026-03-31 6/300 2026-03-31 13:48 by limeifeng
[考研] 285求调剂 +6 AZMK 2026-03-29 9/450 2026-03-30 21:02 by dophin1985
[考研] 一志愿华中师范化学332分求调剂 +3 Lyy930824@ 2026-03-29 3/150 2026-03-30 20:15 by DHUSHUAI
[考研] 一志愿北京理工大学本科211材料工程294求调剂 +8 mikasa的围巾 2026-03-28 8/400 2026-03-29 12:48 by 无际的草原
[考研] 求佛 +7 迷人的哈哈 2026-03-28 7/350 2026-03-28 16:47 by 催化大白
[考研] 298调剂 +3 jiyingjie123 2026-03-27 3/150 2026-03-27 11:57 by wxiongid
[考研] 一志愿吉大071010,316分求调剂 +3 xgbiknn 2026-03-27 3/150 2026-03-27 10:36 by guoweigw
信息提示
请填处理意见