18-10-2006, 11:55 PM
Code:
Public Sub TestOne(ByVal Index As Long)
Dim a As Single
a = Sqr(LookupTable(Index))
End Sub
Code:
Public Sub TestTwo(ByVal Index As Long)
Dim a As Single
a = LookupTable(Index) ^ 0.5
End Sub
Code:
%Faster -98.4| -98.4| -98.4| -98.4| -98.4| -98.4| -98.5| -98.4| -98.4| -98.4
Test1 162| 160| 169| 161| 160| 161| 159| 161| 160| 161
Test2 10272| 10262| 10263| 10283| 10281| 10274| 10278| 10267| 10258| 10265
Nope. Not by a long shot. :wink: