module Text.TeXMath.Types (Exp(..), TeXSymbolType(..), ArrayLine, Alignment(..))
where
import Data.Generics
data TeXSymbolType = Ord | Op | Bin | Rel | Open | Close | Pun | Accent
deriving (Show, Read, Eq, Data, Typeable)
data Alignment = AlignLeft | AlignCenter | AlignRight | AlignDefault
deriving (Show, Read, Eq, Data, Typeable)
type ArrayLine = [[Exp]]
data Exp =
ENumber String
| EGrouped [Exp]
| EIdentifier String
| EMathOperator String
| ESymbol TeXSymbolType String
| ESpace String
| EBinary String Exp Exp
| ESub Exp Exp
| ESuper Exp Exp
| ESubsup Exp Exp Exp
| EOver Exp Exp
| EUnder Exp Exp
| EUnderover Exp Exp Exp
| EUp Exp Exp
| EDown Exp Exp
| EDownup Exp Exp Exp
| EUnary String Exp
| EScaled String Exp
| EStretchy Exp
| EArray [Alignment] [ArrayLine]
| EText String String
deriving (Show, Read, Eq, Data, Typeable)