From 3b878f85d85f1fa7f7ff724dfa161d7ac2b619b8 Mon Sep 17 00:00:00 2001 From: aarne Date: Sun, 21 Oct 2007 10:45:51 +0000 Subject: Swedish functor implementation of Base --- examples/tutorial/semantics/LexBaseEng.gf | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'examples/tutorial/semantics/LexBaseEng.gf') diff --git a/examples/tutorial/semantics/LexBaseEng.gf b/examples/tutorial/semantics/LexBaseEng.gf index d0f3baa1e..aea3a838b 100644 --- a/examples/tutorial/semantics/LexBaseEng.gf +++ b/examples/tutorial/semantics/LexBaseEng.gf @@ -4,14 +4,17 @@ oper even_A = mkA "even" ; odd_A = mkA "odd" ; prime_A = mkA "prime" ; + great_A = mkA "great" ; + common_A = mkA "common" ; equal_A2 = mkA2 (mkA "equal") (mkPrep "to") ; greater_A2 = mkA2 (mkA "greater") (mkPrep "than") ; --- smaller_A2 = mkA2 (mkA "smaller") (mkPrep "than") ; --- divisible_A2 = mkA2 (mkA "divisible") (mkPrep "by") ; number_N = mkN "number" ; sum_N2 = mkN2 (mkN "sum") (mkPrep "of") ; --- product_N2 : N2 ; --- gcd_N2 : N2 ; + product_N2 = mkN2 (mkN "product") (mkPrep "of") ; + divisor_N2 = mkN2 (mkN "divisor") (mkPrep "of") ; + + none_NP = mkNP (mkPN "none") ; --- --- noSg_Det : Det ; } -- cgit v1.2.3