1
0
forked from GitHub/gf-core

PhrasebookTha corrections from Nui

This commit is contained in:
aarne
2011-12-01 14:50:23 +00:00
parent db62687ab1
commit 0814c07791
7 changed files with 26 additions and 14 deletions

View File

@@ -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 "อยู่" ;
}