∀ {m : Type u_1 → Type u_2} {α : Type u_1} {p : α → Prop} [inst : Functor m] {x : m α} (motive : SatisfiesM p x → Prop)
  (h : SatisfiesM p x), (∀ (x_1 : m { a // p a }) (h : Subtype.val <$> x_1 = x), motive ⋯) → motive h