1
0
forked from GitHub/gf-rgl

add pronouns, very much WIP (no object forms, possessives)

This commit is contained in:
Inari Listenmaa
2025-08-22 16:47:03 +02:00
parent c85e7a514b
commit d4056e7db3
4 changed files with 31 additions and 25 deletions

View File

@@ -12,15 +12,15 @@ concrete NounGla of Noun = CatGla ** open ResGla, Prelude in {
a = NotPron det.n ;
d = det.d
} ;
{-
-- : PN -> NP ;
-- Assuming that lincat PN = lincat NP
UsePN pn = pn ;
-- UsePN pn = pn ;
-- : Pron -> NP ;
-- Assuming that lincat Pron = lincat NP
UsePron pron = pron ;
UsePron pron = emptyNP ** pron ;
{-
-- : Predet -> NP -> NP ; -- only the man
PredetNP predet np =