24小时热门版块排行榜    

查看: 2491  |  回复: 12

张征HIT

新虫 (初入文坛)

[求助] 求助:fortran程序中换行及return报错

各位好,
我在用网上的一段程序练习移动的激光热流密度生成,但是编程调整之后还是出现问题,就像图中所示,请求各位不吝赐教。
求助:fortran程序中换行及return报错
2013-07-01_160847.jpg
回复此楼

» 猜你喜欢

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

学着承担
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

icecream8508

金虫 (著名写手)

编译出现三个错误,就是语法错误了。

Error: Syntax error, found '&' when expecting one of: * <IDENTIFIER>
      Subroutine DFLUX(FLUX,SOL,KSTEP,KINC,TIME,NOEL,NPT,COORDS,JLTYP,&
----------------------------------------------------------------------^
E:\Model-P\Lianxi\laser.for(2) : Error: Syntax error, found ',' when expecting one of: ( : % . = =>
TEMP,PRESS,SNAME)
------------^
E:\Model-P\Lianxi\laser.for(2) : Error: Syntax error, found END-OF-STATEMENT when expecting one of: ( % . = =>
TEMP,PRESS,SNAME)
-------------------------^
Error executing df.exe.

你自己查查吧。
而且建议最好用free格式来编写fortran文件了,fixed的太多限制了。
10楼2013-07-01 16:56:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

【答案】应助回帖

感谢参与,应助指数 +1
把源程序贴上来,别人好试。图片怎么弄啊?总是要方便帮你的人吧
2楼2013-07-01 16:25:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

张征HIT

新虫 (初入文坛)

不好意思,附件已上传
学着承担
3楼2013-07-01 16:30:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

张征HIT

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by pippi6 at 2013-07-01 16:25:35
把源程序贴上来,别人好试。图片怎么弄啊?总是要方便帮你的人吧

不好意思,源程序已上传

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : laser.for
  • 2013-07-01 16:33:34, 845 bytes
学着承担
4楼2013-07-01 16:33:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

icecream8508

金虫 (著名写手)

头两个错误是说括号用法错了,没有配套使用。
5楼2013-07-01 16:34:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

张征HIT

新虫 (初入文坛)

引用回帖:
5楼: Originally posted by icecream8508 at 2013-07-01 16:34:56
头两个错误是说括号用法错了,没有配套使用。

一左一右两个括号不正好么?为什么说没有配套使用呢?
学着承担
6楼2013-07-01 16:41:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

icecream8508

金虫 (著名写手)

我只是看到错误信息这么说的。
unpaired
7楼2013-07-01 16:44:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

【答案】应助回帖

★ ★ ★
张征HIT: 金币+3, ★★★很有帮助 2013-07-02 09:55:06
引用回帖:
4楼: Originally posted by 张征HIT at 2013-07-01 16:33:14
不好意思,源程序已上传...

我试了你的程序,编译没问题。
此句
INCLUDE'ABA_PARAM.INC'
由于没有源代码,我注销了。那里有没有问题就不知道了。
如有文件 ‘ABA_PARAM.INC',可贴上来看看。

这么短的程序,下回直接粘贴,还上传什么啊。
8楼2013-07-01 16:44:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

张征HIT

新虫 (初入文坛)

引用回帖:
8楼: Originally posted by pippi6 at 2013-07-01 16:44:42
我试了你的程序,编译没问题。
此句
INCLUDE'ABA_PARAM.INC'
由于没有源代码,我注销了。那里有没有问题就不知道了。
如有文件 ‘ABA_PARAM.INC',可贴上来看看。

这么短的程序,下回直接粘贴,还上传什么 ...

谢谢啊,aba_pamam.inc应该是没问题,这个是abaqus软件的一个小子程序,我想知道在提示区的这三个错误是个啥情况,哎,我接触fortran并不长,甚至一些基本的东西都还没弄懂,大哥你看看这三个错误有什么解决办法么。。
学着承担
9楼2013-07-01 16:52:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 张征HIT 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 申请科研项目纯靠实力能成功吗? 200+5 David1982 2026-10-13 8/400 2026-10-14 21:38 by lhw_GPA4.0
[论文投稿] 二审4个多月了还是Awaiting Reviewer Scores 10+3 纳斯达克ML 2026-10-11 4/200 2026-10-14 17:30 by babero
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +8 wangyl_123 2026-10-10 13/650 2026-10-14 15:12 by zuesli
[教师之家] 课题组会帮你通过考核么? +4 好运来~9527 2026-10-10 7/350 2026-10-13 08:41 by xli1984
[基金申请] 入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍 +6 13108017953 2026-10-08 6/300 2026-10-12 20:07 by w3w3y3
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:34 by XQNyDCa1Tk5n
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:26 by XQNyDCa1Tk5n
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 22:26 by XQNyDCa1Tk5n
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
[有机交流] 各位大佬,路线设计求助 +6 zapen 2026-10-08 8/400 2026-10-10 15:59 by zapen
[有机交流] 我应该选哪条合成路线让实验成功率高一些? +5 jing816y 2026-10-08 9/450 2026-10-10 09:05 by zapen
信息提示
请填处理意见