hi.hs

{-# LANGUAGE OverloadedStrings #-}
import Text.LaTeX

main :: IO ()
main =
    execLaTeXT simple >>= renderFile "yo.tex"
    -- Execute pdflatex

simple :: Monad m => LaTeXT_ m
simple = do
    thePreamble
    document theBody

thePreamble :: Monad m => LaTeXT_ m
thePreamble = do
    -- TODO: Use the preview class as described here:
    -- https://tex.stackexchange.com/questions/11866/compile-a-latex-document-into-a-png-image-thats-as-short-as-possible
    documentclass [] article
    author "Tweet HaTeX"
    title "HaTeX"

theBody :: Monad m => LaTeXT_ m
theBody = do
    maketitle
    section "Hello there"
    "This is me checking out "
    hatex
    "So far it's fair to say that this is "
    textbf "Fucking awesome!"
    textbf (large "Hi Stephen!")