summaryrefslogtreecommitdiff
path: root/examples/tutorial/semantics/LexBaseEng.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2007-10-21 10:45:51 +0000
committeraarne <aarne@cs.chalmers.se>2007-10-21 10:45:51 +0000
commit3b878f85d85f1fa7f7ff724dfa161d7ac2b619b8 (patch)
treef3bdc6ac612772df0c7d17b485b20b90e1d251eb /examples/tutorial/semantics/LexBaseEng.gf
parent087fddc1746e585bf4f7055e67c0f396ec58ebde (diff)
Swedish functor implementation of Base
Diffstat (limited to 'examples/tutorial/semantics/LexBaseEng.gf')
-rw-r--r--examples/tutorial/semantics/LexBaseEng.gf9
1 files changed, 6 insertions, 3 deletions
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 ;
}