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

Theorem inf3lem6 9641
Description: Lemma for our Axiom of Infinity => standard Axiom of Infinity. See inf3 9643 for detailed description. (Contributed by NM, 29-Oct-1996.)
Hypotheses
Ref Expression
inf3lem.1 𝐺 = (𝑦 ∈ V ↦ {𝑤 ∈ 𝑥 ∣ (𝑤 ∩ 𝑥) ⊆ 𝑦})
inf3lem.2 𝐹 = (rec(𝐺, ∅) ↾ ω)
inf3lem.3 𝐴 ∈ V
inf3lem.4 𝐵 ∈ V
Assertion
Ref Expression
inf3lem6 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → 𝐹:ω–1-1→𝒫 𝑥)
Distinct variable group:   𝑥,𝑦,𝑤
Allowed substitution hints:   𝐴(𝑥, 𝑦, 𝑤)   𝐵(𝑥, 𝑦, 𝑤)   𝐹(𝑥, 𝑦, 𝑤)   𝐺(𝑥, 𝑦, 𝑤)

Proof of Theorem inf3lem6
Dummy variables 𝑣 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 inf3lem.1 . . . . . . . . . . 11 𝐺 = (𝑦 ∈ V ↦ {𝑤 ∈ 𝑥 ∣ (𝑤 ∩ 𝑥) ⊆ 𝑦})
2 inf3lem.2 . . . . . . . . . . 11 𝐹 = (rec(𝐺, ∅) ↾ ω)
3 vex 3454 . . . . . . . . . . 11 𝑢 ∈ V
4 vex 3454 . . . . . . . . . . 11 𝑣 ∈ V
51, 2, 3, 4inf3lem5 9640 . . . . . . . . . 10 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑢 ∈ ω ∧ 𝑣 ∈ 𝑢) → (𝐹‘𝑣) ⊊ (𝐹‘𝑢)))
6 dfpss2 4014 . . . . . . . . . . 11 ((𝐹‘𝑣) ⊊ (𝐹‘𝑢) ↔ ((𝐹‘𝑣) ⊆ (𝐹‘𝑢) ∧ ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
76simprbi 503 . . . . . . . . . 10 ((𝐹‘𝑣) ⊊ (𝐹‘𝑢) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢))
85, 7syl6 36 . . . . . . . . 9 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑢 ∈ ω ∧ 𝑣 ∈ 𝑢) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
98expdimp 458 . . . . . . . 8 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ 𝑢 ∈ ω) → (𝑣 ∈ 𝑢 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
109adantrl 729 . . . . . . 7 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → (𝑣 ∈ 𝑢 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
111, 2, 4, 3inf3lem5 9640 . . . . . . . . . 10 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑣 ∈ ω ∧ 𝑢 ∈ 𝑣) → (𝐹‘𝑢) ⊊ (𝐹‘𝑣)))
12 dfpss2 4014 . . . . . . . . . . . 12 ((𝐹‘𝑢) ⊊ (𝐹‘𝑣) ↔ ((𝐹‘𝑢) ⊆ (𝐹‘𝑣) ∧ ¬ (𝐹‘𝑢) = (𝐹‘𝑣)))
1312simprbi 503 . . . . . . . . . . 11 ((𝐹‘𝑢) ⊊ (𝐹‘𝑣) → ¬ (𝐹‘𝑢) = (𝐹‘𝑣))
14 eqcom 2767 . . . . . . . . . . 11 ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑣) = (𝐹‘𝑢))
1513, 14sylnib 331 . . . . . . . . . 10 ((𝐹‘𝑢) ⊊ (𝐹‘𝑣) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢))
1611, 15syl6 36 . . . . . . . . 9 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑣 ∈ ω ∧ 𝑢 ∈ 𝑣) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
1716expdimp 458 . . . . . . . 8 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ 𝑣 ∈ ω) → (𝑢 ∈ 𝑣 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
1817adantrr 730 . . . . . . 7 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → (𝑢 ∈ 𝑣 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
1910, 18jaod 873 . . . . . 6 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → ((𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
2019con2d 135 . . . . 5 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → ((𝐹‘𝑣) = (𝐹‘𝑢) → ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
21 nnord 7889 . . . . . . 7 (𝑣 ∈ ω → Ord 𝑣)
22 nnord 7889 . . . . . . 7 (𝑢 ∈ ω → Ord 𝑢)
23 ordtri3 6402 . . . . . . 7 ((Ord 𝑣 ∧ Ord 𝑢) → (𝑣 = 𝑢 ↔ ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
2421, 22, 23syl2an 608 . . . . . 6 ((𝑣 ∈ ω ∧ 𝑢 ∈ ω) → (𝑣 = 𝑢 ↔ ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
2524adantl 487 . . . . 5 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → (𝑣 = 𝑢 ↔ ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
2620, 25sylibrd 262 . . . 4 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢))
2726ralrimivva 3205 . . 3 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ∀𝑣 ∈ ω ∀𝑢 ∈ ω ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢))
28 frfnom 8451 . . . . . 6 (rec(𝐺, ∅) ↾ ω) Fn ω
29 fneq1 6635 . . . . . 6 (𝐹 = (rec(𝐺, ∅) ↾ ω) → (𝐹 Fn ω ↔ (rec(𝐺, ∅) ↾ ω) Fn ω))
3028, 29mpbiri 261 . . . . 5 (𝐹 = (rec(𝐺, ∅) ↾ ω) → 𝐹 Fn ω)
31 fvelrnb 6950 . . . . . . . 8 (𝐹 Fn ω → (𝑢 ∈ ran 𝐹 ↔ ∃𝑣 ∈ ω (𝐹‘𝑣) = 𝑢))
32 inf3lem.4 . . . . . . . . . . . 12 𝐵 ∈ V
331, 2, 4, 32inf3lemd 9635 . . . . . . . . . . 11 (𝑣 ∈ ω → (𝐹‘𝑣) ⊆ 𝑥)
34 fvex 6903 . . . . . . . . . . . 12 (𝐹‘𝑣) ∈ V
3534elpw 4560 . . . . . . . . . . 11 ((𝐹‘𝑣) ∈ 𝒫 𝑥 ↔ (𝐹‘𝑣) ⊆ 𝑥)
3633, 35sylibr 237 . . . . . . . . . 10 (𝑣 ∈ ω → (𝐹‘𝑣) ∈ 𝒫 𝑥)
37 eleq1 2848 . . . . . . . . . 10 ((𝐹‘𝑣) = 𝑢 → ((𝐹‘𝑣) ∈ 𝒫 𝑥 ↔ 𝑢 ∈ 𝒫 𝑥))
3836, 37syl5ibcom 248 . . . . . . . . 9 (𝑣 ∈ ω → ((𝐹‘𝑣) = 𝑢 → 𝑢 ∈ 𝒫 𝑥))
3938rexlimiv 3156 . . . . . . . 8 (∃𝑣 ∈ ω (𝐹‘𝑣) = 𝑢 → 𝑢 ∈ 𝒫 𝑥)
4031, 39biimtrdi 256 . . . . . . 7 (𝐹 Fn ω → (𝑢 ∈ ran 𝐹 → 𝑢 ∈ 𝒫 𝑥))
4140ssrdv 3915 . . . . . 6 (𝐹 Fn ω → ran 𝐹 ⊆ 𝒫 𝑥)
4241ancli 558 . . . . 5 (𝐹 Fn ω → (𝐹 Fn ω ∧ ran 𝐹 ⊆ 𝒫 𝑥))
432, 30, 42mp2b 10 . . . 4 (𝐹 Fn ω ∧ ran 𝐹 ⊆ 𝒫 𝑥)
44 df-f 6547 . . . 4 (𝐹:ω⟶𝒫 𝑥 ↔ (𝐹 Fn ω ∧ ran 𝐹 ⊆ 𝒫 𝑥))
4543, 44mpbir 234 . . 3 𝐹:ω⟶𝒫 𝑥
4627, 45jctil 529 . 2 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → (𝐹:ω⟶𝒫 𝑥 ∧ ∀𝑣 ∈ ω ∀𝑢 ∈ ω ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢)))
47 dff13 7262 . 2 (𝐹:ω–1-1→𝒫 𝑥 ↔ (𝐹:ω⟶𝒫 𝑥 ∧ ∀𝑣 ∈ ω ∀𝑢 ∈ ω ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢)))
4846, 47sylibr 237 1 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → 𝐹:ω–1-1→𝒫 𝑥)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1569   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412  Vcvv 3450   ⊆ wss 3896   ⊊ wpss 4012   ∩ cin 4088  ∅c0 4277  𝒫 cpw 4556  ∪ cuni 4866   ↦ cmpt 5185  ran crn 5652   ↾ cres 5653  Ord word 6364   Fn wfn 6538  ⟶wf 6539  –1-1→wf1 6540  ‘cfv 6543  ωcom 7881  reccrdg 8425
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pr 5391  ax-un 7755  ax-reg 9593
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-ov 7427  df-om 7882  df-2nd 8006  df-frecs 8307  df-wrecs 8338  df-recs 8387  df-rdg 8426
This theorem is used by:  inf3lem7  9642  dominf  10530  dominfac  10665
  Copyright terms: Public domain W3C validator