expandTab :: Int -> Char -> String
expandTab n c = case c of
    '\t' -> replicate n ' '
    _ -> [c]
expandTab :: Int -> Char -> String
expandTab n c = case c of
    '\t' -> replicate n ' '
    _ -> [c]
expandTab n c = case c of
    '\t' -> replicate n ' '
    _ -> [c]