updated and tested Mathematical

lib/resource-1.0/mathematical/Mathematical.gf

@@ -20,6 +20,8 @@ abstract Mathematical =
   Relative,
   Conjunction,
   Phrase,
+  Text,
+  Idiom,
   Structural,
 
   Symbol,

lib/resource-1.0/mathematical/MathematicalEng.gf

@@ -12,6 +12,8 @@ concrete MathematicalEng of Mathematical =
   ConjunctionEng,
   PhraseEng,
   StructuralEng,
+  TextX,
+  IdiomEng,
 
   SymbolEng,
   PredicationEng,

lib/resource-1.0/mathematical/MathematicalFin.gf

@@ -11,6 +11,8 @@ concrete MathematicalFin of Mathematical =
   RelativeFin,
   ConjunctionFin,
   PhraseFin,
+  TextX,
+  IdiomFin,
   StructuralFin,
 
   SymbolFin,

lib/resource-1.0/mathematical/MathematicalFre.gf

@@ -11,8 +11,10 @@ concrete MathematicalFre of Mathematical =
   RelativeFre,
   ConjunctionFre,
   PhraseFre,
+  TextX,
+  IdiomFre,
   StructuralFre,
-
+  
   SymbolFre,
   PredicationFre - [predV3], ---- gf bug
 

lib/resource-1.0/mathematical/MathematicalGer.gf

@@ -11,6 +11,8 @@ concrete MathematicalGer of Mathematical =
   RelativeGer,
   ConjunctionGer,
   PhraseGer,
+  TextX,
+  IdiomGer,
   StructuralGer,
 
   SymbolGer,

lib/resource-1.0/mathematical/MathematicalIta.gf

@@ -11,6 +11,8 @@ concrete MathematicalIta of Mathematical =
   RelativeIta,
   ConjunctionIta,
   PhraseIta,
+  TextX,
+  IdiomIta,
   StructuralIta,
 
   SymbolIta,

lib/resource-1.0/mathematical/MathematicalNor.gf

@@ -0,0 +1,27 @@
+--# -path=.:../norwegian:../scandinavian:../abstract:../common:prelude
+
+concrete MathematicalNor of Mathematical = 
+  NounNor - [ComplN2], --- to avoid ambiguity 
+--  VerbNor, 
+--  AdjectiveNor,
+--  AdverbNor,
+  NumeralNor,
+--  SentenceNor,
+  QuestionNor,
+  RelativeNor,
+  ConjunctionNor,
+  PhraseNor,
+  TextX,
+  IdiomNor,
+
+  StructuralNor,
+
+  SymbolNor,
+  PredicationNor,
+
+  LexiconNor
+  ** {
+
+flags startcat = Phr ;
+
+} ;

lib/resource-1.0/mathematical/MathematicalSpa.gf

@@ -11,6 +11,8 @@ concrete MathematicalSpa of Mathematical =
   RelativeSpa,
   ConjunctionSpa,
   PhraseSpa,
+  TextSpa,
+  IdiomSpa,
   StructuralSpa,
 
   SymbolSpa,

lib/resource-1.0/mathematical/MathematicalSwe.gf

@@ -11,6 +11,9 @@ concrete MathematicalSwe of Mathematical =
   RelativeSwe,
   ConjunctionSwe,
   PhraseSwe,
+  TextX,
+  IdiomSwe,
+
   StructuralSwe,
 
   SymbolSwe,

lib/resource-1.0/mathematical/PredicationNor.gf

@@ -0,0 +1,3 @@
+concrete PredicationNor of Predication = CatNor ** PredicationI with
+  (Lang = LangNor) ;
+

lib/resource-1.0/mathematical/SymbolEng.gf

@@ -3,6 +3,7 @@ concrete SymbolEng of Symbol = CatEng ** open Prelude, ResEng in {
 lin
   SymbPN i = {s = \\c => i.s ; a = agrP3 Sg} ; --- c
   IntPN i  = {s = \\c => i.s ; a = agrP3 Sg} ; --- c
+  FloatPN i = {s = \\c => i.s ; a = agrP3 Sg} ; --- c
   CNIntNP cn i = {
     s = \\c => (cn.s ! Sg ! Nom ++ i.s) ;
     a = agrP3 Sg
@@ -14,7 +15,7 @@ lin
 
 lincat 
 
-  Symb, SymbList = SS ;
+  Symb, [Symb] = SS ;
 
 lin
 

lib/resource-1.0/mathematical/SymbolFin.gf

@@ -1,21 +1,24 @@
-concrete SymbolFin of Symbol = CatFin ** open Prelude, ResFin in {
+concrete SymbolFin of Symbol = CatFin ** open Prelude, NounFin, ResFin in {
 
 lin
   SymbPN i = {s = \\c => i.s} ; --- c
   IntPN i  = {s = \\c => i.s} ; --- c
-{-
+  FloatPN i  = {s = \\c => i.s} ; --- c
+
   CNIntNP cn i = {
-    s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
+    s = \\c => cn.s ! NCase Sg (npform2case c) ++ i.s ;
-    a = agrP3 cn.g Sg
+    a = agrP3 Sg ;
+    isPron = False
     } ;
-  CNSymbNP det cn xs = let g = cn.g in {
+  CNSymbNP det cn xs = let detcn = NounFin.DetCN det cn in {
-    s = \\c => det.s ! cn.isMod ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ; 
+    s = \\c => detcn.s ! c ++ xs.s ;
-    a = agrP3 g det.n
+    a = detcn.a ;
+    isPron = False
     } ;
--}
+
 lincat 
 
-  Symb, SymbList = SS ;
+  Symb, [Symb] = SS ;
 
 lin
 

lib/resource-1.0/mathematical/SymbolGer.gf

@@ -3,19 +3,22 @@ concrete SymbolGer of Symbol = CatGer ** open Prelude, ResGer in {
 lin
   SymbPN i = {s = \\c => i.s ; g = Neutr} ; --- c
   IntPN i  = {s = \\c => i.s ; g = Neutr} ; --- c
-{-
+  FloatPN i  = {s = \\c => i.s ; g = Neutr} ; --- c
+
   CNIntNP cn i = {
-    s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
+    s = \\c => cn.s ! Weak ! Sg ! Nom ++ i.s ;
-    a = agrP3 cn.g Sg
+    a = agrP3 Sg ;
+    isPron = False
     } ;
   CNSymbNP det cn xs = let g = cn.g in {
-    s = \\c => det.s ! cn.isMod ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ; 
+    s = \\c => det.s ! g ! c ++ cn.s !  adjfCase det.a c ! det.n ! c ++ xs.s ; 
-    a = agrP3 g det.n
+    a = agrP3 det.n ;
+    isPron = False
     } ;
--}
+
 lincat 
 
-  Symb, SymbList = SS ;
+  Symb, [Symb] = SS ;
 
 lin
 

lib/resource-1.0/mathematical/SymbolNor.gf

@@ -0,0 +1,2 @@
+concrete SymbolNor of Symbol = CatNor ** SymbolScand with
+  (ResScand = ResNor) ;

lib/resource-1.0/mathematical/SymbolRomance.gf

@@ -4,21 +4,22 @@ incomplete concrete SymbolRomance of Symbol =
 lin
   SymbPN i = {s = i.s ; g = Masc} ;
   IntPN i  = {s = i.s ; g = Masc} ;
+  FloatPN i  = {s = i.s ; g = Masc} ;
 
-{-
   CNIntNP cn i = {
-    s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
+    s = \\c => cn.s ! Sg ++ i.s ;
-    a = agrP3 cn.g Sg
+    a = agrP3 cn.g Sg ;
+    hasClit = False
     } ;
   CNSymbNP det cn xs = let g = cn.g in {
-    s = \\c => det.s ! g ++ cn.s ! det.n ! det.det ! caseNP c ++ xs.s ; 
+    s = \\c => det.s ! g ! npform2case c ++ cn.s ! det.n ++ xs.s ; 
-    a = agrP3 g det.n
+    a = agrP3 g det.n ;
+    hasClit = False
     } ;
--}
 
 lincat 
 
-  Symb, SymbList = SS ;
+  Symb, [Symb] = SS ;
 
 lin
 

lib/resource-1.0/mathematical/SymbolScand.gf

@@ -4,6 +4,7 @@ incomplete concrete SymbolScand of Symbol =
 lin
   SymbPN i = {s = \\c => i.s ; g = Neutr} ; --- c
   IntPN i  = {s = \\c => i.s ; g = Neutr} ; --- c
+  FloatPN i  = {s = \\c => i.s ; g = Neutr} ; --- c
   CNIntNP cn i = {
     s = \\c => (cn.s ! Sg ! DIndef ! Nom ++ i.s) ;
     a = agrP3 cn.g Sg
@@ -15,7 +16,7 @@ lin
 
 lincat 
 
-  Symb, SymbList = SS ;
+  Symb, [Symb] = SS ;
 
 lin