preposition stranding in English and Scand

2026-05-22 01:22:51 -06:00 · 2006-06-18 18:34:08 +00:00
parent b7483420eb
commit 865d84508f
6 changed files with 50 additions and 11 deletions
--- a/lib/resource-1.0/scandinavian/ExtraScand.gf
+++ b/lib/resource-1.0/scandinavian/ExtraScand.gf
@@ -8,4 +8,26 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand ** open CommonScand,R

    ComplBareVS v s  = insertObj (\\_ => s.s ! Sub) (predV v) ;

+    StrandRelSlash rp slash  = {
+      s = \\t,a,p,ag => 
+          rp.s ! ag.gn ! RNom ++ slash.s ! t ! a ! p ! Sub ++ slash.c2 ;
+      c = NPAcc
+      } ;
+    EmptyRelSlash rp slash = {
+      s = \\t,a,p,ag => 
+          slash.s ! t ! a ! p ! Sub ++ slash.c2 ;
+      c = NPAcc
+      } ;
+
+    StrandQuestSlash ip slash = {
+      s = \\t,a,p => 
+            let 
+              cls = slash.s ! t ! a ! p ;
+              who = ip.s ! accusative
+            in table {
+              QDir   => who ++ cls ! Inv ++ slash.c2 ;
+              QIndir => who ++ cls ! Sub ++ slash.c2
+              }
+      } ;
+
 }