24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1402  |  回复: 6

zjj6958

新虫 (初入文坛)

[求助] fortran输出求助

为什么我在fortran编程输出时候添加输出格式,计算结果就会发散,不添加计算结果就没问题呢。
                   OPEN(3,FILE='FAI1zy.dat')      
                        WRITE(3,*)' VARIABLES= "Y" "Z" "FAI1" '
                        WRITE(3,*)'ZONE J=',M1,'K=',N1,'F=POINT'                            DO J=1,M1
                        DO K=1,N1
                        WRITE(3,*)R(J),Z(K), FAI1(1,J,K)
                        ENDDO
                        ENDDO
                    CLOSE(3)
比如上边如果把第二个WRITE语句去掉计算结果就没问题,加上这一句后计算结果就会一直增大,这到底是什么问题,难道输出格式也会影响计算结果,求高人指教。
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
你最好给一个可重现的完整的代码,十之八九是向量或矩阵未初始化……
2楼2012-09-07 10:53:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zjj6958

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by snoopyzhao at 2012-09-07 10:53:54
你最好给一个可重现的完整的代码,十之八九是向量或矩阵未初始化……

因为这是一个计算程序中的一段output语句,整个程序比较长,给完整代码比较困难。您所说的向量或矩阵没有初始化是什么意思,输出的这个变量的矩阵没有初始化吗?
3楼2012-09-07 14:46:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


zjj6958: 金币+1, 有帮助 2012-09-12 14:55:30
引用回帖:
3楼: Originally posted by zjj6958 at 2012-09-07 14:46:02
因为这是一个计算程序中的一段output语句,整个程序比较长,给完整代码比较困难。您所说的向量或矩阵没有初始化是什么意思,输出的这个变量的矩阵没有初始化吗?...

我没有办法回复你。

初始化只是一个可能的原因……
4楼2012-09-07 22:45:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zjj6958

新虫 (初入文坛)

自己再看看吧
5楼2012-09-12 14:47:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

祸害一生

银虫 (小有名气)

你加了第二个write对下面的赋值没有影响啊。
祸害一生
6楼2012-09-12 21:45:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zjj6958

新虫 (初入文坛)

引用回帖:
6楼: Originally posted by 祸害一生 at 2012-09-12 21:45:18
你加了第二个write对下面的赋值没有影响啊。

按理说是没有影响的,这几个语句一般都是在迭代到一定次数后才执行的,现在修改了下输出差值,写不写第二个write都没作用了
7楼2012-09-13 21:25:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zjj6958 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 308求调剂 +16 倘若起风了呢 2026-04-05 16/800 2026-04-08 23:03 by 猪会飞
[考研] 0703化学 +29 妮妮ninicgb 2026-04-04 32/1600 2026-04-08 22:50 by 猪会飞
[考研] 288求调剂,一志愿华南理工大学071005 +11 ioodiiij 2026-04-08 11/550 2026-04-08 16:48 by tjzhao
[考研] 315求调剂 +17 小羊小羊_ 2026-04-02 18/900 2026-04-07 22:01 by lijunpoly
[考研] 农学,求调剂,314分 +4 访客记录可爱 2026-04-04 4/200 2026-04-07 21:07 by 等岸
[考研] 一志愿西南090202求调剂 +4 在线求有学上 2026-04-07 4/200 2026-04-07 19:47 by biomichael
[考研] 一志愿南科大生物学297分,求调剂推荐 +8 Y-yyusx 2026-04-06 9/450 2026-04-07 19:38 by biomichael
[考研] 295求调剂 +18 xndjjj 2026-04-04 19/950 2026-04-07 11:02 by wangjy2002
[考研] 08600生物与医药-327 +9 18755400796 2026-04-05 9/450 2026-04-06 22:35 by 52305043001
[考研] 304求调剂 +4 luoye0105 2026-04-05 4/200 2026-04-06 21:05 by 木子君1218
[考研] 298分 070300求调剂 +15 zwen03 2026-04-02 15/750 2026-04-05 12:52 by Hdyxbekcb
[考研] 调剂 +11 JLLLLLLLLLL 2026-04-03 11/550 2026-04-04 22:21 by hemengdong
[考研] 325求调剂 +4 春风不借意 2026-04-04 4/200 2026-04-04 14:46 by 湘农储能材料
[考研] 266求调剂 +8 学员97LZgn 2026-04-03 8/400 2026-04-04 09:02 by 20021109
[考研] 311求调剂 +11 勇敢的小吴 2026-04-02 11/550 2026-04-03 21:46 by qlm5820
[考研] 求调剂 +3 usbdndj 2026-04-03 3/150 2026-04-03 14:10 by dxiaoxin
[硕博家园] 求老师收留 +9 lllq123 2026-04-03 9/450 2026-04-03 13:48 by 呼吸都是减肥
[考研] 求材料调剂 一志愿南昌大学 328分 +5 yyy..... 2026-04-03 5/250 2026-04-03 13:46 by 百灵童888
[考研] 一志愿安徽大学0817化学工程与技术,求调剂 +14 我不是只因 2026-04-02 15/750 2026-04-03 09:49 by 蓝云思雨
[考研] 求调剂 +7 Aniyaio 2026-04-02 7/350 2026-04-02 16:42 by zzsw+
信息提示
请填处理意见