
-- Input generated from SquareMatrixXmpPage
)clear all

)set expose add constructor SquareMatrix
m := squareMatrix [[1,-%i],[%i,4]]
m*m - m
mm := squareMatrix [[m, 1], [1-m, m**2]]
p := (x + m)**2
p::SquareMatrix(2, ?)
