module Main where

import MdToHTML

main :: IO ()
main = do
   let res = leftmostLongestParse parseLine "## Hello ___world___"
   putStrLn (show res)