关于一个数值判定的问题

renlu617

以下是一组数据，我想设定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

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

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

pasuka

建议还是整个epsilon做比较，直接上0.0或许不妥

vvt

如果是  > r ，有必要整。
但是 0.0 计算机是可以精确表述的，大于 0.0 只要判断符号位就行了。不会有问题。