All structural words and most of the linearization functions for LexiconCgg have been provided

src/rukiga/CatCgg.gf

@@ -92,7 +92,7 @@ lincat
   Digits  = {s : Res.CardOrd => Res.Agreement=>Str ; n : Res.Number ; tail : Px.DTail} ;
   Ord  = {s :Res.Agreement=>Str; position:Res.Position} ;
   Card = {s :Res.Agreement=>Str; n : Res.Number} ;
-  
+  A2 =  Res.Adjective ** { c2 : Str ; isPre : Bool} ;
   DAP = Res.Determiner ;
   N2  = Res.Noun ** {c2 : Res.Agreement =>Str};    -- relational noun                     e.g. "son"
   Prep = Res.Preposition;  -- preposition, or just case           e.g. "in"
@@ -106,6 +106,10 @@ linref
   VP =\vp -> vp.adv ++ vp.s ++ BIND ++ vp.pres ++ vp.comp ++vp.comp2 ++ vp.ap;
   VPSlash =\vpslash -> vpslash.s ++ BIND ++ vpslash.pres;
 
+lindef
+  A2 = \s -> {s = s; position = Res.Post; isProper = False;
+              isPrep = False; isNeg = False;c2 = ""; isPre = True};
+
 
 --1 Cat: the Category System