länge :: [t] -> Int -- Haskell Basisfunktion length länge [] = 0 länge (a:l) = 1 + länge l append :: [t] -> [t] -> [t] -- Haskell-Operator ++ append [] l = l append (a:l') l = a: append l' l funList :: [Float->Float] funList = [(2/), (+3), (^3)] alleAuf :: [ t -> t' ] -> t -> [ t' ] alleAuf [] a = [] alleAuf (f:fl) a = (f a) : alleAuf fl a {- Beispielrechnung: funList `alleAuf` 4 [0.5,7.0,64.0] -}