Metamath Proof Explorer


Theorem wsucex

Description: Existence theorem for well-founded successor. (Contributed by Scott Fenton, 16-Jun-2018) (Proof shortened by AV, 10-Oct-2021)

Ref Expression
Hypothesis wsucex.1 ⊢ φ → R Or A
Assertion wsucex ⊢ φ → wsuc R A X ∈ V

Proof

Step Hyp Ref Expression
1 wsucex.1 ⊢ φ → R Or A
2 df-wsuc ⊢ wsuc R A X = inf Pred R -1 A X A R
3 1 infexd ⊢ φ → inf Pred R -1 A X A R ∈ V
4 2 3 eqeltrid ⊢ φ → wsuc R A X ∈ V