From ddd103ccd7422c35b5af0bcb5bad5edd49b080bb Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 8 Oct 2003 14:14:09 +0000 Subject: examples for transfer --- grammars/numerals/Symb.gf | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 grammars/numerals/Symb.gf (limited to 'grammars/numerals/Symb.gf') diff --git a/grammars/numerals/Symb.gf b/grammars/numerals/Symb.gf new file mode 100644 index 000000000..0648b778f --- /dev/null +++ b/grammars/numerals/Symb.gf @@ -0,0 +1,12 @@ +concrete Symb of Nat = open Prelude in { + lincat Nat, Bin = SS ; + + lin + One = ss "1" ; + Succ = postfixSS "'" ; + + BOne = ss "1" ; + BX = postfixSS "0" ; + BXPlus = postfixSS "1" ; +} + -- cgit v1.2.3