Kirjat

input/code.hs:1:1:
    The function `main' is not defined in module `Main'

--subtractLists :: [a] -> [a] -> [a]
subtractLists a [] = a
subtractLists a b =
  subtractLists (if (head a) == (head b) then tail a else a) (tail b)

removeFrontWhitespace :: [Char] -> [Char]
removeFrontWhitespace s =
  if (head s) == ' ' then
    removeFrontWhitespace (tail s)
  else
    s