added UttInterj in Estonian, Thai and Russian

This commit is contained in:
krasimir
2016-06-17 15:36:23 +00:00
parent 85c9d11bd1
commit 282ce75b59
3 changed files with 3 additions and 0 deletions

View File

@@ -17,6 +17,7 @@ concrete PhraseEst of Phrase = CatEst ** open ResEst, (P = Prelude) in {
UttCN np = {s = np.s ! NCase Sg Nom} ;
UttAP np = {s = np.s ! P.False ! NCase Sg Nom} ;
UttCard n = {s = n.s ! Sg ! Nom} ;
UttInterj i = i ;
NoPConj = {s = []} ;
PConjConj conj = {s = conj.s2} ;

View File

@@ -20,6 +20,7 @@ concrete PhraseRus of Phrase = CatRus ** open Prelude, ResRus in {
UttCN n = {s = n.s ! NF Sg Nom nom} ;
UttCard n = {s = n.s ! Neut ! Inanimate ! Nom} ;
UttAP ap = {s = ap.s ! AF Nom Inanimate (GSg Neut)} ; ---- gennum ? (AR)
UttInterj i = i ;
NoPConj = {s = []} ;
PConjConj conj = ss conj.s2 ;

View File

@@ -17,6 +17,7 @@ concrete PhraseTha of Phrase = CatTha ** open Prelude, ResTha in {
UttCard x = x ;
UttVP vp = {s = vp.s ! Pos ++bIND++ vp.e} ;
UttAdv adv = adv ;
UttInterj i = i ;
NoPConj = {s = []} ;
PConjConj conj = ss conj.s2 ;