Implement ComplSlash

src/turkish/CatTur.gf

@@ -10,7 +10,7 @@ concrete CatTur of Cat = CommonX ** open ResTur, Prelude in {
     CN = {s : Number => Case => Str; gen : Number => Agr => Str} ;
     NP = {s : Case => Str ; a : Agr} ;
     VP = Verb ;
-    VPSlash = VP ** {c2 : Prep} ;
+    VPSlash = VP ** {c : Prep} ;
 
     Pron = ResTur.Pron ;
     Det = {s : Str; n : Number; useGen : UseGen} ;

src/turkish/VerbTur.gf

@@ -2,5 +2,10 @@ concrete VerbTur of Verb = CatTur ** open ResTur in {
 
   lin
     UseV v = v ;
+    SlashV2a v = v ;
+
+    ComplSlash vps np = {
+      s = \\ vf => vps.c.s ++ np.s ! vps.c.c ++ vps.s ! vf ;
+    } ;
 
 }