prepositions in Slovenian

lib/src/slovenian/CatSlv.gf

@@ -1,6 +1,8 @@
 concrete CatSlv of Cat = open ResSlv in {
 
 lincat
+  Prep = {s : Str; c : Case} ;
+
   N = {s : Case => Number => Str; g : Gender};
   PN = {s : Case => Number => Str; g : Gender};
 

lib/src/slovenian/ParadigmsSlv.gf

@@ -1,6 +1,15 @@
 resource ParadigmsSlv = open CatSlv, ResSlv in {
 
 oper
+  nominative : Case = Nom ;
+  dative     : Case = Dat ;
+  accusative : Case = Acc ;
+  locative   : Case = Loc ;
+  instrumental:Case = Instr ;
+
+  mkPrep : Str -> Case -> Prep =
+    \s,c -> lin Prep {s=s; c=c};
+
   masculine = Masc;
   feminine  = Fem;
   neuter    = Neut;