--
--
--
----------------
-- Exercise 6.1.
----------------
--
--
--
module E'6''1 where



snd (x, y) =  y

-- snd :: (a, b) -> b

-- GHCi> :t snd
-- snd :: (t, t1) -> t1


sing x =  [x]

-- sing :: a -> [a]

-- GHCi> :t sing
-- sing :: t -> [t]




