lstrip :: String -> String
lstrip s = case s of
  [] -> []
  (x:xs) -> if elem x wschars then lstrip xs else s
lstrip :: String -> String
lstrip s = case s of
  [] -> []
  (x:xs) -> if elem x wschars then lstrip xs else s
lstrip s = case s of
  [] -> []
  (x:xs) -> if elem x wschars then lstrip xs else s