summaryrefslogtreecommitdiff
path: root/next-lib/src/finnish/ResFin.gf
diff options
context:
space:
mode:
Diffstat (limited to 'next-lib/src/finnish/ResFin.gf')
-rw-r--r--next-lib/src/finnish/ResFin.gf16
1 files changed, 16 insertions, 0 deletions
diff --git a/next-lib/src/finnish/ResFin.gf b/next-lib/src/finnish/ResFin.gf
index 5fc68384d..e26c96b26 100644
--- a/next-lib/src/finnish/ResFin.gf
+++ b/next-lib/src/finnish/ResFin.gf
@@ -586,4 +586,20 @@ oper
} ;
etta_Conj : Str = "että" ;
+
+ heavyDet : PDet -> PDet ** {sp : Case => Str} = \d -> d ** {sp = d.s1} ;
+ PDet : Type = {
+ s1 : Case => Str ;
+ s2 : Str ;
+ n : Number ;
+ isNum : Bool ;
+ isPoss : Bool ;
+ isDef : Bool
+ } ;
+
+ heavyQuant : PQuant -> PQuant ** {sp : Number => Case => Str} = \d ->
+ d ** {sp = d.s1} ;
+ PQuant : Type =
+ {s1 : Number => Case => Str ; s2 : Str ; isPoss : Bool ; isDef : Bool} ;
+
}