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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 没error，但是就是运行不出结果。。。求大家帮忙
21/1返回列表
查看: 315  |  回复: 1
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

stone1985

铁杆木虫 (著名写手)

[求助] 没error，但是就是运行不出结果。。。求大家帮忙

如题
现在调试的没error
但是不出结果
求各位高手帮帮忙
谢谢大家[ Last edited by stone1985 on 2012-6-18 at 11:30 ]
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
    本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com
  • 附件 1 : BANFAC.FOR
    • 2012-06-18 10:30:30, 789 bytes
  • 附件 2 : BANSOL.FOR
    • 2012-06-18 10:30:30, 856 bytes
  • 附件 3 : REDIF.FOR
    • 2012-06-18 10:30:30, 777 bytes
  • 附件 4 : TWDIF.DAT
    • 2012-06-18 10:30:31, 82 bytes
  • 附件 5 : TWDIF.FOR
    • 2012-06-18 10:30:31, 4.71 K

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
士不可以不弘毅，任重而道远。仁以为己任，不亦重乎！死而后已，不亦远乎！
1楼 2012-06-14 13:15:11
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
stone1985: 金币+10, ★★★★★最佳答案, 我不知道是不是我编译器的问题，别人也可以运行出来，但是这个结果也有些问题，刚才在一个qq群里有个高手已经帮我解决了，谢谢你！ 2012-06-18 15:59:34
xzhdty: 金币+2, 谢谢参与 2012-06-18 18:07:37
有结果啊，呵呵……

编译完了，直接运行那个生成的文件，会得到如下结果：
CODE:
UNSTEADY HEAT CONDUCTION WITH NX,NY=  6  6
ME=  2 GAM= 0.00 BETA= 0.00 SX,SY= 1.000 1.000
APPROX. FACT.,LINEAR FEM, EMX= 0.167E+00 0.667E+00 0.167E+00
DIRICHLET B.C.
DTIM= 0.400E+04PRINT INT.= 0.160E+00 TMAX= 0.502E+02


T=100.000 79.707 61.400 46.872 37.545 34.331
T= 84.000 49.041 29.767 23.052 14.334 21.545
T= 68.000 49.304 28.859 22.638 13.497 14.872
T= 52.000 40.080 24.179 19.749 12.728 13.400
T= 36.000 25.580 17.140 15.206 11.587 15.707
T= 20.000 20.000 20.000 20.000 20.000 20.000
E=  0.000  0.000  0.000  0.000  0.000  0.000
E=  0.000-15.659-17.523-10.421-10.267  0.000
E=  0.000 -2.279 -7.913 -2.381 -3.976  0.000
E=  0.000  0.008 -5.132 -1.023 -2.561  0.000
E=  0.000 -4.149 -6.932 -4.377 -5.113  0.000
E=  0.000  0.000  0.000  0.000  0.000  0.000
TIME= 0.4000E+04 RMST= 0.7906D+01
赞一下 回复此楼
2楼2012-06-18 14:39:14
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 stone1985 的主题更新
21/1返回列表
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:48 by Aj1rhIDL5ixY
[考研] 售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急 +3 3n8v2C8RimXI 2026-09-13 4/200 2026-09-14 15:45 by Aj1rhIDL5ixY
[找工作] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +5 QUjhNVAcOSff 2026-09-13 6/300 2026-09-14 15:21 by Aj1rhIDL5ixY
[考博] 售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急 +4 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 15:13 by Aj1rhIDL5ixY
[硕博家园] 售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 15:09 by Aj1rhIDL5ixY
[博后之家] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 15:01 by Aj1rhIDL5ixY
[公派出国] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 QUjhNVAcOSff 2026-09-13 6/300 2026-09-14 15:00 by Aj1rhIDL5ixY
[考研] 售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 14:57 by Aj1rhIDL5ixY
[考博] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-14 12:35 by 40ms4Wlo4umh
[基金申请] 求教各位大神：2026教育部人文社科青年基金项目何时公示呀？ +5 云宴山人 2026-09-10 7/350 2026-09-14 12:11 by ecnu2013
[找工作] 浙江师范大学是怎么坑我的 +6 recruit123 2026-09-09 6/300 2026-09-14 12:00 by 萨仁其其格
[考研] 售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急 +3 LwdutQ8HoqWP 2026-09-13 3/150 2026-09-14 11:13 by 23jxep3nCNZb
[博后之家] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 3n8v2C8RimXI 2026-09-13 3/150 2026-09-14 10:56 by 23jxep3nCNZb
[博后之家] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +3 QUjhNVAcOSff 2026-09-13 3/150 2026-09-14 10:11 by 23jxep3nCNZb
[考研] 售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急 +3 QUjhNVAcOSff 2026-09-13 4/200 2026-09-14 10:01 by 23jxep3nCNZb
[考博] 西北工业大学材料学院电化学传感与催化课题组招收2027年推免研究生、博士生、博士后 +3 马方园 2026-09-10 4/200 2026-09-14 09:29 by Chem张zz
[考博] 27秋季材料博士申请求助 10+3 Cahal1 2026-09-11 4/200 2026-09-14 08:50 by 北京莱茵编辑
[教师之家] 浙江师范大学是怎么坑我的 +10 recruit123 2026-09-09 15/750 2026-09-13 10:45 by seaskyy
[基金申请] 面上有专家说实验设备不是我们单位的 +6 zj_muchong 2026-09-08 8/400 2026-09-11 06:56 by suifengdao
[有机交流] 科研求助 10+4 我吃一只鱼 2026-09-07 4/200 2026-09-10 08:32 by 0940628
信息提示
关闭
请填处理意见
关闭