mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-20 10:19:32 -06:00
60 lines
2.5 KiB
Plaintext
60 lines
2.5 KiB
Plaintext
--# -path=.:../abstract:../common:../../prelude
|
|
resource ResUrdHin = open Prelude, UrduHindiAbs in {
|
|
flags coding=utf8 ; optimize=all;
|
|
|
|
-- param and oper definitions in this file for Morphology
|
|
|
|
param Number = Sg | Pl ;
|
|
param Case = Nom | Obl | Voc ;
|
|
param Gender = Masc | Fem ;
|
|
param Person = Pers1 | Pers2_Casual | Pers2_Familiar |
|
|
Pers2_Respect | Pers3_Near | Pers3_Distant ;
|
|
param Degree = Posit | Comp | Super ;
|
|
param ProperNounForm = PNF Case ;
|
|
param NounForm = NF Number Case ;
|
|
param DemPronForm = DPF Number Case ;
|
|
param PersPronForm = PPF Number Person Case ;
|
|
param RefPronForm = RefPF ;
|
|
param InterrPronForm = IntPF Number Case ;
|
|
param InterrPronForm1 = IntPF1 ;
|
|
param InterrPronForm2 = IntPF2 Number Case Gender ;
|
|
param InterrPronForm3 = IntPF3 Number Gender ;
|
|
param IndefPronForm = IPF Case Gender ;
|
|
param IndefPronForm1 = IPF1 Case ;
|
|
param IndefPronForm2 = IPF2 ;
|
|
param RelPronForm = RPF Number Case ;
|
|
param RelPronForm1 = RPF1 Number Gender ;
|
|
param RelPronForm2 = RPF2 Case ;
|
|
param RelPronForm3 = RPF3 ;
|
|
param NumeralForm = NumeralF;
|
|
param AdjForm = AdjF Number Case Gender ;
|
|
param AdjForm1 = AdjF1 ;
|
|
param AdjDegForm = AdjDegF Degree ;
|
|
param PossivePostPForm = PossPostPF Number Gender ;
|
|
param Tense = Subj | Perf | Imperf ;
|
|
param Tense_Aux = Past | Present | Future | Subjunctive | Perfective | Imperfective;
|
|
param Verb_AuxForm = VA Tense_Aux Person Number Gender |
|
|
VA_Root | VA_Inf | VA_Inf_Fem | VA_Inf_Obl;
|
|
param VerbForm = VF Tense Person Number Gender | Inf | Root | Inf_Obl | Inf_Fem ;
|
|
param VerbForm1 = VF1 Tense Person Number Gender | Caus1 Tense Person Number Gender |
|
|
Caus2 Tense Person Number Gender | Inf1 | Caus1_Inf | Caus2_Inf |
|
|
Inf_Fem1 | Inf_Obl1 | Caus1_Inf_Obl | Caus2_Inf_Obl | Root1 |
|
|
Caus1_Root | Caus2_Root ;
|
|
param VerbForm2 = VF2 Tense Person Number Gender | VCaus1 Tense Person Number Gender |
|
|
Inf2 | VCaus1_Inf | Inf_Obl2 | Inf_Fem2 | VCaus1_Inf_Obl |
|
|
Root2 | VCaus1_Root ;
|
|
param VerbForm3 = VF3 Tense Person Number Gender | VCaus2 Tense Person Number Gender |
|
|
Inf3 | Inf_Fem3 | VCaus2_Inf | Inf_Obl3 | VCaus2_Inf_Obl | Root3 |
|
|
VCaus2_Root ;
|
|
param PossPronForm = PossF Number Person Gender ;
|
|
|
|
{-
|
|
oper mkPron2NP : PersPron -> NP =
|
|
\pp ->
|
|
{ s = \\c => pp.s ! PPF Sg Pers1 c ; n = Sg ; p = Pers1 ; g = Masc };
|
|
-}
|
|
|
|
|
|
|
|
} ;
|