module Join where import ImperativeState import Static import Data.ByteString.UTF8 join :: String -> String -> ImperativeMonad String join body listOfFiguers = return ((toString (latexHeader)) ++ body ++ listOfFiguers ++ (toString latexFooter))