∀ {α : Type u_1} {β : Type u_2} {σ : Type u_3} [inst : Primcodable α] [inst_1 : Primcodable β] [inst_2 : Primcodable σ]
  {f : α →. β} {g : α → β →. σ}, Partrec f → Partrec₂ g → Partrec fun a => (f a).bind (g a)