Add()

[Spodi]

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: