Ita and Fre superlatives, Ita possessives, in Phrasebook

2010-05-26 14:11:23 +00:00
parent 1ff6d92b17
commit 45a0bf22ee
5 changed files with 60 additions and 32 deletions
--- 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} ;