应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » Fortran 编译问题
北京石油化工学院2026年研究生招生接收调剂公告
101/1返回列表
查看: 2420  |  回复: 9
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

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文件发过来。
回复此楼

» 猜你喜欢

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

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

» 抢金币啦！回帖就可以得到:

查看全部散金贴
1楼 2012-02-20 10:16:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijie169

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

lurencyj

木虫 (著名写手)
★
black2982(金币+1):谢谢参与
那个错误信息说sample文件里面的第一个输入参数应该是整数，但实际上不是个整数。
赞一下 回复此楼
3楼2012-02-20 17:18:33
已阅   回复此楼   关注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的回帖

ygl820

至尊木虫 (知名作家)
★
black2982(金币+1):谢谢参与
读入的数据文件格式不对，应该是整数intger，检查数据文件“ 11...”这一行有没有非法字符。
赞一下 回复此楼
6楼2012-02-21 10:06:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

black2982

金虫 (小有名气)
引用回帖:
6楼: Originally posted by ygl820 at 2012-02-21 10:06:49:
读入的数据文件格式不对，应该是整数intger，检查数据文件“ 11...”这一行有没有非法字符。

好的, 谢谢
回复此楼
7楼2012-02-21 20:00:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

emanlee

木虫 (小有名气)
★
black2982(金币+1):谢谢参与
Sample文件:
  11 23  11 23  0  1  1                 % IAN1 IMN1 IAN2 IMN2 CHARGE NDEGv NDEBv
=================================================
Sample文件中，检查“11”前面是否有空格，如果有的话删掉空格。
把 % 及后面的内容都删除，再试一试。
赞一下 回复此楼
8楼2012-02-21 22:45:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
★
black2982(金币+1):谢谢参与
余泽成(金币+2): 谢谢参与应助！ 2012-02-25 04:37:49
我测试了一下所贴出来的 86 句以及那个数据行，代码没有什么问题，所以问题在于其它的问题

LZ 可以尝试着在
2 READ(5,*,END=99) IAN1, IMN1, IAN2, IMN2, CHARGE, NDEGv, NDEBv
之后加一行
write(*,*) IAN1, IMN1, IAN2, IMN2, CHARGE, NDEGv, NDEBv

看看输出是否正常……
赞一下 回复此楼
9楼2012-02-23 14:03:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

18766315007

新虫 (著名写手)
★
black2982(金币+1): 谢谢参与
请问楼主，解决了吗？

发自小木虫Android客户端
赞一下 回复此楼
10楼2016-10-19 15:28:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 black2982 的主题更新
101/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料与化工328分调剂 +7 。，。，。，。i 2026-03-23 7/350 2026-03-29 20:58 by 唐沐儿
[考研] 一志愿武汉理工，总分321，英一数二，求老师收留。 +11 nnnnnnn5 2026-03-25 11/550 2026-03-29 20:42 by 无际的草原
[考研] 348求调剂 +5 小懒虫不懒了 2026-03-28 5/250 2026-03-29 10:34 by 唐沐儿
[考研] 0703化学调剂，求导师收 +9 天天好运来上岸� 2026-03-24 10/500 2026-03-28 22:17 by chemzp
[考研] 283求调剂 +3 A child 2026-03-28 3/150 2026-03-28 15:41 by ms629
[考研] 394求调剂 +3 好事多磨静候佳� 2026-03-26 5/250 2026-03-28 14:24 by 唐沐儿
[考研] 求调剂 +6 芦lty 2026-03-25 7/350 2026-03-28 13:13 by 唐沐儿
[考研] 调剂 +3 好好读书。 2026-03-28 3/150 2026-03-28 12:04 by 王保杰33
[考研] 085405 考的11408求各位老师带走 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 09:19 by 乐呵呵的追梦人
[考研] 286求调剂 +4 丢掉懒惰 2026-03-27 7/350 2026-03-28 08:07 by baoball
[材料工程] 一志愿C9材料与化工专业总分300求调剂 +8 曼111 2026-03-24 9/450 2026-03-28 07:58 by YYYYX1234
[考研] 08开头275求调剂 +4 拉谁不重要 2026-03-26 4/200 2026-03-27 14:12 by Delta2012
[考研] 一志愿郑大085600，310分求调剂 +5 李潇可 2026-03-26 5/250 2026-03-27 11:14 by 不吃魚的貓
[考研] 292求调剂 +4 求求了收下我吧� 2026-03-26 4/200 2026-03-27 10:37 by zhshch
[考研] 求调剂，一志愿 南京航空航天大学大学 ，080500材料科学与工程学硕 +4 @taotao 2026-03-26 5/250 2026-03-27 08:10 by hypershenger
[考研] 325求调剂 +5 李嘉图·S·路 2026-03-23 5/250 2026-03-27 00:42 by wxiongid
[考研] 081200-11408-276学硕求调剂 +3 崔wj 2026-03-26 3/150 2026-03-26 19:57 by nihaoar
[考研] 环境专硕324分求调剂推荐 +5 轩小宁—— 2026-03-26 5/250 2026-03-26 12:05 by i_cooler
[考研] 【2026考研调剂】制药工程 284分 求相关专业调剂名额 +4 袁奂奂 2026-03-25 8/400 2026-03-25 14:32 by lbsjt
[考研] 300分，材料，求调剂，英一数二 +5 超赞的 2026-03-24 5/250 2026-03-24 21:07 by 星空星月
信息提示
关闭
请填处理意见
关闭