=Implemented AjOrd in Adjective which resulted in changing the type of AP and leading to use of default Agrement AgP3 Sg KI_BI. Othrwise context is required

src/rukiga/AdjectiveCgg.gf

@@ -7,6 +7,10 @@ lin
 
 PositA a = a;
 
+    -- The superlative use is covered in $Ord$.
+
+        --AdjOrd  : Ord -> AP ;       -- warmest
+        AdjOrd ord = {s= ord.s; position1= ord.position1};
 {-
 abstract Adjective = Cat ** {