mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-11 05:49:31 -06:00
51 lines
1.9 KiB
Plaintext
51 lines
1.9 KiB
Plaintext
--# -path=.:french:romance:abstract:prelude:common
|
|
concrete MergeFre of Merge = BasicFre ** open DictLangFre, ParadigmsFre, ResFre, LexiconFre, ExtraLexiconFre, ParamBasic,StructuralFre in {
|
|
|
|
lin
|
|
-- single instances
|
|
|
|
|
|
|
|
-- subclass declarations :
|
|
|
|
Animal = UseN animal_N ;
|
|
AnimalLanguage = ApposCN (UseN animal_N) (MassNP (UseN language_N)) ;
|
|
Blood = UseN blood_N ;
|
|
Bone = UseN bone_N ;
|
|
Book = UseN book_N ;
|
|
Buying = UseN2 (VerbToNounV2 buy_V2) ;
|
|
Day = UseN day_N ;
|
|
Eating = UseN2 (VerbToNounV2 eat_V2) ;
|
|
Egg = UseN egg_N ;
|
|
House = UseN house_N ;
|
|
Man = UseN man_N ;
|
|
Meat = UseN meat_N ;
|
|
WaterCloud = ApposCN (UseN water_N) (MassNP (UseN cloud_N)) ;
|
|
Wind = UseN wind_N ;
|
|
Woman = UseN woman_N ;
|
|
Worm = UseN worm_N ;
|
|
Year = UseN year_N ;
|
|
|
|
-- unary functions
|
|
FloorFn ob = AdvNP (DetCN (DetQuant DefArt NumSg) (UseN floor_N)) (PrepNP part_Prep ob) ;
|
|
YearFn ob = AdvCN (UseN year_N) (PrepNP part_Prep ob) ;
|
|
SquareRootFn ob = AdvNP (DetCN (DetQuant DefArt NumSg) (AdjCN (PositA square_A) (UseN root_N))) (PrepNP part_Prep ob) ;
|
|
RoundFn ob = AdvNP (DetCN (DetQuant DefArt NumSg) (AdjCN (PositA round_A) (UseN value_N))) (PrepNP possess_Prep ob) ;
|
|
|
|
-- binary functions
|
|
|
|
|
|
DayFn ob1 ob2 = AdvCN (ApposCN (UseN day_N) ob1) (PrepNP part_Prep (MassNP ob2)) ;
|
|
|
|
|
|
|
|
knows ob1 ob2 = mkPolSent (PredVP ob1 (ComplSlash (SlashV2a know_V2) (sentToNoun ob2))) ;
|
|
smaller ob1 ob2 = mkPolSent (PredVP ob1 (UseComp (CompAP (ComparA small_A ob2)))) ;
|
|
husband ob1 ob2 = mkPolSent (PredVP ob1 (AdvVP (UseComp (CompNP (DetCN (DetQuant DefArt NumSg) (UseN husband_N)))) (PrepNP part_Prep ob2))) ;
|
|
wife ob1 ob2 = mkPolSent (PredVP ob1 (AdvVP (UseComp (CompNP (DetCN (DetQuant DefArt NumSg) (UseN wife_N)))) (PrepNP part_Prep ob2))) ;
|
|
sister ob1 ob2 = mkPolSent (PredVP ob1 (AdvVP (UseComp (CompNP (DetCN (DetQuant DefArt NumSg) (UseN sister_N)))) (PrepNP part_Prep ob2))) ;
|
|
|
|
-- ternary predicate
|
|
|
|
|
|
}; |