Add LibraryBrowserIta. Add mkQuant, mkDet to MakeStructuralIta.

src/api/libraryBrowser/LibraryBrowserIta.gf

@@ -0,0 +1,24 @@
+--# -path=.:alltenses
+
+concrete LibraryBrowserIta of LibraryBrowser =
+  GrammarIta - [
+    UseCopula
+    ],
+  LexiconIta
+    ** open (S = SyntaxIta) in {
+
+  lin
+    i_NP = S.i_NP ;
+    you_NP = S.you_NP ;
+    he_NP = S.he_NP ;
+    she_NP = S.she_NP ;
+    we_NP = S.we_NP ;
+    youPl_NP = S.youPl_NP ;
+    youPol_NP = S.youPol_NP ;
+    they_NP = S.they_NP ;
+
+    a_Det = S.mkDet S.a_Quant ;
+    the_Det = S.mkDet S.the_Quant ;
+    aPl_Det = S.mkDet S.a_Quant S.plNum ;
+    thePl_Det = S.mkDet S.the_Quant S.plNum ;
+}

src/italian/MakeStructuralIta.gf

@@ -26,4 +26,57 @@ oper
       } ;
     } ;
 
+  mkQuant = overload {
+    -- Does not inflect for number or gender
+    mkQuant : Str -> Quant = \s ->
+      let
+        questo : Number => Gender => Case => Str = \\n,g,c => prepCase c ++ s ;
+      in lin Quant {
+        s = \\b => questo ;
+        sp = questo ;
+        s2 = [] ;
+        isNeg = False
+      } ;
+    -- Inflects for number and gender
+    mkQuant : Str -> Str -> Str -> Str -> Quant = \tutto,tutta,tutti,tutte ->
+      let
+        questo : Number => Gender => Case => Str = table {
+          Sg => table {
+            Masc => \\c => prepCase c ++ tutto ;
+            Fem  => \\c => prepCase c ++ tutta
+          } ;
+          Pl => table {
+            Masc => \\c => prepCase c ++ tutti ;
+            Fem  => \\c => prepCase c ++ tutte
+          }
+        }
+      in lin Quant {
+        s = \\b => questo ;
+        sp = questo ;
+        s2 = [] ;
+        isNeg = False
+      } ;
+  } ;
+
+  mkDet = overload {
+    -- Does not inflect for number
+    mkDet : Str -> Number -> Det = \piu,n -> lin Det {
+      s,sp = \\_,_ => piu ;
+      n = n ;
+      s2 = [] ;
+      isNeg = False
+    } ;
+    -- Inflects for number
+    mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
+      s,sp = table {
+        Masc => \\_ => alcuni ;
+        Fem  => \\_ => alcune
+      } ;
+      n = n ;
+      s2 = [] ;
+      isNeg = False
+    } ;
+  } ;
+
+
 }