Phrase.UttCN added and implemented for Eng,Fre,Ger

This commit is contained in:
aarne
2009-12-17 21:54:11 +00:00
parent 5c9ac3655e
commit 8d5f97866d
4 changed files with 4 additions and 1 deletions

View File

@@ -16,7 +16,7 @@ concrete PhraseGer of Phrase = CatGer ** open Prelude, ResGer in {
UttNP np = {s = np.s ! Nom} ;
UttVP vp = {s = useInfVP True vp} ; -- without zu
UttAdv adv = adv ;
UttCN n = {s = n.s ! Strong ! Sg ! Nom} ;
NoPConj = {s = []} ;
PConjConj conj = ss (conj.s2) ;