From 39ad56569463339d2398ac6002e9e41039e02691 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Thu, 13 Feb 2014 17:10:12 +0000
Subject: [PATCH] shall-should in Dictionary

---
 lib/src/translator/DictionaryEng.gf | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/lib/src/translator/DictionaryEng.gf b/lib/src/translator/DictionaryEng.gf
index fab99ceb2..3d66e557d 100644
--- a/lib/src/translator/DictionaryEng.gf
+++ b/lib/src/translator/DictionaryEng.gf
@@ -49455,13 +49455,13 @@ lin shotton_PN = mkPN "Shotton";
 lin shotts_PN = mkPN "Shotts";
 lin should_VV = {
     s = table { 
-      VVF VInf => ["be obliged to"] ;
-      VVF VPres => "should" ;
-      VVF VPPart => ["been obliged to"] ;
-      VVF VPresPart => ["being obliged to"] ;
-      VVF VPast => "shall" ;
-      VVPastNeg => "shall not" ;
-      VVPresNeg => "shouldn't"
+      VVF VInf => ["have to"] ;
+      VVF VPres => "shall" ;
+      VVF VPPart => ["had to"] ;
+      VVF VPresPart => ["having to"] ;
+      VVF VPast => "should" ;
+      VVPastNeg => "shouldn't" ;
+      VVPresNeg => "shan't"
       } ;
     p = [] ;
     typ = VVAux