gf-rgl/src/bulgarian/StructuralBul.gf

--# -coding=cp1251
concrete StructuralBul of Structural = CatBul ** 
  open MorphoBul, ParadigmsBul, Prelude, (X = ConstructX) in {
  flags coding=cp1251 ;


  flags optimize=all ;

  lin
  above_Prep = mkPrep "íàä" ;
  after_Prep = mkPrep "ñëåä" ;
  all_Predet = {s = table GenNum ["âñè÷êèÿ";"âñè÷êàòà";"âñè÷êîòî";"âñè÷êèòå"]} ;
  almost_AdA, almost_AdN = ss "ïî÷òè" ;
  at_least_AdN, at_most_AdN =  ss "ïî÷òè" ; ---- AR
  although_Subj = ss ["âúïðåêè ÷å"] ;
  always_AdV = mkAdV "âèíàãè" ;
  and_Conj = mkConj "è" Pl ;
  because_Subj = ss "çàùîòî" ;
  before_Prep = mkPrep "ïðåäè" ;
  behind_Prep = mkPrep "çàä" ;
  between_Prep = mkPrep "ìåæäó" ;
  both7and_DConj = mkConj "è" Pl ** {sep=0} ;
  but_PConj = ss "íî" ;
  by8agent_Prep = mkPrep "÷ðåç" ;
  by8means_Prep = mkPrep "÷ðåç" ;
  can8know_VV, can_VV = mkVV (stateV (mkV166 "ìîãà")) ;
  during_Prep = mkPrep ["ïî âðåìå íà"] ;
  either7or_DConj = mkConj "èëè" Sg ** {sep=1} ;
  everybody_NP = mkNP "âñåêè" (GSg Masc) (NounP3 Pos);
  every_Det = mkDeterminerSg "âñåêè" "âñÿêà" "âñÿêî";
  everything_NP = mkNP "âñè÷êî" (GSg Neut) (NounP3 Pos);
  everywhere_Adv = ss "íàâñÿêúäå" ;
  few_Det = {s = \\_,_,_ => "íÿêîëêî"; nn = NCountable; spec = Indef; p = Pos} ;
---  first_Ord = ss "first" ; DEPRECATED
  for_Prep = mkPrep "çà" ;
  from_Prep = mkPrep "îò" ;
  he_Pron = mkPron "òîé" "íåãîâ" "íåãîâèÿ" "íåãîâèÿò" "íåãîâà" "íåãîâàòà" "íåãîâî" "íåãîâîòî" "íåãîâè" "íåãîâèòå" (GSg Masc) PronP3 ;
  here_Adv = ss "òóê" ;
  here7to_Adv = ss ["äî òóê"] ;
  here7from_Adv = ss ["îò òóê"] ;
  how_IAdv = mkIAdv "êàê" ;
  how8much_IAdv = mkIAdv "êîëêî" ;
  how8many_IDet = {s = \\_ => table QForm ["êîëêî";"êîëêîòî"]; n = Pl; nonEmpty = False} ;
  if_Subj = ss "àêî" ;
  in8front_Prep = mkPrep "ïðåä" ;
  i_Pron  = mkPron "àç" "ìîé" "ìîÿ" "ìîÿò" "ìîÿ" "ìîÿòà" "ìîå" "ìîåòî" "ìîè" "ìîèòå" (GSg Masc) PronP1 ;
  in_Prep = mkPrep (pre { "â" ; 
                          "âúâ" / strs {"â" ; "ô" ; "Â" ; "Ô"}
                        }) ;
  it_Pron  = mkPron "òî" "íåãîâ" "íåãîâèÿ" "íåãîâèÿò" "íåãîâà" "íåãîâàòà" "íåãîâî" "íåãîâîòî" "íåãîâè" "íåãîâèòå" (GSg Neut) PronP3 ;
  less_CAdv = X.mkCAdv "ïî-ìàëêî" "îò" ;
  many_Det = mkDeterminerPl "ìíîãî" ;
  more_CAdv = X.mkCAdv "ïîâå÷å" "îò" ;
  most_Predet = {s = \\_ => "ïîâå÷åòî"} ;
  much_Det = mkDeterminerSg "ìíîãî" "ìíîãî" "ìíîãî";
  must_VV = 
    mkVV {
         s = \\_=>table {
                    VPres      _ _ => "òðÿáâà" ;
                    VAorist    _ _ => "òðÿáâàøå" ;
                    VImperfect _ _ => "òðÿáâàëî" ;
                    VPerfect     _ => "òðÿáâàëî" ;
                    VPluPerfect  _ => "òðÿáâàëî" ;
                    VPassive     _ => "òðÿáâàëî" ;
                    VPresPart    _ => "òðÿáâàëî" ;
                    VImperative Sg => "òðÿáâàé"  ;
                    VImperative Pl => "òðÿáâàéòå" ;
                    VNoun _        => "òðÿáâàíå" ;
                    VGerund        => "òðÿáâàéêè"
                  } ;
         vtype=VNormal ;
         lock_V=<>
       } ;
  no_Utt = ss "íå" ;
  on_Prep = mkPrep "íà" ;
----  one_Quant = mkDeterminer Sg "one" ; -- DEPRECATED
  only_Predet = {s = \\_ => "ñàìî"} ;
  or_Conj = mkConj "èëè" Sg ;
  otherwise_PConj = ss "èíà÷å" ;
  part_Prep = mkPrep "îò" ;
  please_Voc = ss "ìîëÿ" ;
  possess_Prep = mkPrep [] Dat ;
  quite_Adv = ss "äîñòà" ;
  she_Pron = mkPron "òÿ" "íåèí" "íåéíèÿ" "íåéíèÿò" "íåéíà" "íåéíàòà" "íåéíî" "íåéíîòî" "íåéíè" "íåéíèòå" (GSg Fem) PronP3 ;
  so_AdA = ss "òîëêîâà" ;
  somebody_NP = mkNP "íÿêîé" (GSg Masc) (NounP3 Pos);
  someSg_Det = mkDeterminerSg "íÿêîé" "íÿêîÿ" "íÿêîå" ;
  somePl_Det = mkDeterminerPl "íÿêîè" ;
  something_NP = mkNP "íåùî" (GSg Neut) (NounP3 Pos);
  somewhere_Adv = ss "íÿêúäå" ;
  that_Quant = mkQuant "îíçè" "îíàçè" "îíîâà" "îíåçè" ;
  that_Subj = ss "֌" ;
  there_Adv = ss "òàì" ;
  there7to_Adv = ss ["äî òàì"] ;
  there7from_Adv = ss ["îò òàì"] ;
  therefore_PConj = ss ["òàêà ÷å"] ;
  they_Pron = mkPron "òå" "òåõåí" "òåõíèÿ" "òåõíèÿò" "òÿõíà" "òÿõíàòà" "òÿõíî" "òÿõíîòî" "òåõíè" "òåõíèòå" GPl PronP3 ; 
  this_Quant = mkQuant "òîçè" "òàçè" "òîâà" "òåçè" ;
  through_Prep = mkPrep "ïðåç" ;
  too_AdA = ss "ïðåêàëåíî" ;
  to_Prep = mkPrep "äî" ;
  under_Prep = mkPrep "ïîä" ;
  very_AdA = ss "ìíîãî" ;
  want_VV = mkVV (stateV (mkV186 "èñêàì")) ;
  we_Pron = mkPron "íèå" "íàø" "íàøèÿ" "íàøèÿò" "íàøà" "íàøàòà" "íàøå" "íàøåòî" "íàøè" "íàøèòå" GPl PronP1 ;
  whatPl_IP = mkIP "êàêâè" "êàêâè" GPl ;
  whatSg_IP = mkIP "êàêúâ" "êàêúâ" (GSg Masc) ;
  when_IAdv = mkIAdv "êîãà" ;
  when_Subj = ss "êîãàòî" ;
  where_IAdv = mkIAdv "êúäå" ;
  which_IQuant = {s = table GenNum [table QForm ["êîé";"êîéòî"];
                                    table QForm ["êîÿ";"êîÿòî"];
                                    table QForm ["êîå";"êîåòî"];
                                    table QForm ["êîè";"êîèòî"]]} ;
  whoSg_IP = mkIP "êîé" "êîãî" (GSg Masc) ;
  whoPl_IP = mkIP "êîè" "êîè" GPl ;
  why_IAdv = mkIAdv "çàùî" ;
  without_Prep = mkPrep "áåç" ;
  with_Prep = mkPrep "" WithPrep ;
  yes_Utt = ss "äà" ;
  youSg_Pron = mkPron "òè" "òâîé" "òâîÿ" "òâîÿò" "òâîÿ" "òâîÿòà" "òâîå" "òâîåòî" "òâîè" "òâîèòå" (GSg Masc) PronP2 ;
  youPl_Pron = mkPron "âèå" "âàø" "âàøèÿ" "âàøèÿò" "âàøà" "âàøàòà" "âàøå" "âàøåòî" "âàøè" "âàøèòå" GPl PronP2 ;
  youPol_Pron = mkPron "âèå" "âàø" "âàøèÿ" "âàøèÿò" "âàøà" "âàøàòà" "âàøå" "âàøåòî" "âàøè" "âàøèòå" GPl PronP2 ;

  as_CAdv = X.mkCAdv [] "êîëêîòî" ;

  have_V2 = dirV2 (stateV (mkV186 "èìàì")) ;

  lin language_title_Utt = ss "Áúëãàðñêè" ;

}