mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
restored OrigMorphoPol and OrigNounMorphoPol to make ParadigmsPol compilable
This commit is contained in:
aarne
@@ -5,7 +5,7 @@
|
||||
-- Adam Slaski, 2009, 2010 <adam.slaski@gmail.com>
|
||||
|
||||
concrete LexiconPol of Lexicon = CatPol, LexiconNounPol **
|
||||
open Prelude, MorphoPol in {
|
||||
open Prelude, MorphoPol, (PP = ParadigmsPol) in {
|
||||
|
||||
flags
|
||||
optimize =values ; coding =utf8 ;
|
||||
|
||||
278
lib/src/polish/OrigMorphoPol.gf
Normal file
278
lib/src/polish/OrigMorphoPol.gf
Normal file
@@ -0,0 +1,278 @@
|
||||
--# -path=.:../prelude:../common:../abstract
|
||||
--# -coding=utf8
|
||||
|
||||
--1 A polish Resource Morphology
|
||||
--
|
||||
-- Ilona Nowak, Wintersemester 2007/08
|
||||
--
|
||||
-- Adam Slaski, 2009 <adam.slaski@gmail.com>
|
||||
--
|
||||
-- This resource morphology contains definitions
|
||||
-- of the lexical entries needed in the resource syntax.
|
||||
-- It moreover contains copies of the most usual inflectional patterns.
|
||||
|
||||
-- I use the parameter types and word classes defined for morphology.
|
||||
|
||||
resource OrigMorphoPol =
|
||||
ResPol,
|
||||
VerbMorphoPol,
|
||||
PronounMorphoPol,
|
||||
AdjectiveMorphoPol,
|
||||
OrigNounMorphoPol ** open Prelude, (Predef=Predef) in {
|
||||
|
||||
flags coding=utf8;
|
||||
|
||||
-- definitions for structural objects
|
||||
|
||||
oper
|
||||
wszyscy : NounPhrase = {
|
||||
nom = "wszyscy" ;
|
||||
voc = "wszyscy" ;
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "wszystkich";
|
||||
(DatNoPrep|DatPrep) => "wszystkim";
|
||||
(AccNoPrep|AccPrep) => "wszystkich";
|
||||
InstrC => "wszystkimi";
|
||||
LocPrep => "wszystkich"
|
||||
};
|
||||
p = P3 ;
|
||||
gn = MascPersPl -- in fact it is plurale tantum ver. 3
|
||||
};
|
||||
|
||||
wszystko : NounPhrase = {
|
||||
nom = "wszystko" ;
|
||||
voc = "wszystko" ;
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "wszystkiego";
|
||||
(DatNoPrep|DatPrep) => "wszystkiemu";
|
||||
(AccNoPrep|AccPrep) => "wszystko";
|
||||
InstrC => "wszystkim";
|
||||
LocPrep => "wszystkim"
|
||||
};
|
||||
p = P3;
|
||||
gn = NeutSg -- in fact it is plurale tantum ver. 3
|
||||
};
|
||||
|
||||
ktos : NounPhrase = {
|
||||
nom = "ktoś" ;
|
||||
voc = "ktosiu" ;
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "kogoś";
|
||||
(DatNoPrep|DatPrep) => "komuś";
|
||||
(AccNoPrep|AccPrep) => "kogoś";
|
||||
InstrC => "kimś";
|
||||
LocPrep => "kimś"
|
||||
};
|
||||
p = P3 ;
|
||||
gn = MascPersSg
|
||||
};
|
||||
|
||||
cos : NounPhrase = {
|
||||
nom = "coś" ;
|
||||
voc = "coś" ;
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "czegoś";
|
||||
(DatNoPrep|DatPrep) => "czemuś";
|
||||
(AccNoPrep|AccPrep) => "coś";
|
||||
InstrC => "czymś";
|
||||
LocPrep => "czymś"
|
||||
};
|
||||
p = P3 ;
|
||||
gn = NeutSg
|
||||
};
|
||||
|
||||
|
||||
kto : NounPhrase = {
|
||||
nom = "kto" ;
|
||||
voc = "kto" ;
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "kogo";
|
||||
(DatNoPrep|DatPrep) => "komu";
|
||||
(AccNoPrep|AccPrep) => "kogo";
|
||||
InstrC => "kim";
|
||||
LocPrep => "kim"
|
||||
};
|
||||
p = P3 ;
|
||||
gn = MascPersSg
|
||||
};
|
||||
|
||||
co : NounPhrase = {
|
||||
nom = "co" ;
|
||||
voc = "co" ;
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "czego";
|
||||
(DatNoPrep|DatPrep) => "czemu";
|
||||
(AccNoPrep|AccPrep) => "co";
|
||||
InstrC => "czym";
|
||||
LocPrep => "czym"
|
||||
};
|
||||
p = P3 ;
|
||||
gn = NeutSg
|
||||
};
|
||||
|
||||
kazdyDet : Determiner = {
|
||||
s,sp = table {
|
||||
Nom => table {Masc _ => "każdy"; Fem => "każda"; (Neut|NeutGr|Plur) => "każde" };
|
||||
Gen => table {Masc _ => "każdego"; Fem => "każdą"; (Neut|NeutGr|Plur) => "każdego" };
|
||||
Dat => table {Masc _ => "każdemu"; Fem => "każdej"; (Neut|NeutGr|Plur) => "każdemu" };
|
||||
Acc => table {Masc (Personal|Animate) => "każdego"; Masc Inanimate => "każdy"; Fem => "każdą"; (Neut|NeutGr|Plur) => "każde" };
|
||||
Instr => table {Masc _ => "każdym"; Fem => "każdą"; (Neut|NeutGr|Plur) => "każdym" };
|
||||
Loc => table {Masc _ => "każdym"; Fem => "każdej"; (Neut|NeutGr|Plur) => "każdym" };
|
||||
VocP => table {Masc _ => "każdy"; Fem => "każda"; (Neut|NeutGr|Plur) => "każde" }
|
||||
};
|
||||
n = Sg;
|
||||
a = NoA;
|
||||
};
|
||||
|
||||
pareDet : Determiner = {
|
||||
s,sp = table {
|
||||
Nom => table {Masc Personal => "paru"; _ => "parę" };
|
||||
Gen => table { _ => "paru" };
|
||||
Dat => table { _ => "paru" };
|
||||
Acc => table {Masc Personal => "paru"; _ => "parę" };
|
||||
Instr => table { _ => "paroma" };
|
||||
Loc => table { _ => "paru" };
|
||||
VocP => table {Masc Personal => "paru"; _ => "parę" }
|
||||
};
|
||||
n = Pl;
|
||||
a = StoA
|
||||
};
|
||||
|
||||
wieleDet : Determiner = {
|
||||
s,sp = table {
|
||||
Nom => table {Masc Personal => "wielu"; _ => "wiele" };
|
||||
Gen => table { _ => "wielu" };
|
||||
Dat => table { _ => "wielu" };
|
||||
Acc => table {Masc Personal => "wielu"; _ => "wiele" };
|
||||
Instr => table { _ => "wieloma" };
|
||||
Loc => table { _ => "wielu" };
|
||||
VocP => table {Masc Personal => "wielu"; _ => "wiele" }
|
||||
};
|
||||
n = Pl;
|
||||
a = StoA
|
||||
};
|
||||
|
||||
duzoDet : Determiner = {
|
||||
s,sp = \\_,_=>"dużo";{-
|
||||
table {
|
||||
Nom => table { _ => "dużo" };
|
||||
Gen => table { _ => "dużo" };
|
||||
Dat => table { _ => variants {} };
|
||||
Acc => table { _ => "dużo" };
|
||||
Instr => table { _ => variants {} };
|
||||
Loc => table { _ => variants {} };
|
||||
VocP => table {_ => "dużo" }
|
||||
};-}
|
||||
n = Pl;
|
||||
a = StoA
|
||||
};
|
||||
|
||||
ileDet : IDeterminer = {
|
||||
s = table {
|
||||
Nom => table {Masc Personal => "ilu"; _ => "ile" };
|
||||
Gen => table { _ => "ilu" };
|
||||
Dat => table { _ => "ilu" };
|
||||
Acc => table {Masc Personal => "ilu"; _ => "ile" };
|
||||
Instr => table { _ => "ilu" };
|
||||
Loc => table { _ => "ilu" };
|
||||
VocP => table {Masc Personal => "ilu"; _ => "ile" }
|
||||
};
|
||||
n = Sg;
|
||||
a = StoA
|
||||
};
|
||||
|
||||
-- for "nobody", "noone", "none"
|
||||
oper niktNP : NounPhrase =
|
||||
{ voc,nom="nikt";
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "nikogo";
|
||||
(DatNoPrep|DatPrep) => "nikomu";
|
||||
(AccNoPrep|AccPrep) => "nikogo";
|
||||
InstrC => "nikim";
|
||||
LocPrep => "nikim"
|
||||
};
|
||||
p=P3;
|
||||
gn= MascPersSg
|
||||
};
|
||||
|
||||
-- for "nothing"
|
||||
oper nicNP : NounPhrase =
|
||||
{ voc,nom="nic";
|
||||
dep = table {
|
||||
(GenNoPrep|GenPrep) => "niczego";
|
||||
(DatNoPrep|DatPrep) => "niczemu";
|
||||
(AccNoPrep|AccPrep) => "nic";
|
||||
InstrC => "niczym";
|
||||
LocPrep => "niczym"
|
||||
};
|
||||
p=P3;
|
||||
gn= NeutSg
|
||||
};
|
||||
|
||||
zadenQuant : { s,sp:AForm=>Str } = {s,sp=table {
|
||||
AF (MascPersSg|MascAniSg|MascInaniSg) Nom => "żaden";
|
||||
AF (MascPersSg|MascAniSg|MascInaniSg) Gen => "żadnego";
|
||||
AF (MascPersSg|MascAniSg|MascInaniSg) Dat => "żadnemu";
|
||||
AF MascInaniSg Acc => "żaden"; -- który stół widzę
|
||||
AF (MascPersSg|MascAniSg) Acc => "żadnego"; -- którego psa / przyjaciela widzę
|
||||
AF (MascPersSg|MascAniSg|MascInaniSg) Instr => "żadnym";
|
||||
AF (MascPersSg|MascAniSg|MascInaniSg) Loc => "żadnym";
|
||||
AF (MascPersSg|MascAniSg|MascInaniSg) VocP => "żadny";
|
||||
|
||||
AF FemSg Nom => "żadna" ;
|
||||
AF FemSg Gen => "żadnej";
|
||||
AF FemSg Dat => "żadnej";
|
||||
AF FemSg Acc => "żadną";
|
||||
AF FemSg Instr => "żadną";
|
||||
AF FemSg Loc => "żadnej";
|
||||
AF FemSg VocP => "żadna";
|
||||
|
||||
AF NeutSg Nom => "żadne" ;
|
||||
AF NeutSg Gen => "żadnego";
|
||||
AF NeutSg Dat => "żadnemu";
|
||||
AF NeutSg Acc => "żadne";
|
||||
AF NeutSg Instr => "żadnym";
|
||||
AF NeutSg Loc => "żadnym";
|
||||
AF NeutSg VocP => "żadne";
|
||||
|
||||
AF MascPersPl Nom => "żadni";
|
||||
AF (MascPersPl|OthersPl) Nom => "żadne";
|
||||
AF (MascPersPl|OthersPl) Gen => "żadnych";
|
||||
AF (MascPersPl|OthersPl) Dat => "żadnym";
|
||||
AF MascPersPl Acc => "żadnych";
|
||||
AF (MascPersPl|OthersPl) Acc => "żadne";
|
||||
AF (MascPersPl|OthersPl) Instr => "żadnymi";
|
||||
AF (MascPersPl|OthersPl) Loc => "żadnych";
|
||||
AF MascPersPl VocP => "żadni";
|
||||
AF (MascPersPl|OthersPl) VocP=> "żadne"
|
||||
}};
|
||||
|
||||
pewienDet : Determiner = {
|
||||
s,sp = table {
|
||||
Nom => table {Masc _ => "pewien"; Fem=>"pewna"; _ => "pewne" };
|
||||
Gen => table { Fem=>"pewnej"; _ => "pewnego" };
|
||||
Dat => table { Fem=>"pewnej"; _ => "pewnemu" };
|
||||
Acc => table { Masc Inanimate => "pewien"; Masc _ => "pewnego"; Fem=>"pewną"; _ => "pewne" };
|
||||
Instr => table { Fem=>"pewną"; _=> "pewnym" };
|
||||
Loc => table { Fem=>"pewnej"; _=> "pewnym" };
|
||||
VocP => table {Masc _ => "pewny"; Fem=>"pewna"; _ => "pewne" }
|
||||
};
|
||||
n = Sg;
|
||||
a = NoA
|
||||
};
|
||||
|
||||
pewniDet : Determiner = {
|
||||
s,sp = table {
|
||||
Nom => table {Masc Personal => "pewni"; _ => "pewne" };
|
||||
Gen => table { _ => "pewnych" };
|
||||
Dat => table { _ => "pewnym" };
|
||||
Acc => table {Masc Personal => "pewnych"; _ => "pewne" };
|
||||
Instr => table { _ => "pewnymi" };
|
||||
Loc => table { _ => "pewnych" };
|
||||
VocP => table {Masc Personal => "pewni"; _ => "pewne" }
|
||||
};
|
||||
n = Pl;
|
||||
a = NoA
|
||||
};
|
||||
|
||||
}
|
||||
3539
lib/src/polish/OrigNounMorphoPol.gf
Normal file
3539
lib/src/polish/OrigNounMorphoPol.gf
Normal file
File diff suppressed because it is too large
Load Diff
@@ -30,7 +30,8 @@
|
||||
resource ParadigmsPol = open
|
||||
(Predef=Predef),
|
||||
Prelude,
|
||||
MorphoPol,
|
||||
OrigMorphoPol,
|
||||
(MorphoPol = OrigMorphoPol),
|
||||
CatPol
|
||||
in
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user