SchnittRaum[basis1_List, basis2_List] := Module[{ker}, If[Length[basis1] == 0, Return[basis1]]; If[Length[basis2] == 0, Return[basis2]]; ker = (Take[#1, Length[basis1[[1]]]]&) /@ NullSpace[Transpose[Join[basis1, basis2]]]; Table[Sum[ker[[i,j]]*basis1[[j]], {j, 1, Length[basis1]}], {i, 1, Length[ker]}] ]; KomplementaerRaum[basis_List] := Module[{B, C, j}, B = DeleteCases[RowReduce[basis], {(0)..}]; C = IdentityMatrix[Length[basis[[1]]]]; Do[j = 1; While[B[[i,j]] == 0, j++]; C[[j,j]] = 0, {i, 1, Length[B]}]; DeleteCases[C, {0..}] ] KomplementaerRaum[basis_List, outer_List] := SchnittRaum[KomplementaerRaum[basis], outer]
Ergebnis:
1 | 2 | 3 | 4 | 5 |
1 | 5 | 4 | 2 | 2 |
Die Notenverteilung wird wegen der geringen Teilnehmerzahl nicht veröffentlicht.
Gelegenheit zur Einsichtnahme besteht am Donnerstag, 5.10. um 10.00 Uhr am Institut für Algebra.
Bitte melden Sie sich auf KUSSS zur Klausur an. Die Anmeldung hat rein organisatorische Zwecke. Während der Klausur haben Sie jederzeit die Möglichkeit, die Klausur ohne Abgabe und ohne Angabe von Gründen abzubrechen. Ein solcher Abbruch wird nicht als Fehlversuch gewertet. Erst mit der Abgabe einer Lösung haben Sie offiziell an der Klausur teilgenommen und bekommen eine Bewertung.
Ausgabedatum | Besprechungsdatum | Übungsblatt | Minitest |
06.03.2017 | 13.03.2017 | u1-linalg2-s17.pdf | minitest1.pdf |
13.03.2017 | 20.03.2017 | u2-linalg2-s17.pdf | minitest2.pdf |
20.03.2017 | 27.03.2017 | blatt3.pdf | minitest3.pdf |
27.03.2017 | 03.04.2017 | blatt04.pdf | minitest4.pdf |
03.04.2017 | 24.04.2017 | u5-linalg2-s17.pdf | minitest5.pdf |
24.04.2017 | 08.05.2017 | u6-linalg2-s17.pdf | minitest6.pdf |
08.05.2017 | 15.05.2017 | blatt7.pdf | minitest7.pdf |
08.05.2017 | 22.05.2017 | blatt08.pdf | minitest8.pdf |
22.05.2017 | 29.05.2017 | u9-linalg2-s17.pdf | minitest9.pdf |
29.05.2017 | 12.06.2017 | u10-linalg2-s17.pdf | minitest10.pdf |
12.05.2017 | 19.06.2017 | blatt11.pdf (geänderte Fassung: 2017-06-13 09:50) | minitest11.pdf |
19.06.2017 | 26.06.2017 | blatt12.pdf |