Initial commit for UE3

This commit is contained in:
Ivaylo Ivanov 2021-11-03 18:06:56 +01:00
parent 0d42190f4f
commit 1036c68e21
1 changed files with 60 additions and 0 deletions

60
code/Angabe3.lhs Normal file
View File

@ -0,0 +1,60 @@
> module Angabe3 where
1. Vervollstaendigen Sie gemaess Angabentext!
2. Vervollständigen Sie auch die vorgegebenen Kommentaranfänge!
3. Loeschen Sie keine Deklarationen aus diesem Rahmenprogramm, auch nicht die Modulanweisug!
4. Achten Sie darauf, dass `Gruppe' Leserechte fuer Ihre Abgabedatei hat!
> type Nat1 = Int
> type Zeile = [Int]
Matrizen konzeptuell als Listen von Zeilen dargestellt:
> newtype Matrix = M [Zeile]
> fehlerwert = M [] :: Matrix
> data Matrixtyp = Mat (Nat1,Nat1) | KeineMatrix deriving (Eq,Show)
Aufgabe A.1
> instance Show Matrix where
> ...
Knapp, aber gut nachvollziebar geht die Instanzdeklaration fuer Show folgendermassen vor:
Aufgabe A.2
> matrixtyp :: Matrix -> Matrixtyp
> ...
Knapp, aber gut nachvollziehbar geht matrixtyp folgendermassen vor:
...
Aufgabe A.3
> instance Eq Matrix where
> ...
Knapp, aber gut nachvollziebar geht die Instanzdeklaration fuer Eq folgendermassen vor:
...
Aufgabe A.4
> instance Num Matrix where
> ...
Knapp, aber gut nachvollziebar geht die Instanzdeklaration fuer Num folgendermassen vor:
...