added UttInterj in PhraseBul

This commit is contained in:
kr.angelov
2013-09-17 11:59:59 +00:00
parent 431222da5c
commit c5d2a50164

View File

@@ -19,6 +19,7 @@ concrete PhraseBul of Phrase = CatBul ** open Prelude, ResBul in {
UttCN n = {s = n.s ! NF Sg Indef} ;
UttCard n = {s = n.s ! CFNeut Indef} ;
UttAP ap = {s = ap.s ! ASg Masc Indef} ;
UttInterj i = i ;
NoPConj = {s = []} ;
PConjConj conj = {s = conj.s ++ linCoord!conj.conj} ;