`````
% pandoc -t native
```haskell
let x = y
in y
```
^D
[ CodeBlock ( "" , [ "haskell" ] , [] ) "let x = y\nin y" ]
~~~ {.haskell}
in y +
y +
y
~~~
[ CodeBlock
( "" , [ "haskell" ] , [] ) " let x = y\nin y +\ny +\ny"
]