MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  suc11reg Structured version   Visualization version   GIF version

Theorem suc11reg 8501
Description: The successor operation behaves like a one-to-one function (assuming the Axiom of Regularity). Exercise 35 of [Enderton] p. 208 and its converse. (Contributed by NM, 25-Oct-2003.)
Assertion
Ref Expression
suc11reg (suc 𝐴 = suc 𝐵𝐴 = 𝐵)

Proof of Theorem suc11reg
StepHypRef Expression
1 en2lp 8495 . . . . 5 ¬ (𝐴𝐵𝐵𝐴)
2 ianor 509 . . . . 5 (¬ (𝐴𝐵𝐵𝐴) ↔ (¬ 𝐴𝐵 ∨ ¬ 𝐵𝐴))
31, 2mpbi 220 . . . 4 𝐴𝐵 ∨ ¬ 𝐵𝐴)
4 sucidg 5791 . . . . . . . . . . 11 (𝐴 ∈ V → 𝐴 ∈ suc 𝐴)
5 eleq2 2688 . . . . . . . . . . 11 (suc 𝐴 = suc 𝐵 → (𝐴 ∈ suc 𝐴𝐴 ∈ suc 𝐵))
64, 5syl5ibcom 235 . . . . . . . . . 10 (𝐴 ∈ V → (suc 𝐴 = suc 𝐵𝐴 ∈ suc 𝐵))
7 elsucg 5780 . . . . . . . . . 10 (𝐴 ∈ V → (𝐴 ∈ suc 𝐵 ↔ (𝐴𝐵𝐴 = 𝐵)))
86, 7sylibd 229 . . . . . . . . 9 (𝐴 ∈ V → (suc 𝐴 = suc 𝐵 → (𝐴𝐵𝐴 = 𝐵)))
98imp 445 . . . . . . . 8 ((𝐴 ∈ V ∧ suc 𝐴 = suc 𝐵) → (𝐴𝐵𝐴 = 𝐵))
109ord 392 . . . . . . 7 ((𝐴 ∈ V ∧ suc 𝐴 = suc 𝐵) → (¬ 𝐴𝐵𝐴 = 𝐵))
1110ex 450 . . . . . 6 (𝐴 ∈ V → (suc 𝐴 = suc 𝐵 → (¬ 𝐴𝐵𝐴 = 𝐵)))
1211com23 86 . . . . 5 (𝐴 ∈ V → (¬ 𝐴𝐵 → (suc 𝐴 = suc 𝐵𝐴 = 𝐵)))
13 sucidg 5791 . . . . . . . . . . . 12 (𝐵 ∈ V → 𝐵 ∈ suc 𝐵)
14 eleq2 2688 . . . . . . . . . . . 12 (suc 𝐴 = suc 𝐵 → (𝐵 ∈ suc 𝐴𝐵 ∈ suc 𝐵))
1513, 14syl5ibrcom 237 . . . . . . . . . . 11 (𝐵 ∈ V → (suc 𝐴 = suc 𝐵𝐵 ∈ suc 𝐴))
16 elsucg 5780 . . . . . . . . . . 11 (𝐵 ∈ V → (𝐵 ∈ suc 𝐴 ↔ (𝐵𝐴𝐵 = 𝐴)))
1715, 16sylibd 229 . . . . . . . . . 10 (𝐵 ∈ V → (suc 𝐴 = suc 𝐵 → (𝐵𝐴𝐵 = 𝐴)))
1817imp 445 . . . . . . . . 9 ((𝐵 ∈ V ∧ suc 𝐴 = suc 𝐵) → (𝐵𝐴𝐵 = 𝐴))
1918ord 392 . . . . . . . 8 ((𝐵 ∈ V ∧ suc 𝐴 = suc 𝐵) → (¬ 𝐵𝐴𝐵 = 𝐴))
20 eqcom 2627 . . . . . . . 8 (𝐵 = 𝐴𝐴 = 𝐵)
2119, 20syl6ib 241 . . . . . . 7 ((𝐵 ∈ V ∧ suc 𝐴 = suc 𝐵) → (¬ 𝐵𝐴𝐴 = 𝐵))
2221ex 450 . . . . . 6 (𝐵 ∈ V → (suc 𝐴 = suc 𝐵 → (¬ 𝐵𝐴𝐴 = 𝐵)))
2322com23 86 . . . . 5 (𝐵 ∈ V → (¬ 𝐵𝐴 → (suc 𝐴 = suc 𝐵𝐴 = 𝐵)))
2412, 23jaao 531 . . . 4 ((𝐴 ∈ V ∧ 𝐵 ∈ V) → ((¬ 𝐴𝐵 ∨ ¬ 𝐵𝐴) → (suc 𝐴 = suc 𝐵𝐴 = 𝐵)))
253, 24mpi 20 . . 3 ((𝐴 ∈ V ∧ 𝐵 ∈ V) → (suc 𝐴 = suc 𝐵𝐴 = 𝐵))
26 sucexb 6994 . . . . 5 (𝐴 ∈ V ↔ suc 𝐴 ∈ V)
27 sucexb 6994 . . . . . 6 (𝐵 ∈ V ↔ suc 𝐵 ∈ V)
2827notbii 310 . . . . 5 𝐵 ∈ V ↔ ¬ suc 𝐵 ∈ V)
29 nelneq 2723 . . . . 5 ((suc 𝐴 ∈ V ∧ ¬ suc 𝐵 ∈ V) → ¬ suc 𝐴 = suc 𝐵)
3026, 28, 29syl2anb 496 . . . 4 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ V) → ¬ suc 𝐴 = suc 𝐵)
3130pm2.21d 118 . . 3 ((𝐴 ∈ V ∧ ¬ 𝐵 ∈ V) → (suc 𝐴 = suc 𝐵𝐴 = 𝐵))
32 eqcom 2627 . . . 4 (suc 𝐴 = suc 𝐵 ↔ suc 𝐵 = suc 𝐴)
3326notbii 310 . . . . . . 7 𝐴 ∈ V ↔ ¬ suc 𝐴 ∈ V)
34 nelneq 2723 . . . . . . 7 ((suc 𝐵 ∈ V ∧ ¬ suc 𝐴 ∈ V) → ¬ suc 𝐵 = suc 𝐴)
3527, 33, 34syl2anb 496 . . . . . 6 ((𝐵 ∈ V ∧ ¬ 𝐴 ∈ V) → ¬ suc 𝐵 = suc 𝐴)
3635ancoms 469 . . . . 5 ((¬ 𝐴 ∈ V ∧ 𝐵 ∈ V) → ¬ suc 𝐵 = suc 𝐴)
3736pm2.21d 118 . . . 4 ((¬ 𝐴 ∈ V ∧ 𝐵 ∈ V) → (suc 𝐵 = suc 𝐴𝐴 = 𝐵))
3832, 37syl5bi 232 . . 3 ((¬ 𝐴 ∈ V ∧ 𝐵 ∈ V) → (suc 𝐴 = suc 𝐵𝐴 = 𝐵))
39 sucprc 5788 . . . . 5 𝐴 ∈ V → suc 𝐴 = 𝐴)
40 sucprc 5788 . . . . 5 𝐵 ∈ V → suc 𝐵 = 𝐵)
4139, 40eqeqan12d 2636 . . . 4 ((¬ 𝐴 ∈ V ∧ ¬ 𝐵 ∈ V) → (suc 𝐴 = suc 𝐵𝐴 = 𝐵))
4241biimpd 219 . . 3 ((¬ 𝐴 ∈ V ∧ ¬ 𝐵 ∈ V) → (suc 𝐴 = suc 𝐵𝐴 = 𝐵))
4325, 31, 38, 424cases 989 . 2 (suc 𝐴 = suc 𝐵𝐴 = 𝐵)
44 suceq 5778 . 2 (𝐴 = 𝐵 → suc 𝐴 = suc 𝐵)
4543, 44impbii 199 1 (suc 𝐴 = suc 𝐵𝐴 = 𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wo 383  wa 384   = wceq 1481  wcel 1988  Vcvv 3195  suc csuc 5713
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-sep 4772  ax-nul 4780  ax-pr 4897  ax-un 6934  ax-reg 8482
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1484  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ne 2792  df-ral 2914  df-rex 2915  df-rab 2918  df-v 3197  df-sbc 3430  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-nul 3908  df-if 4078  df-sn 4169  df-pr 4171  df-op 4175  df-uni 4428  df-br 4645  df-opab 4704  df-eprel 5019  df-fr 5063  df-suc 5717
This theorem is referenced by:  rankxpsuc  8730  bnj551  30786  1oequni2o  33187  clsk1indlem1  38163
  Copyright terms: Public domain W3C validator