1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
````` % pandoc -t native ```haskell let x = y in y ``` ^D [CodeBlock ("",["haskell"],[]) "let x = y\nin y"] ````` ````` % pandoc -t native ~~~ {.haskell} let x = y in y + y + y ~~~ ^D [CodeBlock ("",["haskell"],[]) " let x = y\nin y +\ny +\ny"] `````