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

MakeStructuralFin: Det and IDet with partitive argument

Browse Source
This commit is contained in:
Aarne Ranta
2018-12-27 19:10:13 +01:00
parent d9d3699b20
commit 2e34f89c45
2 changed files with 11 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/finnish/MakeStructuralFin.gf
View File

@@ -10,7 +10,12 @@ oper
mkIQuant : Str -> IQuant = \s ->
{s = \\n,c => s ; lock_IQuant = <>} ; ----
mkIDet : Bool -> Str -> N -> Number -> IDet = \isNum,pref,s,n ->
lin IDet {s = \\c => pref ++ s.s ! NCase n c ; n = n ; isNum = isNum} ;
mkDet : N -> Number -> Det = \s,n ->
MorphoFin.mkDet n s ;
lin Det (MorphoFin.mkDet n s) ;
partDet : N -> Number -> Det = \s,n ->
lin Det (MorphoFin.partDet False n s) ;
}