24小时热门版块排行榜    

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

dl082025

金虫 (正式写手)

[求助] 求组fortran出错问题

Error(E42): Last command making (build\param.o) returned a bad status
Error(E02): Make execution terminated

一个申明变量的代码(书上例子),f77的 我想转成f90 就报以上错误
文件名param.inc
代码(所有):
integer dim
parameter  (dim = 1)
integer maxn,max_interaction
parameter  ( maxn = 12000 ,max_interaction = 100 * maxn )
double precision  x_maxgeom,x_mingeom,y_maxgeom, y_mingeom, z_maxgeom, z_mingeom
parameter  ( x_maxgeom =  10.e0     ,&
          &  x_mingeom = -10.e0     ,&
          &  y_maxgeom =  10.e0     ,&
          &  y_mingeom = -10.e0     ,&
          &  z_maxgeom =  10.e0     ,&
          &  z_mingeom = -10.e0     )
integer pa_sph
parameter(pa_sph = 2)
integer nnps
parameter(nnps = 1 )
integer sle
parameter(sle = 0)
integer skf
parameter(skf = 1)
logical summation_density, average_velocity, config_input,&
&        virtual_part, vp_input, vise, ex_force, heat_artificial,&
&        visc_artificial, self_gravity, nor_density
parameter  ( summation_density  = .true. )
parameter  ( average_velocity  = .false. )
parameter  ( config_input  = .false. )
parameter  ( virtual_part  = .false. )
parameter  ( vp_input  = .false.  )
parameter  ( vise  = .false.  )
parameter  ( ex_force  = .false.)
parameter  ( visc_artificial  = .true. )
parameter  ( heat_artificial  = .false. )
parameter  ( self_gravity  = .false. )
parameter  ( nor_density  = .false. )
integer    nsym
parameter  ( nsym = 0)
logical int_stat
parameter  ( int_stat = .true. )
integer print_step, save_step, moni_particle
parameter  ( print_step = 100 ,&
          &  save_step = 500,&
          &  moni_particle = 1600   )
double precision pi
parameter  ( pi = 3.14159265358979323846 )
logical shocktube, shearcavity
parameter  ( shocktube  = .true. )
parameter  ( shearcavity  = .false. )
回复此楼

» 猜你喜欢

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

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

dl082025

金虫 (正式写手)

标题打错了 求教
2楼2015-03-11 23:11:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 dl082025 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 英一数一408,总分284,二战真诚求调剂 +12 12.27 2026-03-30 14/700 2026-04-02 00:18 by 欣喜777
[考研] 285求调剂 +11 AZMK 2026-04-01 11/550 2026-04-01 22:40 by peike
[考研] 一志愿南昌大学324求调剂 +12 hanamiko 2026-03-27 12/600 2026-04-01 22:34 by 运气yunqi
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 22:25 by zhouyuwinner
[考研] 270求调剂 +7 小杰pp 2026-03-31 8/400 2026-04-01 21:36 by 七度不信任
[考研] 284求调剂 +12 小熊~~ 2026-03-31 12/600 2026-04-01 20:23 by 花??
[考研] 0856,材料与化工321分求调剂 +13 大馋小子 2026-03-27 14/700 2026-04-01 15:58 by yanflower7133
[考研] 总分343,求生物学调剂 +6 深刻的凯撒 2026-03-26 6/300 2026-04-01 15:58 by 2007huanle
[考研] 285求调剂 +5 FZAC123 2026-03-30 5/250 2026-04-01 15:50 by 韩雨涵
[考研] 考研调剂 +9 小蜡新笔 2026-03-29 10/500 2026-03-31 19:52 by Dyhoer
[考研] 复试调剂 +7 双马尾痞老板2 2026-03-31 7/350 2026-03-31 19:49 by Dyhoer
[考研] 英一数一总分334求调剂 +4 陈阳坤 2026-03-31 4/200 2026-03-31 14:22 by 记事本2026
[考研] 调剂求院校招收 +7 鹤鲸鸽 2026-03-28 7/350 2026-03-31 11:21 by oooqiao
[考研] 323分 食品与营养调剂 +3 嘿ooo 2026-03-31 3/150 2026-03-31 09:38 by longlotian
[考研] 福建理工大学材料学院先进合金团队招收考研调剂学生 +3 大华金商都 2026-03-30 4/200 2026-03-31 01:04 by 方英俊602
[考研] 083000环境科学与工程调剂,总分281 +4 橙子(胜意) 2026-03-30 4/200 2026-03-31 00:44 by Linzejun
[考研] 一志愿华中师范化学332分求调剂 +3 Lyy930824@ 2026-03-29 3/150 2026-03-30 20:15 by DHUSHUAI
[考研] 一志愿南开大学0710生物学359求调剂 +5 兔兔兔111223314 2026-03-29 7/350 2026-03-30 18:29 by 兔兔兔111223314
[考研] 310求调剂 +10 争取九点睡 2026-03-30 10/500 2026-03-30 16:45 by ztnimte
[考研] 348求调剂 +6 小懒虫不懒了 2026-03-28 6/300 2026-03-30 10:29 by Evan_Liu
信息提示
请填处理意见