From 9de70d7f4d91d8d0681aff21070226c47b01823e Mon Sep 17 00:00:00 2001 From: Aarne Ranta Date: Sun, 4 Feb 2018 19:01:05 +0100 Subject: [PATCH] added Inessive as possible subject case in Fin --- src/finnish/ResFin.gf | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/finnish/ResFin.gf b/src/finnish/ResFin.gf index aac5568a0..61d36748c 100644 --- a/src/finnish/ResFin.gf +++ b/src/finnish/ResFin.gf @@ -30,7 +30,7 @@ resource ResFin = ParamX ** open Prelude in { --- These cases are possible for subjects. - SubjCase = SCNom | SCGen | SCPart | SCElat | SCAdess | SCAblat ; + SubjCase = SCNom | SCGen | SCPart | SCIness | SCElat | SCAdess | SCAblat ; oper appSubjCase : SubjCase -> ResFin.NP -> Str = \sc,np -> np.s ! subjcase2npform sc ; @@ -39,6 +39,7 @@ oper SCNom => NPCase Nom ; SCGen => NPCase Gen ; SCPart => NPCase Part ; + SCIness => NPCase Iness ; SCElat => NPCase Elat ; SCAdess => NPCase Adess ; SCAblat => NPCase Ablat @@ -47,6 +48,7 @@ oper npform2subjcase : NPForm -> SubjCase = \sc -> case sc of { NPCase Gen => SCGen ; NPCase Part => SCPart ; + NPCase Iness => SCIness ; NPCase Elat => SCElat ; NPCase Adess => SCAdess ; NPCase Ablat => SCAblat ;