space :: Int -> String
space n
  | n < 10    = "  "
  | n < 100   = " "
  | otherwise = ""
space :: Int -> String
space n
  | n < 10    = "  "
  | n < 100   = " "
  | otherwise = ""
space n
  | n < 10    = "  "
  | n < 100   = " "
  | otherwise = ""