summaryrefslogtreecommitdiff
path: root/examples/phrasebook/SentencesTha.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/phrasebook/SentencesTha.gf')
-rw-r--r--examples/phrasebook/SentencesTha.gf9
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 "อยู่" ;
+
}