concrete CatKis of Cat = CommonX - [Pol] ** CatBantu with (ResBantu = ResKis);