Hi Petr,
I am now getting 100% correct results by assigning data()^2 and results() to SINGLE variables then comparing them.
So I exonerate the GPU from any rounding anomalies.
Oxygen Code:
[code=thinbasic]
' Validate our results
correct = 0
single r,d
'
For i = 1 To count
r=results(i)
d=dat(i) * dat(i)
If r=d Then
correct += 1
Else
'PrintL Round(results(i), 6), Format$(Round(dat(i) * data(i), 6))
if len(s)<1000 then s+=d tab r crlf
End If
Next
[/code]
Bookmarks