mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-23 10:11:10 -06:00
(Bul) Change encodings from CP1251 to UTF8 (#343)
This commit is contained in:
John J. Camilleri
committed by
GitHub
GitHub
parent
71782b8e04
commit
e199fbbb0c
@@ -1,132 +1,132 @@
|
||||
--# -coding=cp1251
|
||||
--# -coding=utf8
|
||||
concrete StructuralBul of Structural = CatBul **
|
||||
open MorphoBul, ParadigmsBul, Prelude, (X = ConstructX) in {
|
||||
flags coding=cp1251 ;
|
||||
flags coding=utf8 ;
|
||||
|
||||
|
||||
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} ;
|
||||
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 {"â" ; "ô" ; "Â" ; "Ô"}
|
||||
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 "ìíîãî" "ìíîãî" "ìíîãî";
|
||||
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 => "òðÿáâàéêè"
|
||||
VPres _ _ => "трябва" ;
|
||||
VAorist _ _ => "трябваше" ;
|
||||
VImperfect _ _ => "трябвало" ;
|
||||
VPerfect _ => "трябвало" ;
|
||||
VPluPerfect _ => "трябвало" ;
|
||||
VPassive _ => "трябвало" ;
|
||||
VPresPart _ => "трябвало" ;
|
||||
VImperative Sg => "трябвай" ;
|
||||
VImperative Pl => "трябвайте" ;
|
||||
VNoun _ => "трябване" ;
|
||||
VGerund => "трябвайки"
|
||||
} ;
|
||||
vtype=VNormal ;
|
||||
lock_V=<>
|
||||
} ;
|
||||
no_Utt = ss "íå" ;
|
||||
on_Prep = mkPrep "íà" ;
|
||||
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 "ìîëÿ" ;
|
||||
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 "áåç" ;
|
||||
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 ;
|
||||
yes_Utt = ss "да" ;
|
||||
youSg_Pron = mkPron "ти" "твой" "твоя" "твоят" "твоя" "твоята" "твое" "твоето" "твои" "твоите" (GSg Masc) PronP2 ;
|
||||
youPl_Pron = mkPron "вие" "ваш" "вашия" "вашият" "ваша" "вашата" "ваше" "вашето" "ваши" "вашите" GPl PronP2 ;
|
||||
youPol_Pron = mkPron "вие" "ваш" "вашия" "вашият" "ваша" "вашата" "ваше" "вашето" "ваши" "вашите" GPl PronP2 ;
|
||||
|
||||
as_CAdv = X.mkCAdv [] "êîëêîòî" ;
|
||||
as_CAdv = X.mkCAdv [] "колкото" ;
|
||||
|
||||
have_V2 = dirV2 (stateV (mkV186 "èìàì")) ;
|
||||
have_V2 = dirV2 (stateV (mkV186 "имам")) ;
|
||||
|
||||
lin language_title_Utt = ss "Áúëãàðñêè" ;
|
||||
lin language_title_Utt = ss "Български" ;
|
||||
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user