{-# LANGUAGE OverloadedStrings #-}

import           Data.Monoid
import qualified Data.Text as T
import qualified Data.Text.IO as T
import           Text.LaTeX

samp :: LaTeX
samp = documentclass [] article
  <> raw "foo " <> textit "bar" <> raw " baz"

main :: IO ()
main = do
  T.putStrLn (render samp)
  return ()
