diff options
| author | aarne <aarne@chalmers.se> | 2010-03-28 19:29:06 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-03-28 19:29:06 +0000 |
| commit | 93daaabf3df88b5fa16065c027c370cdf9b487b2 (patch) | |
| tree | e8a35d5b7af1d44618b48f0d0267bc5ff110b341 /examples/phrasebook/WordsEng.gf | |
| parent | 3903b6b85222d5d266f859f4d029b12159cdf814 (diff) | |
Action category, more doc in Phrasebook
Diffstat (limited to 'examples/phrasebook/WordsEng.gf')
| -rw-r--r-- | examples/phrasebook/WordsEng.gf | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/examples/phrasebook/WordsEng.gf b/examples/phrasebook/WordsEng.gf index 6f9400f94..2e94eb4ff 100644 --- a/examples/phrasebook/WordsEng.gf +++ b/examples/phrasebook/WordsEng.gf @@ -1,7 +1,7 @@ -- (c) 2009 Aarne Ranta under LGPL concrete WordsEng of Words = SentencesEng ** - open SyntaxEng, ParadigmsEng in { + open SyntaxEng, ParadigmsEng, IrregEng in { lin Wine = mkCN (mkN "wine") ; Beer = mkCN (mkN "beer") ; @@ -27,4 +27,17 @@ concrete WordsEng of Words = SentencesEng ** Dollar = mkCN (mkN "dollar") ; Lei = mkCN (mkN "leu" "lei") ; + English = mkNP (mkPN "English") ; + Finnish = mkNP (mkPN "Finnish") ; + French = mkNP (mkPN "French") ; + Romanian = mkNP (mkPN "Romanian") ; + Swedish = mkNP (mkPN "Swedish") ; + + AWant p obj = mkCl p (mkV2 (mkV "want")) obj ; + ALike p item = mkCl p (mkV2 (mkV "like")) item ; + AHave p kind = mkCl p have_V2 (mkNP kind) ; + ASpeak p lang = mkCl p (mkV2 IrregEng.speak_V) lang ; + ALove p q = mkCl p (mkV2 (mkV "love")) q ; + + } |