concrete QuestionGus of Question = CatGus ** QuestionBantu with
 (ResBantu = ResGus);