diff options
| author | aarne <aarne@chalmers.se> | 2011-12-01 14:50:23 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2011-12-01 14:50:23 +0000 |
| commit | 0814c07791c799538752bfadb4897abe3e6e98b1 (patch) | |
| tree | d27daa9d343910399e7f1385d70b1d276e973063 /examples/phrasebook/SentencesTha.gf | |
| parent | db62687ab1c4c5d8b249a720b0a9d57175294e77 (diff) | |
PhrasebookTha corrections from Nui
Diffstat (limited to 'examples/phrasebook/SentencesTha.gf')
| -rw-r--r-- | examples/phrasebook/SentencesTha.gf | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/examples/phrasebook/SentencesTha.gf b/examples/phrasebook/SentencesTha.gf index acb0cac81..3964a8dba 100644 --- a/examples/phrasebook/SentencesTha.gf +++ b/examples/phrasebook/SentencesTha.gf @@ -1,9 +1,16 @@ -concrete SentencesTha of Sentences = NumeralTha ** SentencesI - [ACitizen] with +concrete SentencesTha of Sentences = NumeralTha ** SentencesI - [ACitizen, WherePlace, WherePerson] with (Syntax = SyntaxTha), (Symbolic = SymbolicTha), (Lexicon = LexiconTha) ** open SyntaxTha, (P = ParadigmsTha), (R = ResTha) in { +flags coding=utf8 ; lin ACitizen p n = mkCl p.name (mkVP (mkCN n (P.personN R.khon_s))) ; + WherePlace place = mkQS (mkQCl where_IAdv (mkCl place.name yuu_V)) ; + WherePerson person = mkQS (mkQCl where_IAdv (mkCl person.name yuu_V)) ; + +oper + yuu_V : V = R.regV "อยู่" ; + } |