msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

WIP more preposition contractions + phonological mutation rules

Browse Source
This commit is contained in:
Inari Listenmaa
2025-08-27 17:22:33 +02:00
parent ed745708b2
commit d652c81fa7
4 changed files with 57 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/gaelic/NounGla.gf
View File

@@ -8,7 +8,7 @@ concrete NounGla of Noun = CatGla ** open ResGla, Prelude in {
-- : Det -> CN -> NP
DetCN det cn = emptyNP ** {
art = \\c => det.s ! cn.g ! c ;
art = \\c => det.s ! cn.g ! npc2c c ;
s = \\c => cn.s ! getNForm det.dt c ;
a = NotPron det.dt ;
} ;
@@ -19,7 +19,10 @@ concrete NounGla of Noun = CatGla ** open ResGla, Prelude in {
-- : Pron -> NP ;
-- Assuming that lincat Pron = lincat NP
UsePron pron = emptyNP ** pron ** {a = IsPron pron.a} ;
UsePron pron = emptyNP ** pron ** {
s = \\c => pron.s ! npc2cc c ;
a = IsPron pron.a
} ;
{-
-- : Predet -> NP -> NP ; -- only the man
PredetNP predet np =