Fortran Coder

查看: 9349|回复: 6
打印 上一主题 下一主题

[数值问题] FORTRAN里TOL怎么定义,为什么我的计算不准

[复制链接]

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

楼主
发表于 2017-11-13 10:04:02 | 显示全部楼层
Fortran里面请参考epsilon函数
https://gcc.gnu.org/onlinedocs/g ... PSILON.html#EPSILON
[Fortran] 纯文本查看 复制代码
program test_epsilon
    real :: x = 3.143
    real(8) :: y = 2.33
    print *, EPSILON(x)
    print *, EPSILON(y)
end program test_epsilon

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

沙发
发表于 2017-11-13 16:15:51 | 显示全部楼层
shaoqikao100 发表于 2017-11-13 15:41
十分感谢,我的代码在上面的回复里贴出来了,这里如果要求的精度很明确的话怎么操作。我是看的白海波老师 ...
IMPLICIT REAL*8(A-Z)

往后见着上面这行代码,请直接无视余下所有代码,莫要浪费青春
希望明天就能交作业,请出门左转去马云家
希望三个礼拜达到完成作业的Fortran水平,先把本站的教学视频看三遍,彭国伦的Fortran95程序设计看两遍
http://v.fcode.cn/
http://fcode.cn/resource_ebook-1-1.html
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-5-16 03:38

Powered by Tencent X3.4

© 2013-2024 Tencent

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