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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 螺旋波波头 程序调试 除零错误
131/2返回列表12下一页
查看: 1641  |  回复: 12
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

awkard

新虫 (初入文坛)

[求助] 螺旋波波头 程序调试 除零错误

在调用螺旋波波头tip这个子程序时  程序进行几分钟就出现除零错误  而不调用tip时可顺利执行 但检查了几遍 都没发现tip有除零，作为除数都以保证其不为零了  纠结啊 该怎么改?
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2012-04-07 17:14:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

感谢参与，应助指数 +1
这个叫别人咋帮你啊？上 gdb 之类的调试器了……
赞一下 回复此楼
2楼2012-04-07 17:27:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lijie169

铜虫 (著名写手)

【答案】应助回帖

感谢参与，应助指数 +1
简单，写个if语句，if(除数==0)咋样else咋样
赞一下 回复此楼
3楼2012-04-07 17:56:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

awkard

新虫 (初入文坛)
程序中有很多是这样的 if (abs(px11-px1).lt.1.e-9) then
             goto 11
          else
          slope1=(py11-py1)/(px11-px1)
          xp=px0
          yp=py1+slope1*(xp-px1)
          endif
11就是结束 除数 应该不会为零啊
赞一下 回复此楼
4楼2012-04-07 19:25:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

awkard

新虫 (初入文坛)
怎么回事呢？
回复此楼
5楼2012-04-07 19:27:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

awkard

新虫 (初入文坛)
引用回帖:
2楼: Originally posted by snoopyzhao at 2012-04-07 17:27:23:
这个叫别人咋帮你啊？上 gdb 之类的调试器了……

调试器怎么用啊
回复此楼
6楼2012-04-07 19:31:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

引用回帖:
4楼: Originally posted by awkard at 2012-04-07 19:25:28:
程序中有很多是这样的 if (abs(px11-px1).lt.1.e-9) then
             goto 11
          else
          slope1=(py11-py1)/(px11-px1)
          xp=px0
          yp=py1+slope1*(xp-px1)
          e ...

你能确定在这里出的问题吗？

你能定位到哪一句吗？如果能的话，把那个分母打印出来看看。

还有，你的变量是什么精度的？double precision？
赞一下 回复此楼
7楼2012-04-07 19:55:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

引用回帖:
6楼: Originally posted by awkard at 2012-04-07 19:31:59:
调试器怎么用啊

这个一句两句说不清楚，我自己很少用，我比较土，用 write....
赞一下 回复此楼

» 本帖已获得的红花（最新10朵）

awkard awkard
8楼2012-04-07 19:56:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

awkard

新虫 (初入文坛)
引用回帖:
8楼: Originally posted by snoopyzhao at 2012-04-07 19:56:02:
这个一句两句说不清楚，我自己很少用，我比较土，用 write....

是这样的  只有在子程序调用时才有除零的错  子程序中除法的使用 都是像上面的语句  小于某个数  就直接跳出 不会执行 后面的除法了？ 你说 变量是什么精度的 什么意思 定义的是 real 浮点数  Fortran 我不是太懂 但是一定要将这程序调好 麻烦你了
赞一下 回复此楼
9楼2012-04-07 20:24:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

awkard

新虫 (初入文坛)
送鲜花一朵
引用回帖:
8楼: Originally posted by snoopyzhao at 2012-04-07 19:56:02:
这个一句两句说不清楚，我自己很少用，我比较土，用 write....

只有调用子程序时 才会有除零的错 只有类似于上面的程序才会出现除法 但除数都已排除零了 你说的精度是怎么回事啊 我也在想可能是这个问题 我定义的都是 real 浮点型
赞一下 回复此楼
10楼2012-04-07 20:51:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 awkard 的主题更新
131/2返回列表12下一页
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭