GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-26 03:26:27 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Hun) Remove unused parameters

Browse Source
This commit is contained in:
Inari Listenmaa
2020-04-25 14:47:56 +02:00
parent 44603f7db7
commit e2d79a72f6
3 changed files with 25 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/hungarian/NounHun.gf
-6
View File
@@ -184,11 +184,6 @@ concrete NounHun of Noun = CatHun ** open
-- : N2 -> CN ;
UseN,UseN2 = \n -> n ** {
compl = \\_,_ => [] ;
pstems = table {
PossSg (dSg_rP3 _) => n.s ! PossdSg_PossrP3 ;
PossSg dSg_rPl1 => n.s ! PossdSg_PossrPl1 ;
PossSg dSg_rSg1P2 => n.s ! SgAccStem ;
PossPl => n.s ! PossdPl } ;
} ;
-- : N2 -> NP -> CN ;
@@ -207,7 +202,6 @@ concrete NounHun of Noun = CatHun ** open
-- : AP -> CN -> CN
AdjCN ap cn = cn ** {
s = \\nc => ap.s ! Sg ++ cn.s ! nc ;
pstems = \\cs => ap.s ! Sg ++ cn.pstems ! cs ;
compl = \\n,c => ap.compar ++ cn.compl ! n ! c ;
} ;