middle polarity for French in Romance (for "personne ne dort")

2012-05-27 12:55:32 +00:00
parent 25435a6912
commit bc522704cd
27 changed files with 88 additions and 80 deletions
@@ -1,6 +1,6 @@
 incomplete concrete TenseRomance of Tense = 
-  CatRomance [Tense,Temp], TenseX [Ant,Pol,AAnter,ASimul,PNeg,PPos] ** 
-    open ResRomance, CommonRomance in {
+  CatRomance [Tense,Temp], TenseX [Ant,AAnter,ASimul] ** 
+    open ResRomance, CommonRomance, Prelude in {

  lin
    TTAnt t a = {s = a.s ++ t.s ; a = a.a ; t = t.t} ;
@@ -9,4 +9,7 @@ incomplete concrete TenseRomance of Tense =
    TFut  = {s = []} ** {t = RFut} ;    --# notpresent
    TCond = {s = []} ** {t = RCond} ;   --# notpresent

+    PPos = {s = [] ; p = RPos} ;
+    PNeg = {s = [] ; p = RNeg False} ; 
+
 }