support but as a conjunction

2018-06-14 08:13:02 +02:00
parent cb53630c60
commit b993704225
7 changed files with 37 additions and 24 deletions
@@ -222,7 +222,14 @@ oper
                      
    dualN : N -> Prep -> N
      = \n,p -> lin N { s   = n.s;
-                        rel = \\_ => p.s ++ n.s ! NF Sg Def ; relPost = True;
+                        rel = \\_ => p.s ++ 
+                                     case p.c of {
+                                       Acc      => "" ;
+                                       Dat      => "íà" ;
+                                       WithPrep => with_Word
+                                     } ++
+                                     n.s ! NF Sg Def ;
+                        relPost = True;
                        g   = n.g
                      }
  } ;