Find inverse of a matrix

DATA LIST LIST /a (F8) b (F8) c(F8) d(F8).
BEGIN DATA
2 2 3 4 
4 5 6 9
7 2 9 2
2 5 6 9 
END DATA.


* read matrix data from a regular spss sav file.
MATRIX.
GET M /VARIABLES= a TO d.
PRINT M /TITLE='Original matrix'.
COMPUTE N=INV(M).
PRINT N /TITLE='Inverse of Matrix'.
COMPUTE R=N*M.
PRINT R /TITLE='Product of Matrix and Inverse of Matrix'.
END MATRIX.