设为首页收藏本站如何选择编译器？在线F77转F90 繁体浏览

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › 写了一个程序，结果输出的数组是一个值，求赐教啊 ...

12 / 2 页

返回列表发新帖

楼主: renlu617

上一主题

下一主题

[求助] 写了一个程序，结果输出的数组是一个值，求赐教啊

954 帖子	0 主题	0 精华

F 币: 184 元
贡献: 75 点

发消息

11^#

发表于 2015-8-21 19:49:31 | 只看该作者

在我这里，并没有出现你截图中的 end-of-file 错误。而是浮点数错误。
究其原因，在于
womiga0 = abs(acos(-tan(delta)*tan(fai)))
此处的 tan(delta)*tan(fai) 无法保证在 [ -1 , 1 ] 区间内。当 delta 大于 -1.5049 时，tan(delta)*tan(fai) 的结果为 1.0288
至此，无法计算 acos
你可以在此句前面加上 write(*,*) delta,tan(delta),tan(delta)*tan(fai) 以便观察。

最后，对于这种运行时错误，建议你学会自行debug，可参考此文：http://debug.w.fcode.cn

回复支持反对

使用道具举报

12 / 2 页

返回列表发新帖

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 20:20

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表