Vector Zero Test

''' ---------------
''' Zero vector test
''' ---------------
Function IsVectorZero(v)

IsVectorZero = vbFalse
If (v(XX) = 0.0) And (v(YY) = 0.0) And (v(ZZ) = 0.0) Then IsVectorZero = vbTrue

End Function

Page tags: library vector
page_revision: 0, last_edited: 1217787402|%e %b %Y, %H:%M %Z (%O ago)
EditTags History Files Print Site tools+ Options
Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License