module W2Revision where

  -- some attempts at a last function
  -- from last week
  -- can you fix?

--myLast :: [Char]-> [Char]
--myLast x
--   |tail x == [] = "empty"
--   |head(tail x) == [] = head x
--   |otherwise = myLast(head(tail x))

-- anotherLast :: [Char] -> [Char]
-- anotherLast x
--   | (tail(x) == [])  = head x
--   | otherwise        = anotherLast (tail x)