skipReduceLineNr :: String -> String
skipReduceLineNr s = dropWhile (`elem` " \n") $ tail
                     $ dropWhile (/= ':') s
skipReduceLineNr :: String -> String
skipReduceLineNr s = dropWhile (`elem` " \n") $ tail
                     $ dropWhile (/= ':') s
skipReduceLineNr s = dropWhile (`elem` " \n") $ tail
                     $ dropWhile (/= ':') s