module Text.LaTeX.Packages.AMSMath.Monad
(
amsmath
, math
, (^:) , (!:)
, tsin , arcsin
, tcos , arccos
, ttan , arctan
, texp
, tlog , ln
, (=:) , (/=:)
, (>:) , (>=:)
, (<:) , (<=:)
, in_ , ni , notin
, to
, forall
, dagger, ddagger
, mathbf
, mathrm
, mathcal
, mathsf
, mathtt
, mathit
) where
import Text.LaTeX.Base.Writer
import Text.LaTeX.Base.Render
import Text.LaTeX.Base.Types
import qualified Text.LaTeX.Packages.AMSMath as App
import Text.LaTeX.Packages.AMSMath()
amsmath :: String
amsmath = App.amsmath
math :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
math a1
= do a1 <- extractLaTeX_ a1
textell ( App.math a1)
(^:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(^:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.^:) a1 a2)
(!:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(!:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.!:) a1 a2)
tsin :: (Monad m) => LaTeXT_ m
tsin = do textell ( App.tsin)
arcsin :: (Monad m) => LaTeXT_ m
arcsin = do textell ( App.arcsin)
tcos :: (Monad m) => LaTeXT_ m
tcos = do textell ( App.tcos)
arccos :: (Monad m) => LaTeXT_ m
arccos = do textell ( App.arccos)
ttan :: (Monad m) => LaTeXT_ m
ttan = do textell ( App.ttan)
arctan :: (Monad m) => LaTeXT_ m
arctan = do textell ( App.arctan)
texp :: (Monad m) => LaTeXT_ m
texp = do textell ( App.texp)
tlog :: (Monad m) => LaTeXT_ m
tlog = do textell ( App.tlog)
ln :: (Monad m) => LaTeXT_ m
ln = do textell ( App.ln)
(=:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(=:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.=:) a1 a2)
(/=:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(/=:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App./=:) a1 a2)
(>:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(>:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.>:) a1 a2)
(>=:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(>=:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.>=:) a1 a2)
(<:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(<:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.<:) a1 a2)
(<=:) :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
(<=:) a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( (App.<=:) a1 a2)
in_ :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
in_ a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( App.in_ a1 a2)
ni :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
ni a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( App.ni a1 a2)
notin :: (Monad m) => LaTeXT_ m -> LaTeXT_ m -> LaTeXT_ m
notin a1 a2
= do a1 <- extractLaTeX_ a1
a2 <- extractLaTeX_ a2
textell ( App.notin a1 a2)
to :: (Monad m) => LaTeXT_ m
to = do textell ( App.to)
forall :: (Monad m) => LaTeXT_ m
forall = do textell ( App.forall)
dagger :: (Monad m) => LaTeXT_ m
dagger = do textell ( App.dagger)
ddagger :: (Monad m) => LaTeXT_ m
ddagger = do textell ( App.ddagger)
mathbf :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
mathbf a1
= do a1 <- extractLaTeX_ a1
textell ( App.mathbf a1)
mathrm :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
mathrm a1
= do a1 <- extractLaTeX_ a1
textell ( App.mathrm a1)
mathcal :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
mathcal a1
= do a1 <- extractLaTeX_ a1
textell ( App.mathcal a1)
mathsf :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
mathsf a1
= do a1 <- extractLaTeX_ a1
textell ( App.mathsf a1)
mathtt :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
mathtt a1
= do a1 <- extractLaTeX_ a1
textell ( App.mathtt a1)
mathit :: (Monad m) => LaTeXT_ m -> LaTeXT_ m
mathit a1
= do a1 <- extractLaTeX_ a1
textell ( App.mathit a1)