∀ {L : FirstOrder.Language} {M : Type w} [inst : L.Structure M] {α : Type u'} {n : ℕ} [Nonempty M]
  {φ ψ : L.BoundedFormula α n},
  φ.IsQF → ψ.IsPrenex → ∀ {v : α → M} {xs : Fin n → M}, (φ.toPrenexImpRight ψ).Realize v xs ↔ (φ.imp ψ).Realize v xs