field adv in AP is not used. Removing it simplifies the code.

2018-07-15 11:18:56 +02:00
parent ed60efd385
commit 0e126a24e0
3 changed files with 5 additions and 18 deletions
@@ -40,7 +40,7 @@ concrete CatBul of Cat = CommonX - [IAdv,AdV,SC] ** open ResBul, Prelude, Predef

 -- Adjective

-    AP = {s : AForm => Person => Str; adv : Str; isPre : Bool} ;
+    AP = {s : AForm => Person => Str; isPre : Bool} ;

 -- Adverb