diff options
| author | aarne <aarne@chalmers.se> | 2009-12-18 11:08:39 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2009-12-18 11:08:39 +0000 |
| commit | c0de7a0627c9c20267a3312055ea7da683632d20 (patch) | |
| tree | da4ce4cf7f1f1fd8c83254a82a20778bdeef360a /examples/mathtext/SymbolsX.gf | |
| parent | a4eb1800a4913121297eb83970718cd3895aa43f (diff) | |
mathtext examples from Bonn
Diffstat (limited to 'examples/mathtext/SymbolsX.gf')
| -rw-r--r-- | examples/mathtext/SymbolsX.gf | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/examples/mathtext/SymbolsX.gf b/examples/mathtext/SymbolsX.gf new file mode 100644 index 000000000..be362f5e9 --- /dev/null +++ b/examples/mathtext/SymbolsX.gf @@ -0,0 +1,15 @@ +concrete SymbolsX of Symbols = open Formal in { + +lincat + Exp = TermPrec ; + +lin +-- EInt i = constant i.s ; + EVar x = constant x.s ; + EIn = infixn 0 "\\in" ; + EPlus = infixl 2 "+" ; + ETimes = infixl 3 "*" ; + EEq = infixn 0 "=" ; + EGt = infixn 0 ">" ; + ELt = infixn 0 "<" ; +} |
