removed broken solution & pointlessly pointless

1 files changed, 1 insertions, 6 deletions

diff --git a/ws2015/FFP/blaetter/03/FFP_U03_Funktoren.hs b/ws2015/FFP/blaetter/03/FFP_U03_Funktoren.hs
index eaa09c7..df5de5a 100644
--- a/ws2015/FFP/blaetter/03/FFP_U03_Funktoren.hs
+++ b/ws2015/FFP/blaetter/03/FFP_U03_Funktoren.hs
@@ -106,7 +106,7 @@ testb1 = testT2 == (fmap even testT1)
 
 {-
   fmap ist hier identisch zu (.)
-  λ ((\a -> (a, a)) `fmap` (\i -> i + 2)) 2
+  λ ((\a -> (a, a)) `fmap` (+ 2)) 2
   (4,4)
 -}
 
@@ -151,11 +151,6 @@ alleVariablen' = "" : [v : p | p <- alleVariablen', v <- vars]
   where
     vars = ['a', 'b', 'c', 'd']
     
-alleVariablen'' :: [String]
-alleVariablen'' = [v : p | p <- "" : alleVariablen'', v <- vars]
-  where
-    vars = ['a', 'b', 'c', 'd']
-    
 -- Zum Testen:
 check l x = (map length . groupBy ((==) `on` length)) (take x l)