hwtue.mws

> with(LinearAlgebra):

> A:=Matrix([[2,-x,2],[1,1,x],[-2,1,-2]]);

>

A := Matrix([[2, -x, 2], [1, 1, x], [-2, 1, -2]])

> d:=Determinant(A);

d := 2-4*x+2*x^2

> solve(d=0,x);

1, 1

> A:=Matrix([[t,1],[0,t]]);

A := Matrix([[t, 1], [0, t]])

> MatrixExponential(A);

Matrix([[exp(t), exp(t)], [0, exp(t)]])

> A:=Matrix([[2*t,t],[0,2*t]]);

A := Matrix([[2*t, t], [0, 2*t]])

> MatrixExponential(A);

Matrix([[exp(2*t), t*exp(2*t)], [0, exp(2*t)]])

>