From 014f4e1e11fdc9d4b12beb87e19a0a7db9290631 Mon Sep 17 00:00:00 2001
From: "kr.angelov" <kr.angelov@gmail.com>
Date: Fri, 21 Feb 2014 16:29:55 +0000
Subject: [PATCH] linref for Conj in English and Bulgarian

---
 lib/src/bulgarian/CatBul.gf | 6 ++++++
 lib/src/english/CatEng.gf   | 2 ++
 2 files changed, 8 insertions(+)

diff --git a/lib/src/bulgarian/CatBul.gf b/lib/src/bulgarian/CatBul.gf
index 0ca5de5b7..031b66c87 100644
--- a/lib/src/bulgarian/CatBul.gf
+++ b/lib/src/bulgarian/CatBul.gf
@@ -120,6 +120,12 @@ concrete CatBul of Cat = CommonX - [IAdv,CAdv] ** open ResBul, Prelude, Predef,
                                }
                       in linrefVP vp;
 
+    Conj = \conj -> let s = linCoord ! conj.conj 
+                    in case conj.distr of {
+                         True  => s ++ s;
+                         False => s
+                       } ;
+
     V, VS, VQ, VA = \v -> linrefVP (predV v);
     V2, V2A = \v -> linrefVP (predV v) ++ v.c2.s;
     V2V = \v -> linrefVP (predV v) ++ v.c2.s ++ v.c3.s ++ "да";
diff --git a/lib/src/english/CatEng.gf b/lib/src/english/CatEng.gf
index cd58eeb00..d78a5e381 100644
--- a/lib/src/english/CatEng.gf
+++ b/lib/src/english/CatEng.gf
@@ -132,6 +132,8 @@ concrete CatEng of Cat = CommonX - [Pol] ** open ResEng, Prelude in {
     VP = \vp -> infVP VVAux vp Simul CPos (agrP3 Sg) ;
     VPSlash = \vps -> infVP VVAux vps Simul CPos (agrP3 Sg) ++ vps.c2;
 
+    Conj = \conj -> conj.s1 ++ conj.s2 ;
+
     V, VS, VQ, VA = \v -> infVP VVAux (predV v) Simul CPos (agrP3 Sg);
     V2, V2A, V2Q, V2S = \v -> infVP VVAux (predV v) Simul CPos (agrP3 Sg) ++ v.c2;
     V3 = \v -> infVP VVAux (predV v) Simul CPos (agrP3 Sg) ++ v.c2 ++ v.c3;