added VV category

lib/resource/bulgarian/StructuralBul.gf

@@ -19,20 +19,7 @@ concrete StructuralBul of Structural = CatBul **
   but_PConj = ss "íî" ;
   by8agent_Prep = mkPrep "÷ðåç" Acc ;
   by8means_Prep = mkPrep "÷ðåç" Acc ;
-{-
-  can8know_VV, can_VV = {
-    s = table { 
-      VVF VInf => ["be able to"] ;
-      VVF VPres => "can" ;
-      VVF VPPart => ["been able to"] ;
-      VVF VPresPart => ["being able to"] ;
-      VVF VPast => "could" ;      --# notpresent
-      VVPastNeg => "couldn't" ;   --# notpresent
-      VVPresNeg => "can't"
-      } ;
-    isAux = True
-    } ;
--}
+  can8know_VV, can_VV = mkVV (mkV166 "ìîãà") ;
   during_Prep = mkPrep ["ïî âðåìå íà"] Acc ;
   either7or_DConj = sd2 "èëè" "èëè" ** {n = Sg} ;
   everybody_NP = mkNP "âñåêè" (GSg Masc) P3 ;
@@ -61,20 +48,22 @@ concrete StructuralBul of Structural = CatBul **
   more_CAdv = {s=[]; sn="ïîâå÷å"} ;
   most_Predet = {s = \\_ => "ïîâå÷åòî"} ;
   much_Det = mkDeterminerSg "ìíîãî" "ìíîãî" "ìíîãî";
-{-
-  must_VV = {
+  must_VV = mkVV {
     s = table {
-      VVF VInf => ["have to"] ;
-      VVF VPres => "must" ;
-      VVF VPPart => ["had to"] ;
-      VVF VPresPart => ["having to"] ;
-      VVF VPast => ["had to"] ;      --# notpresent
-      VVPastNeg => ["hadn't to"] ;      --# notpresent
-      VVPresNeg => "mustn't"
-      } ;
-    isAux = True
+          VPres      _ _ => "òðÿáâà" ;
+          VAorist    _ _ => "òðÿáâàøå" ;
+          VImperfect _ _ => "òðÿáâàëî" ;
+          VPerfect     _ => "òðÿáâàëî" ;
+          VPluPerfect  _ => "òðÿáâàëî" ;
+          VPassive     _ => "òðÿáâàëî" ;
+          VPresPart    _ => "òðÿáâàëî" ;
+          VImperative Sg => "òðÿáâàé" ;
+          VImperative Pl => "òðÿáâàéòå" ;
+          VGerund        => "òðÿáâàéêè"
+        } ;
+    vtype=VNormal ;
+    lock_V=<>
     } ;
--}
   no_Phr = ss "íå" ;
   on_Prep = mkPrep "íà" Acc ;
 ----  one_Quant = mkDeterminer Sg "one" ; -- DEPRECATED
@@ -108,9 +97,7 @@ concrete StructuralBul of Structural = CatBul **
   to_Prep = mkPrep "äî" Acc ;
   under_Prep = mkPrep "ïîä" Acc ;
   very_AdA = ss "ìíîãî" ;
-{-
-  want_VV = P.mkVV (P.regV "want") ;
--}
+  want_VV = mkVV (mkV186 "èñêàì") ;
   we_Pron = mkPron "íèå" "íàñ" "íè" "íàø" "íàøèÿ" "íàøèÿò" "íàøà" "íàøàòà" "íàøå" "íàøåòî" "íàøè" "íàøèòå" GPl P1 ;
   whatPl_IP = mkIP "êàêâè" "êàêâè" GPl ;
   whatSg_IP = mkIP "êàêúâ" "êàêúâ" (GSg Masc) ;