fused Conj and DConj in exper

2008-04-25 06:55:57 +00:00
parent 8184dc5512
commit 2b67b0c9bb
7 changed files with 31 additions and 12 deletions
@@ -16,7 +16,7 @@ concrete PhraseEng of Phrase = CatEng ** open Prelude, ResEng in {
    UttAdv adv = adv ;

    NoPConj = {s = []} ;
-    PConjConj conj = conj ;
+    PConjConj conj = {s = conj.s2} ; ---

    NoVoc = {s = []} ;
    VocNP np = {s = "," ++ np.s ! Nom} ;