aboutsummaryrefslogtreecommitdiffstats
path: root/buch/chapters/40-eigenwerte/uebungsaufgaben/4003.maxima
blob: bbbc045fafeb1970d249d5bf8a3c1fce56a0545a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
/* 
 * 4003.maxima - algebraische Lösung von Aufgabe 4003
 *
 * (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
 */

A: matrix(
 [ -13,   5, -29,  29 ],
 [ -27,  11, -51,  51 ],
 [  -3,   1,  -2,   5 ],
 [  -6,   2, -10,  13 ]);

p: expand(charpoly(A,x));
tex(p);
factor(p);