proper parameters in Chi IDet

This commit is contained in:
aarne
2013-10-08 19:14:56 +00:00
parent adc952a61d
commit 3ef9eea5eb
7 changed files with 22 additions and 6 deletions

View File

@@ -17,6 +17,7 @@ concrete PhraseChi of Phrase = CatChi ** open Prelude, ResChi in {
UttCard x = x ;
UttVP vp = ss (infVP vp) ;
UttAdv adv = adv ;
UttInterj i = i ;
NoPConj = {s = []} ;
PConjConj conj = ss (conj.s ! CSent).s2 ;