fact: Definition bindK (A B : UU0) (m : MK M A) f : MK M B := fun (C : UU0) (k : B -> M C) => m C (fun a : A => (f a) C k).
imports: mathcomp(all_ssreflect) HB(structures) imonae_lib ihierarchy imonad_lib imonad_transformer