-- rev xs returns the list of values in xs in
-- reverse order.  For example:
--   rev [1,2,3] = [3,2,1]

rev       :: [Int] -> [Int]
rev []     = []
rev       :: [Int] -> [Int]
rev []     = []
rev []     = []