24小时热门版块排行榜    

Znn3bq.jpeg
查看: 830  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 评审有感 +3 popular289 2026-05-18 6/300 2026-05-18 15:17 by gy116024
[教师之家] 上海大学实验技术岗位非升即走 +8 嘻嘻哈哈乐呵呵 2026-05-15 8/400 2026-05-18 11:53 by ning312
[文学芳草园] 半夜喝咖啡 +3 myrtle 2026-05-15 5/250 2026-05-18 01:03 by 小沈2018
[考研] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 xx7gd5zq4e 2026-05-15 6/300 2026-05-17 19:36 by Equinoxhua
[考博] 2026博士还有哪些学校有名额 +6 小王求读研 2026-05-15 7/350 2026-05-17 16:54 by 知音湖畔
[考博] 光量子物理方向 博士招生 1人(2026.09) +3 sandyworld 2026-05-15 4/200 2026-05-17 14:38 by sandyworld
[考博] 26/27博士推荐 +3 1木头人13949 2026-05-13 3/150 2026-05-17 09:41 by YuY66
[考研] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 v9tggjlwd0 2026-05-15 4/200 2026-05-17 08:11 by 11n4dfd8yn
[硕博家园] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 v9tggjlwd0 2026-05-15 4/200 2026-05-17 08:06 by 11n4dfd8yn
[考研] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 l7k6xnh0yc 2026-05-14 8/400 2026-05-17 07:26 by 11n4dfd8yn
[考研] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 ky2p12rrjj 2026-05-15 4/200 2026-05-17 00:50 by ue3ir18jc3
[考研] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 x0mp7owy2b 2026-05-15 4/200 2026-05-17 00:25 by ue3ir18jc3
[基金申请] 请问大佬b0816评完了吗 +4 市民华南虎 2026-05-12 8/400 2026-05-16 19:54 by Equinoxhua
[高分子] 本人最近太闲了,谁有问题可以提,每天会统一回复 +9 一切都是空工 2026-05-12 20/1000 2026-05-16 19:52 by Equinoxhua
[硕博家园] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +4 x0mp7owy2b 2026-05-15 4/200 2026-05-16 17:45 by j6b2pdz07o
[硕博家园] 售SCI一区T0P文章,我:8.O.5.5.1.O.5.4,科目齐全,可+急 +3 k37jurhrau 2026-05-16 3/150 2026-05-16 13:57 by vcdazktkjx
[硕博家园] 申请博士 +3 呃?呃 2026-05-15 3/150 2026-05-16 11:01 by a4742549
[文学芳草园] 风把牡丹吹跑了 +5 myrtle 2026-05-12 9/450 2026-05-15 15:27 by myrtle
[考博] 26应届毕业生考博求助 +3 wo一定上岸 2026-05-13 3/150 2026-05-14 21:47 by 明海天涯
[考博] 材料类只有一篇综述能申博么 +4 乐逍遥谷 2026-05-13 4/200 2026-05-14 12:05 by zhyzzh
信息提示
请填处理意见