From e89e7949b93d684c387db5062b2743c0207205ca Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andreas=20M=C3=BCller?= <andreas.mueller@ost.ch>
Date: Sun, 7 Mar 2021 18:40:42 +0100
Subject: two new problems

---
 .../uebungsaufgaben/3004/matrix.m                   | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m

(limited to 'buch/chapters/30-endlichekoerper/uebungsaufgaben/3004')

diff --git a/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m b/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m
new file mode 100644
index 0000000..ed85185
--- /dev/null
+++ b/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m
@@ -0,0 +1,21 @@
+#
+# matrix.m
+#
+# (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule
+#
+
+n = 4
+N = 20;
+
+d = 0;
+while d == 0
+	A = round(N * rand(n,n));
+	B = mod(A, 2);
+	d = det(B);
+	d = mod(d, 2);
+	d = d * B(1,1);
+end
+A
+det(A)
+B
+det(B)
-- 
cgit v1.2.1