From 231c63aa419dfb442a9225126bca064b5287666f Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Wed, 26 May 2010 14:11:23 +0000
Subject: Ita and Fre superlatives, Ita possessives, in Phrasebook

---
 examples/phrasebook/SentencesFre.gf | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'examples/phrasebook/SentencesFre.gf')

diff --git a/examples/phrasebook/SentencesFre.gf b/examples/phrasebook/SentencesFre.gf
index cbc6db8c4..84d7b8cf0 100644
--- a/examples/phrasebook/SentencesFre.gf
+++ b/examples/phrasebook/SentencesFre.gf
@@ -1,7 +1,8 @@
 concrete SentencesFre of Sentences = NumeralFre ** SentencesI - [
   QProp,
   IFemale, YouFamFemale, YouPolFemale,
-  PYesToNo
+  PYesToNo,
+  Superlative
  ] 
   with 
     (Syntax = SyntaxFre), 
@@ -9,6 +10,8 @@ concrete SentencesFre of Sentences = NumeralFre ** SentencesI - [
     (Lexicon = LexiconFre) ** 
   open SyntaxFre, ExtraFre, Prelude in {
 
+    lincat
+      Superlative = {s : Ord ; isPre : Bool} ;
     lin 
       QProp a = 
         lin QS {s = \\_ => (EstcequeS (mkS a)).s} ;
-- 
cgit v1.2.3