Metamath Proof Explorer


Theorem fimaxg

Description: A finite set has a maximum under a total order. (Contributed by Jeff Madsen, 2-Sep-2009) (Proof shortened by Mario Carneiro, 29-Jan-2014)

Ref Expression
Assertion fimaxg ⊢ R Or A ∧ A ∈ Fin ∧ A ≠ ∅ → ∃ x ∈ A ∀ y ∈ A x ≠ y → y R x

Proof

Step Hyp Ref Expression
1 fimax2g ⊢ R Or A ∧ A ∈ Fin ∧ A ≠ ∅ → ∃ x ∈ A ∀ y ∈ A ¬ x R y
2 df-ne ⊢ x ≠ y ↔ ¬ x = y
3 2 imbi1i ⊢ x ≠ y → y R x ↔ ¬ x = y → y R x
4 pm4.64 ⊢ ¬ x = y → y R x ↔ x = y ∨ y R x
5 3 4 bitri ⊢ x ≠ y → y R x ↔ x = y ∨ y R x
6 sotric ⊢ R Or A ∧ x ∈ A ∧ y ∈ A → x R y ↔ ¬ x = y ∨ y R x
7 6 con2bid ⊢ R Or A ∧ x ∈ A ∧ y ∈ A → x = y ∨ y R x ↔ ¬ x R y
8 5 7 bitrid ⊢ R Or A ∧ x ∈ A ∧ y ∈ A → x ≠ y → y R x ↔ ¬ x R y
9 8 anassrs ⊢ R Or A ∧ x ∈ A ∧ y ∈ A → x ≠ y → y R x ↔ ¬ x R y
10 9 ralbidva ⊢ R Or A ∧ x ∈ A → ∀ y ∈ A x ≠ y → y R x ↔ ∀ y ∈ A ¬ x R y
11 10 rexbidva ⊢ R Or A → ∃ x ∈ A ∀ y ∈ A x ≠ y → y R x ↔ ∃ x ∈ A ∀ y ∈ A ¬ x R y
12 11 3ad2ant1 ⊢ R Or A ∧ A ∈ Fin ∧ A ≠ ∅ → ∃ x ∈ A ∀ y ∈ A x ≠ y → y R x ↔ ∃ x ∈ A ∀ y ∈ A ¬ x R y
13 1 12 mpbird ⊢ R Or A ∧ A ∈ Fin ∧ A ≠ ∅ → ∃ x ∈ A ∀ y ∈ A x ≠ y → y R x