Fortran Coder

标题: 关于一个数值判定的问题 [打印本页]

作者: renlu617 时间: 2015-4-1 17:15
标题: 关于一个数值判定的问题
以下是一组数据，我想设定TA(I)到TA(I+8)中只要有6个TA是大于0的，则TA(I)是累加的起点，这个逻辑怎么写啊？
DOY          TA(I)
2008/1/1       -383.2
2008/1/2       -384.4
2008/1/3       -277.1
2008/1/4       -168.4
2008/1/5       -206.5
2008/1/6       -255.6
2008/1/7       -209.2
2008/1/8       -164.0
2008/1/9       -198.1

作者: vvt 时间: 2015-4-1 17:22
本帖最后由 vvt 于 2015-4-1 17:25 编辑

[Fortran] 纯文本查看 复制代码

if ( count( TA(i:i+8)>0.0 ) >= 6 )

作者: pasuka 时间: 2015-4-2 20:23
建议还是整个epsilon做比较，直接上0.0或许不妥

作者: vvt 时间: 2015-4-2 20:48
如果是 > r ，有必要整。
但是 0.0 计算机是可以精确表述的，大于 0.0 只要判断符号位就行了。不会有问题。

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)