GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-28 01:18:57 -06:00
Code Issues Packages Projects Releases Wiki Activity

helper functions for various noun types

Browse Source
This commit is contained in:
Herbert Lange
2019-06-23 16:51:38 +02:00
parent 9772134edc
commit 02130dc128
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/latin/ParadigmsLat.gf
View File

@@ -41,6 +41,9 @@ oper
= \x,y,z -> lin N ( noun_ngg x y z ) ; = \x,y,z -> lin N ( noun_ngg x y z ) ;
} ; } ;
pluralN = ResLat.pluralN ;
singularN = ResLat.singularN ;
constN = ResLat.constN ;
mkA = overload { mkA = overload {
mkA : (verbum : Str) -> A -- Nominative masculine mkA : (verbum : Str) -> A -- Nominative masculine
= \n -> lin A ( adj n ** {isPre = False } ) ; = \n -> lin A ( adj n ** {isPre = False } ) ;
@@ -101,8 +104,7 @@ oper
= \p,c -> lin Adv (mkFullAdverb p c nonExist); = \p,c -> lin Adv (mkFullAdverb p c nonExist);
}; };
pluralN = ResLat.pluralN ;
singularN = ResLat.singularN ;
mkConj = overload { mkConj = overload {
mkConj : Str -> Str -> Str -> Number -> Coordinator -> Conjunction = mkConjunction ; mkConj : Str -> Str -> Str -> Number -> Coordinator -> Conjunction = mkConjunction ;

2
src/latin/ResLat.gf
View File

@@ -79,6 +79,8 @@ param
postap = n.postap postap = n.postap
-- massable = n.massable ; -- massable = n.massable ;
}; };
constN : Str -> Gender -> Noun = \s,g ->
{ s = \\_,_ => s ; g = g } ;
param param
AdjPos = Pre | Post ; AdjPos = Pre | Post ;