From e89e7949b93d684c387db5062b2743c0207205ca Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andreas=20M=C3=BCller?= 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/matrix.m') 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 From 9243858393d79e761f03b4454547310056d7fcea Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andreas=20M=C3=BCller?= Date: Sun, 7 Mar 2021 21:00:59 +0100 Subject: Gauss --- buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m') diff --git a/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m b/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m index ed85185..42e9d9f 100644 --- a/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m +++ b/buch/chapters/30-endlichekoerper/uebungsaufgaben/3004/matrix.m @@ -6,13 +6,14 @@ n = 4 N = 20; +p = 2; d = 0; while d == 0 A = round(N * rand(n,n)); - B = mod(A, 2); + B = mod(A, p); d = det(B); - d = mod(d, 2); + d = mod(d, p); d = d * B(1,1); end A -- cgit v1.2.1