Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11) Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11)

Calcular un determinante 4x4

(%i1) matrix[(a,a,a,a],[2,a,a,a],[3,2,a,a],[4,3,2,a])$
(%i2) determinant(%);
(%o2) a*(a*(a^2-2*a)+a^2+(4-3*a)*a)-a*(2*(a^2-2*a)+a^2+(6-4*a)*a)+a*(a^2-a)-a*(-(6-4*a)*a+a+2*(4-3*a))
(%i3) ratsimp(%);
(%o3) a^4-6*a^3+12*a^2-8*a