24小时热门版块排行榜    

查看: 3139  |  回复: 9
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

black2982

金虫 (小有名气)


[交流] Fortran 编译问题

我从网上(http://leroy.uwaterloo.ca/programs.html)下了一个fortran的程序RKR1, 是用来计算分子光谱常数的免费程序, 但是只有程序源代码, 并且是用邮件格式发过来的, 我试着把程序源代码拷出来作成文本文件, 并且转换成fortran格式,用一个网上编译器进行了编译,然后用它发过来的sample文件(同样是邮件发送)运行测试,程序给出一个错误“At line 86 of file ZERTh1fI.f Fortran runtime error: Bad  integer for item 1 in list input“

想问一下这人错误我该怎么解决呢?还有,由于我对于程序的了解太少,不知道有没有人愿意帮我解决一下,我会把源程序和sample文件发过来。
回复此楼

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

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

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

lurencyj

木虫 (著名写手)


★
black2982(金币+1):谢谢参与
那个错误信息说sample文件里面的第一个输入参数应该是整数,但实际上不是个整数。
3楼2012-02-20 17:18:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 10 个回答

lijie169

铜虫 (著名写手)


★
black2982(金币+1):谢谢参与
你不懂Fortran么?这个是运行错误....
2楼2012-02-20 12:24:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

black2982

金虫 (小有名气)


引用回帖:
3楼: Originally posted by lurencyj at 2012-02-20 17:18:33:
那个错误信息说sample文件里面的第一个输入参数应该是整数,但实际上不是个整数。

谢谢, 可是我的sample文件第一个输入参数是整数

程序第86行:
   2 READ(5,*,END=99) IAN1, IMN1, IAN2, IMN2, CHARGE, NDEGv, NDEBv


Sample文件:
  11 23  11 23  0  1  1                 % IAN1 IMN1 IAN2 IMN2 CHARGE NDEGv NDEBv
'(iii) Liu et al. JCP 111, 3494 (1999) NDE functions for Na2:  VEXT = 0'
6  1  1 1  3 2   61.41d0  4.4867d-2   % NLR ITYPE IZP0 IZQ0 NP0 NQ0 VD XCN0
0.436636d0  -3.529d-3  1.54d-5
4.8d-2  1.366d-2
3  1 0  7 0  3.0921d-3                % ITYPB IZP1 IZQ1 NP1 NQ1 XCN1
0.1341d0  -1.6863d-2  9.2d-4  -2.810837d-5  4.924d-7  -4.61952d-9  1.8d-11
1  2   0.d0                           % Kaiser NSV VEXT
  -0.4d0  0.2d0  1.6d0                 %(1) V1 DV V2
   1.d0   1.0d0 61.d0                  %(2) V1 DV V2
4楼2012-02-21 09:42:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

black2982

金虫 (小有名气)


引用回帖:
2楼: Originally posted by lijie169 at 2012-02-20 12:24:07:
你不懂Fortran么?这个是运行错误....

是的, 不懂, 请问应该怎么解决呢?谢谢
5楼2012-02-21 09:52:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +10 ncTVBM6AOJHF 2026-11-04 22/1100 2026-11-06 17:18 by 5sJFDKp2kwuI
[考研] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 ELBZ6WwEaRj6 2026-11-05 7/350 2026-11-06 16:43 by 5sJFDKp2kwuI
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +6 ELBZ6WwEaRj6 2026-11-04 14/700 2026-11-06 16:32 by 5sJFDKp2kwuI
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +6 ELBZ6WwEaRj6 2026-11-04 11/550 2026-11-06 16:32 by 5sJFDKp2kwuI
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 ttH3f1oA6ace 2026-11-04 11/550 2026-11-06 16:10 by 5sJFDKp2kwuI
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 ncTVBM6AOJHF 2026-11-04 15/750 2026-11-06 13:49 by BkA9Bi5cMhkD
[考研] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +7 ncTVBM6AOJHF 2026-11-04 14/700 2026-11-06 13:47 by BkA9Bi5cMhkD
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +8 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-06 13:47 by BkA9Bi5cMhkD
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +8 ncTVBM6AOJHF 2026-11-04 14/700 2026-11-06 13:36 by BkA9Bi5cMhkD
[考研] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 ttH3f1oA6ace 2026-11-04 14/700 2026-11-06 05:11 by qL1cU46YIdK0
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 kvewwGtKktqB 2026-11-04 14/700 2026-11-06 05:10 by qL1cU46YIdK0
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 kvewwGtKktqB 2026-11-04 11/550 2026-11-06 05:10 by qL1cU46YIdK0
[公派出国] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +7 ncTVBM6AOJHF 2026-11-04 22/1100 2026-11-06 04:47 by qL1cU46YIdK0
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 ELBZ6WwEaRj6 2026-11-04 9/450 2026-11-06 02:15 by qL1cU46YIdK0
[考研] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 02:04 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 hNpp4Y2CGvSC 2026-11-04 12/600 2026-11-06 01:53 by qL1cU46YIdK0
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +6 ncTVBM6AOJHF 2026-11-04 10/500 2026-11-06 01:51 by qL1cU46YIdK0
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-06 01:42 by qL1cU46YIdK0
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 ncTVBM6AOJHF 2026-11-04 12/600 2026-11-05 11:10 by PYZmcHr5kSaq
[基金申请] 各位基础老师们,看完中央《从严治党》的决定后,对学术界更加有信心了吧 +5 iaeyuan 2026-11-01 5/250 2026-11-04 14:43 by jinchengzi
信息提示
请填处理意见