moduleControl.CP.Mixin(Mixin,(<@>),mixin,mixinConst,mixinId)wheretypeMixina=a->a->ainfixl5<@>(<@>)::Mixina->Mixina->Mixina(f1<@>f2)st=f1(f2st)tmixin::Mixina->amixinf=letx=f(error"super called in top-level mixin")xinxmixinConst::a->a->a->amixinConst__c=cmixinId::MixinamixinIds_=s