@@ -38,6 +38,18 @@ module Prelude where
39 (#) :: forall a b. a -> (a -> b) -> b
39 (#) :: forall a b. a -> (a -> b) -> b
40 (#) x f = f x
40 (#) x f = f x
44+ (:) :: forall a. a -> [a] -> [a]
49+ \ return function (l) {\
50+ \ return [e].concat(l);\
52+ \}" :: forall a. a -> [a] -> [a]
42 class Show a where
54 class Show a where
43 show :: a -> String
55 show :: a -> String