-
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathAufgabe3.lhs_1.out
42 lines (29 loc) · 2.32 KB
/
Aufgabe3.lhs_1.out
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Punkte pro Testfall: 5; 0; Maximum: 25
Testfall: {-1.1-}[length[1|t<-[1..31],m<-[1..6],wochentag3 (1,1) "Montag"False(t,m)==w]|w<-["Montag"]] == [26]; Testfall OK
Testfall: {-1.2-}[length[1|t<-[1..31],m<-[1..6],wochentag3 (7,1) "Montag"False(t,m)==w]|w<-["Montag"]] == [25]; Testfall OK
Testfall: {-1.3-}[length[1|t<-[1..31],m<-[1..6],wochentag3 (10,10) "Montag"True(t,m)==w]|w<-["Montag"]] == [26]; Testfall OK
Testfall: {-1.4-}[length[1|t<-[1..31],m<-[1..6],wochentag3 (31,12) "Montag"True(t,m)==w]|w<-["Montag"]] == [26]; Testfall OK
Testfall: {-1.5-}[length[1|t<-[1..12],m<-[1..3],j<-[1..31],wochentag3(j,3) "Montag"True(t,m)==w]|w<-["Montag"]] == [160]; Testfall OK
Testfaelle OK: 5; Testfaelle FALSCH: 0
Punkte : 25
Punkte pro Testfall: 15; 0; Maximum: 30
Testfall: {-2.1-}[pwv[l]|l<-["","AAA","aabbae","aabbaee"]] == [0,0,1,1]; Testfall OK
Testfall: {-2.2-}[pwv[l,k]|g<-[["","AAA","aabbae","aabbaee"]],l<-g,k<-g] == [0,0,1,1,0,0,1,1,1,1,1,2,1,1,2,1]; Testfall OK
Testfaelle OK: 2; Testfaelle FALSCH: 0
Punkte : 30
Punkte pro Testfall: 5; 0; Maximum: 20
Testfall: {-3.1-}[i|i<-[1..7],[]/=streamline[[x]|x<-show(3^7^3)]i] == []; Testfall OK
Testfall: {-3.2-}[i|i<-[8..16],[]/=streamline[[x]|x<-show(3^7^3)]i] == [10,11,12,13,15]; Testfall OK
Testfall: {-3.3-}[i|i<-[1..16],[]/=streamline[[x]|x<-show(3^6^3)]i] == [4,7,8,11,12,13]; Testfall OK
Testfall: {-3.4-}[streamline[show(3^i)|i<-[1,3,2,1,3]]j|j<-[0..3]] == [[],["9"],["3","27","3","27"],[]]; Testfall OK
Testfaelle OK: 4; Testfaelle FALSCH: 0
Punkte : 20
Punkte pro Testfall: 5; 0; Maximum: 25
Testfall: {-4.1-}take 5[[x,y,z,cs!!a,cs!!b,cs!!c]|cs<-["0123456789"],l<-["BCD"],x<-l,y<-l,z<-l,a<-[2..4],b<-[2..4],c<-[2..4],k<-[((x,y,z),(a,b,c))],f<-[(vg.nf),(vg.vg.nf.nf),(vg.vg.vg.nf.nf.nf)],k/=f k] == []; Testfall OK
Testfall: {-4.2-}take 5[[x,y,z,cs!!a,cs!!b,cs!!c]|cs<-["0123456789"],l<-["BCD"],x<-l,y<-l,z<-l,a<-[2..4],b<-[2..4],c<-[2..4],k<-[((x,y,z),(a,b,c))],f<-[(nf),(vg.nf.nf),(nf.nf.nf)],k==f k] == []; Testfall OK
Testfall: {-4.3-}iterate nf(('A','A','A'),(0,0,0))!!300 == (('A','A','A'),(3,0,0)); Testfall OK
Testfall: {-4.4-}iterate nf(('A','Z','Z'),(9,9,9))!!10 == (('B','A','A'),(0,0,9)); Testfall OK
Testfall: {-4.5-}iterate vg(('A','Z','Z'),(9,9,9))!!10 == (('A','Z','Z'),(9,8,9)); Testfall OK
Testfaelle OK: 5; Testfaelle FALSCH: 0
Punkte : 25
Punkte gesamt: 100