forked from GitHub/gf-core
122 lines
4.1 KiB
Plaintext
122 lines
4.1 KiB
Plaintext
--# -path=.:../abstract:../common:../prelude
|
||
|
||
-- Ilona Nowak Wintersemester 2007/08
|
||
|
||
-- Adam Slaski, 2009 <adam.slaski@gmail.com>
|
||
|
||
-- In Polish language they aren't determiners like in english or german.
|
||
|
||
concrete StructuralPol of Structural = CatPol **
|
||
open ResPol, MorphoPol, ParadigmsPol, Prelude in {
|
||
|
||
|
||
flags optimize=all; coding=utf8;
|
||
|
||
lin
|
||
|
||
above_Prep = mkPrep "nad" Instr;
|
||
after_Prep = mkPrep "po" Loc;
|
||
|
||
all_Predet = { s=wszystek; np=wszystko; adj=True };
|
||
almost_AdA, almost_AdN = ss "prawie";
|
||
although_Subj = ss "pomimo";
|
||
always_AdV = ss "zawsze";
|
||
and_Conj = {s1=""; s2 = "i"; sent1=""; sent2=["i"]};
|
||
at_least_AdN = ss "co najmniej";
|
||
at_most_AdN = ss "co najwyżej";
|
||
because_Subj = ss "ponieważ";
|
||
before_Prep = mkPrep "przed" Instr;
|
||
behind_Prep = mkPrep "za" Instr;
|
||
between_Prep = mkPrep "między" Instr;
|
||
both7and_DConj = {s1="zarówno"; s2=["jak i"]; sent1="zarówno"; sent2=[", jak i"]};
|
||
but_PConj = ss "ale";
|
||
by8agent_Prep = mkPrep "przez" Acc;
|
||
by8means_Prep = mkPrep "przez" Acc;
|
||
can8know_VV = mkItVerb (mkMonoVerb "umieć" conj101 Imperfective);
|
||
can_VV = mkItVerb (mkMonoVerb "móc" conj27 Imperfective);
|
||
during_Prep = mkPrep "podczas" Gen; -- def. in ParadigmsPol
|
||
either7or_DConj = {s1="albo"; s2="albo"; sent1="albo"; sent2=[", albo"]};
|
||
every_Det = kazdyDet;
|
||
everybody_NP = wszyscy ** {lock_NP=<>};
|
||
everything_NP = wszystko ** {lock_NP=<>};
|
||
everywhere_Adv = ss "wszędzie";
|
||
except_Prep = mkPrep "z wyjątkiem" Acc;
|
||
few_Det = pareDet;
|
||
for_Prep = mkPrep "dla" Gen;
|
||
from_Prep = mkPrep "z" Gen; -- def. in ParadigmsPol
|
||
have_V2 = dirV2 (mkMonoVerb "mieć" conj100 Imperfective);
|
||
he_Pron = pronOn;
|
||
here_Adv = ss "tutaj";
|
||
here7to_Adv = ss "tutaj";
|
||
here7from_Adv = ss "stąd";
|
||
how_IAdv = ss "jak";
|
||
how8many_IDet = ileDet;
|
||
i_Pron = pronJa;
|
||
if_Subj = ss "jeśli";
|
||
if_then_Conj = {s1="jeżeli"; s2=[", to"]; sent1="jeżeli"; sent2=[", to"]};
|
||
in8front_Prep = mkPrep "przed" Instr;
|
||
in_Prep = mkPrep "w" Loc;
|
||
it_Pron = pronOno;
|
||
language_title_Utt = ss "polski";
|
||
less_CAdv = {s,sn = "mniej" ; p,pn = "niż" } ;
|
||
many_Det = wieleDet;
|
||
more_CAdv = {s = "bardziej" ; pn,p = "niż"; sn="więcej"} ;
|
||
most_Predet = { s=wszystek; np={nom="większość"; voc="większości";
|
||
dep=table{AccPrep|AccNoPrep=>"większość"; InstrC=>"większością"; _=>"większości"};
|
||
p=P3; gn=FemSg}; adj=False };
|
||
much_Det = duzoDet;
|
||
must_VV = mkItVerb (mkMonoVerb "musieć" conj93 Imperfective);
|
||
no_Quant = zadenQuant;
|
||
no_Utt = ss "nie";
|
||
nobody_NP = niktNP;
|
||
not_Predet = { s=zadenQuant.s; np=wszystko; adj=True };
|
||
nothing_NP = nicNP;
|
||
on_Prep = mkPrep "nа" Loc;
|
||
only_Predet = { s=\\_=>"tylko"; np=wszystko; adj=True };
|
||
or_Conj = {s1=""; s2="lub"; sent1=""; sent2=["lub"]};
|
||
otherwise_PConj = ss "inaczej";
|
||
part_Prep = mkPrep "z" Gen;
|
||
please_Voc = ss "proszę";
|
||
possess_Prep = mkPrep "" Gen; --overgenerating with pronouns
|
||
quite_Adv = ss "całkiem";
|
||
she_Pron = pronOna;
|
||
so_AdA = ss "tak";
|
||
somebody_NP = ktos ** {lock_NP = <>};
|
||
someSg_Det = pewienDet;
|
||
somePl_Det = pewniDet;
|
||
something_NP = cos ** {lock_NP = <>};
|
||
somewhere_Adv = ss "gdzieś";
|
||
that_Quant = demPronTen "tamten";
|
||
there_Adv = ss "tam";
|
||
there7to_Adv = ss "tam";
|
||
there7from_Adv = ss "stamtąd";
|
||
therefore_PConj = ss "dlatego";
|
||
they_Pron = pronOni;-- pronOneFem; pronOneNeut};
|
||
this_Quant = demPronTen "ten";
|
||
through_Prep = mkPrep "przez" Acc;
|
||
to_Prep = mkPrep "do" Gen; -- def. in ParadigmsPol.gf
|
||
too_AdA = ss "za";
|
||
under_Prep = mkPrep "pod" Instr; -- with Acc too
|
||
very_AdA = ss "bardzo";
|
||
want_VV = mkV "chcieć" conj45 "zechcieć" conj45;
|
||
we_Pron = pronMy;
|
||
whatPl_IP = co;
|
||
whatSg_IP = co;
|
||
when_IAdv = ss "kiedy";
|
||
when_Subj = ss "jeśli";
|
||
where_IAdv = ss "gdzie";
|
||
which_IQuant = { s = ktory };
|
||
whoPl_IP = kto;
|
||
whoSg_IP = kto;
|
||
why_IAdv = ss "dlaczego";
|
||
with_Prep = mkPrep "z" Instr;
|
||
without_Prep = mkPrep "bez" Gen; -- def. in ParadigmsPol.gf
|
||
youPl_Pron = pronWy;
|
||
yes_Utt = ss "tak";
|
||
youSg_Pron = pronTy;
|
||
youPol_Pron = pronTy;
|
||
|
||
as_CAdv = { s,sn="tak"; p,pn="jak"} ;
|
||
|
||
};
|