concrete AdjectiveHeb of Adjective = CatHeb ** open ResHeb, Prelude in { flags coding=utf8 ; lin UseA adj = adj ; }