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

added UttNP

Browse Source
This commit is contained in:
Krasimir Angelov
2025-11-06 12:54:45 +01:00
parent fd817f80d6
commit fff1c40f24
1 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/gaelic/PhraseGla.gf
View File

@@ -7,9 +7,11 @@ concrete PhraseGla of Phrase = CatGla ** open Prelude, ResGla in {
{- {-
UttQS qs = qs ; UttQS qs = qs ;
UttIAdv iadv = iadv ; UttIAdv iadv = iadv ; -}
UttNP np =
UttIP ip = UttNP np = {s = linNP np} ;
{- UttIP ip =
UttImpSg pol imp = { s = pol.s ++ imp.s ! Sg ! pol.p } ; UttImpSg pol imp = { s = pol.s ++ imp.s ! Sg ! pol.p } ;
UttImpPl pol imp = UttImpPl pol imp =
UttImpPol pol imp = {s = pol.s ++ imp.s ! Sg ! pol.p} ; UttImpPol pol imp = {s = pol.s ++ imp.s ! Sg ! pol.p} ;