]> git.somenet.org - pub/jan/funcprog.git/blob - Aufgabe8.hs_2.out
all the funcprog files
[pub/jan/funcprog.git] / Aufgabe8.hs_2.out
1 Punkte pro Testfall: 5; Abzug pro fehlerhaften Testfall: 0; Maximum: 25 
2
3 Testfall: {-1,1-}color (Ug [(0,Red,[])])  ; Testfall FALSCH 
4 Erwartet: {-1,1-}color (Ug [(0,Red,[])]) == Just (Ug [(0,Red,[])]) 
5 Ausgabe:  {-1,1-}color (Ug [(0,Red,[])]) ==ERROR - Undefined data constructor "Red"   
6 Testfall: {-1,2-}color (Ug [ (i,Red,[0..(i-1)]++[(i+1)..5]) | i <- [0..5]])  ; Testfall FALSCH 
7 Erwartet: {-1,2-}color (Ug [ (i,Red,[0..(i-1)]++[(i+1)..5]) | i <- [0..5]]) == Nothing 
8 Ausgabe:  {-1,2-}color (Ug [ (i,Red,[0..(i-1)]++[(i+1)..5]) | i <- [0..5]]) ==ERROR - Undefined data constructor "Red"   
9 Testfall: {-1,3-}[1|(Just _)<-[color (Ug [(0,Red,[1,2,3]), (1,Red,[0,2,3]), (2,Red,[0,1]), (3,Red,[0,1])])]]  ; Testfall FALSCH 
10 Erwartet: {-1,3-}[1|(Just _)<-[color (Ug [(0,Red,[1,2,3]), (1,Red,[0,2,3]), (2,Red,[0,1]), (3,Red,[0,1])])]] == [1] 
11 Ausgabe:  {-1,3-}[1|(Just _)<-[color (Ug [(0,Red,[1,2,3]), (1,Red,[0,2,3]), (2,Red,[0,1]), (3,Red,[0,1])])]] ==ERROR - Undefined data constructor "Red"   
12 Testfall: {-1,4-}[1|(Just _)<-[color (Ug [ (i,Red,[(i-1) `mod` 6,(i+1) `mod` 6]) | i <- [0..5]])]]  ; Testfall FALSCH 
13 Erwartet: {-1,4-}[1|(Just _)<-[color (Ug [ (i,Red,[(i-1) `mod` 6,(i+1) `mod` 6]) | i <- [0..5]])]] == [1] 
14 Ausgabe:  {-1,4-}[1|(Just _)<-[color (Ug [ (i,Red,[(i-1) `mod` 6,(i+1) `mod` 6]) | i <- [0..5]])]] ==ERROR - Undefined data constructor "Red"   
15 Testfall: {-1,5-}color (Ug [ (i,Blue,[0..(i-1)]++[(i+1)..4]) | i <- [0..4]])  ; Testfall FALSCH 
16 Erwartet: {-1,5-}color (Ug [ (i,Blue,[0..(i-1)]++[(i+1)..4]) | i <- [0..4]]) == Nothing 
17 Ausgabe:  {-1,5-}color (Ug [ (i,Blue,[0..(i-1)]++[(i+1)..4]) | i <- [0..4]]) ==ERROR - Undefined data constructor "Blue"   
18
19 Testfaelle OK: 0; Testfaelle FALSCH: 5
20 Punkte : 0
21
22 Punkte pro Testfall: 5; Abzug pro fehlerhaften Testfall: 0; Maximum: 25 
23
24 Testfall: {-2a,1-}[v|v<-[Basic,Cross,Color],isValid[[1..9]|i<-[1..9]] v] == []; Testfall OK 
25 Testfall: {-2a,2-}[v|v<-[Basic,Cross,Color],not(isValid[[0|i<-[1..9]]|i<-[1..9]] v)] == []; Testfall OK 
26 Testfall: {-2a,3-}[v|v<-[Basic,Cross,Color],not(isValid([1..9]:[[0|i<-[1..9]]|i<-[2..9]]) v)] == []; Testfall OK 
27 Testfall: {-2a,4-}[v|v<-[Basic,Cross,Color],isValid[[0,0,3,4,5,0,0,0,0],[0,0,6,0,0,6,1,2,3],[0,8,9,1,2,3,4,5,6],[0,3,1,6,7,4,8,9,5],[0,7,5,0,0,0,3,0,0],[6,9,4,5,3,0,2,0,0],[9,1,2,3,0,0,0,0,0],[0,0,0,2,9,0,6,0,0],[0,0,0,8,4,0,0,0,0]]v] == []; Testfall OK 
28 Testfall: {-2a,5-}[v|v<-[Basic,Cross,Color],isValid[[0,0,3,4,0,0,0,0,0],[4,5,0,7,8,9,1,0,0],[7,8,0,1,2,3,0,5,0],[0,6,4,2,1,7,9,0,0],[2,9,1,5,0,0,0,7,4],[0,0,8,6,9,4,0,0,0],[0,0,5,9,0,2,0,4,1],[0,0,7,8,0,0,0,6,2],[0,0,2,0,0,1,0,0,6]]v] == []; Testfall OK 
29 Testfall: {-2a,6-}[v|v<-[Basic,Cross,Color],isValid[[0,0,3,4,0,0,0,0,0],[4,5,0,7,8,9,1,0,0],[7,8,0,1,2,3,0,5,0],[0,6,4,2,1,7,9,0,0],[2,9,1,5,0,0,0,7,4],[0,0,8,6,9,4,0,0,0],[0,0,5,9,0,2,0,4,1],[0,0,7,8,0,0,0,6,2],[0,0,2,0,0,1,0,0,0]]v] == [Basic,Cross]; Testfall OK 
30
31 Testfaelle OK: 6; Testfaelle FALSCH: 0
32 Punkte : 25
33
34 Punkte pro Testfall: 10; Abzug pro fehlerhaften Testfall: 0; Maximum: 50 
35
36 Testfall: {-2b,1-}let s=[[1,2,3,4,5,6,7,8,9],[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve s Color  ; Testfall FALSCH 
37 Erwartet: {-2b,1-}let s=[[1,2,3,4,5,6,7,8,9],[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve s Color == Just s 
38 Ausgabe:  {-2b,1-}let s=[[1,2,3,4,5,6,7,8,9],[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve s Color ==ERROR - Undefined variable "solve"   
39 Testfall: {-2b,2-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve ([0,0,0,0,0,0,0,0,0]:s) Color  ; Testfall FALSCH 
40 Erwartet: {-2b,2-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve ([0,0,0,0,0,0,0,0,0]:s) Color == Just ([1..9]:s) 
41 Ausgabe:  {-2b,2-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve ([0,0,0,0,0,0,0,0,0]:s) Color ==ERROR - Undefined variable "solve"   
42 Testfall: {-2b,3-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve (reverse([0,0,0,0,0,0,0,0,0]:s)) Color  ; Testfall FALSCH 
43 Erwartet: {-2b,3-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve (reverse([0,0,0,0,0,0,0,0,0]:s)) Color == Just(reverse([1..9]:s)) 
44 Ausgabe:  {-2b,3-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve (reverse([0,0,0,0,0,0,0,0,0]:s)) Color ==ERROR - Undefined variable "solve"   
45 Testfall: {-2b,4-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve (reverse([0,0,0,0,0,0,0,0,0]:s)) Cross  ; Testfall FALSCH 
46 Erwartet: {-2b,4-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve (reverse([0,0,0,0,0,0,0,0,0]:s)) Cross == Nothing 
47 Ausgabe:  {-2b,4-}let s=[[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve (reverse([0,0,0,0,0,0,0,0,0]:s)) Cross ==ERROR - Undefined variable "solve"   
48 Testfall: {-2b,5-}let s=[[1,1,3,4,5,6,7,8,9],[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve s Color  ; Testfall FALSCH 
49 Erwartet: {-2b,5-}let s=[[1,1,3,4,5,6,7,8,9],[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve s Color == Nothing 
50 Ausgabe:  {-2b,5-}let s=[[1,1,3,4,5,6,7,8,9],[4,5,6,7,8,9,1,2,3],[7,8,9,1,2,3,4,5,6],[2,3,1,6,7,4,8,9,5],[8,7,5,9,1,2,3,6,4],[6,9,4,5,3,8,2,7,1],[9,1,2,3,6,7,5,4,8],[5,4,8,2,9,1,6,3,7],[3,6,7,8,4,5,9,1,2]] in solve s Color ==ERROR - Undefined variable "solve"   
51
52 Testfaelle OK: 0; Testfaelle FALSCH: 5
53 Punkte : 0
54
55 Punkte gesamt: 25
56