'
' This example demonstrates how to set up a 4x4 matrix, 
' invert it and then trap whether the inversion was
' successful
'
' Create 4x4 matrices
dim m1 : set m1 = XSIMath.CreateMatrix4(_
	2.0, 3.0, 0.0, 0.0, _ 
	1.0, 4.0, 0.0, 0.0, _
	0.0, 0.0, 1.0, 0.0, _
	0.0, 0.0, 0.0, 1.0)
dim m2 : set m2 = XSIMath.CreateMatrix4
' Make the second matrix the inversion of the first
if m2.Invert(m1) then
	Application.LogMessage "Success :-D"
else
	Application.LogMessage "Failure :-("
end if
' Expected result:
' INFO : Success :-D