From 45794fb198c8fac02b5c82b6ac3f1e17bac1075e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andreas=20M=C3=BCller?= <andreas.mueller@othello.ch>
Date: Tue, 19 Jan 2021 22:08:40 +0100
Subject: =?UTF-8?q?Permutationen=20hinzugef=C3=BCgt?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 buch/chapters/40-eigenwerte/beispiele/n.maxima | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 buch/chapters/40-eigenwerte/beispiele/n.maxima

(limited to 'buch/chapters/40-eigenwerte/beispiele/n.maxima')

diff --git a/buch/chapters/40-eigenwerte/beispiele/n.maxima b/buch/chapters/40-eigenwerte/beispiele/n.maxima
new file mode 100644
index 0000000..9ed83b6
--- /dev/null
+++ b/buch/chapters/40-eigenwerte/beispiele/n.maxima
@@ -0,0 +1,20 @@
+/*
+ * n.maxima
+ *
+ * (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+ */
+A: matrix(
+ [  1,  9, -4 ],
+ [ -1,  3,  0 ],
+ [ -2,  0,  3 ]
+);
+
+p: expand(charpoly(A,x));
+factor(p);
+
+A.A;
+A.A.A;
+
+A.A - 5*A;
+
+A.A.A -7*A.A +16 *A;
-- 
cgit v1.2.1