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

Theorem inf3lem6 9634
Description: Lemma for our Axiom of Infinity => standard Axiom of Infinity. See inf3 9636 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 3455 . . . . . . . . . . 11 𝑢 ∈ V
4 vex 3455 . . . . . . . . . . 11 𝑣 ∈ V
51, 2, 3, 4inf3lem5 9633 . . . . . . . . . 10 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑢 ∈ ω ∧ 𝑣 ∈ 𝑢) → (𝐹‘𝑣) ⊊ (𝐹‘𝑢)))
6 dfpss2 4036 . . . . . . . . . . 11 ((𝐹‘𝑣) ⊊ (𝐹‘𝑢) ↔ ((𝐹‘𝑣) ⊆ (𝐹‘𝑢) ∧ ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
76simprbi 503 . . . . . . . . . 10 ((𝐹‘𝑣) ⊊ (𝐹‘𝑢) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢))
85, 7syl6 36 . . . . . . . . 9 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑢 ∈ ω ∧ 𝑣 ∈ 𝑢) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
98expdimp 458 . . . . . . . 8 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ 𝑢 ∈ ω) → (𝑣 ∈ 𝑢 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
109adantrl 729 . . . . . . 7 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → (𝑣 ∈ 𝑢 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
111, 2, 4, 3inf3lem5 9633 . . . . . . . . . 10 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑣 ∈ ω ∧ 𝑢 ∈ 𝑣) → (𝐹‘𝑢) ⊊ (𝐹‘𝑣)))
12 dfpss2 4036 . . . . . . . . . . . 12 ((𝐹‘𝑢) ⊊ (𝐹‘𝑣) ↔ ((𝐹‘𝑢) ⊆ (𝐹‘𝑣) ∧ ¬ (𝐹‘𝑢) = (𝐹‘𝑣)))
1312simprbi 503 . . . . . . . . . . 11 ((𝐹‘𝑢) ⊊ (𝐹‘𝑣) → ¬ (𝐹‘𝑢) = (𝐹‘𝑣))
14 eqcom 2768 . . . . . . . . . . 11 ((𝐹‘𝑢) = (𝐹‘𝑣) ↔ (𝐹‘𝑣) = (𝐹‘𝑢))
1513, 14sylnib 331 . . . . . . . . . 10 ((𝐹‘𝑢) ⊊ (𝐹‘𝑣) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢))
1611, 15syl6 36 . . . . . . . . 9 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ((𝑣 ∈ ω ∧ 𝑢 ∈ 𝑣) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
1716expdimp 458 . . . . . . . 8 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ 𝑣 ∈ ω) → (𝑢 ∈ 𝑣 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
1817adantrr 730 . . . . . . 7 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → (𝑢 ∈ 𝑣 → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
1910, 18jaod 873 . . . . . 6 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → ((𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣) → ¬ (𝐹‘𝑣) = (𝐹‘𝑢)))
2019con2d 135 . . . . 5 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → ((𝐹‘𝑣) = (𝐹‘𝑢) → ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
21 nnord 7885 . . . . . . 7 (𝑣 ∈ ω → Ord 𝑣)
22 nnord 7885 . . . . . . 7 (𝑢 ∈ ω → Ord 𝑢)
23 ordtri3 6399 . . . . . . 7 ((Ord 𝑣 ∧ Ord 𝑢) → (𝑣 = 𝑢 ↔ ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
2421, 22, 23syl2an 608 . . . . . 6 ((𝑣 ∈ ω ∧ 𝑢 ∈ ω) → (𝑣 = 𝑢 ↔ ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
2524adantl 487 . . . . 5 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → (𝑣 = 𝑢 ↔ ¬ (𝑣 ∈ 𝑢 ∨ 𝑢 ∈ 𝑣)))
2620, 25sylibrd 262 . . . 4 (((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) ∧ (𝑣 ∈ ω ∧ 𝑢 ∈ ω)) → ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢))
2726ralrimivva 3206 . . 3 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → ∀𝑣 ∈ ω ∀𝑢 ∈ ω ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢))
28 frfnom 8443 . . . . . 6 (rec(𝐺, ∅) ↾ ω) Fn ω
29 fneq1 6630 . . . . . 6 (𝐹 = (rec(𝐺, ∅) ↾ ω) → (𝐹 Fn ω ↔ (rec(𝐺, ∅) ↾ ω) Fn ω))
3028, 29mpbiri 261 . . . . 5 (𝐹 = (rec(𝐺, ∅) ↾ ω) → 𝐹 Fn ω)
31 fvelrnb 6945 . . . . . . . 8 (𝐹 Fn ω → (𝑢 ∈ ran 𝐹 ↔ ∃𝑣 ∈ ω (𝐹‘𝑣) = 𝑢))
32 inf3lem.4 . . . . . . . . . . . 12 𝐵 ∈ V
331, 2, 4, 32inf3lemd 9628 . . . . . . . . . . 11 (𝑣 ∈ ω → (𝐹‘𝑣) ⊆ 𝑥)
34 fvex 6898 . . . . . . . . . . . 12 (𝐹‘𝑣) ∈ V
3534elpw 4561 . . . . . . . . . . 11 ((𝐹‘𝑣) ∈ 𝒫 𝑥 ↔ (𝐹‘𝑣) ⊆ 𝑥)
3633, 35sylibr 237 . . . . . . . . . 10 (𝑣 ∈ ω → (𝐹‘𝑣) ∈ 𝒫 𝑥)
37 eleq1 2849 . . . . . . . . . 10 ((𝐹‘𝑣) = 𝑢 → ((𝐹‘𝑣) ∈ 𝒫 𝑥 ↔ 𝑢 ∈ 𝒫 𝑥))
3836, 37syl5ibcom 248 . . . . . . . . 9 (𝑣 ∈ ω → ((𝐹‘𝑣) = 𝑢 → 𝑢 ∈ 𝒫 𝑥))
3938rexlimiv 3157 . . . . . . . 8 (∃𝑣 ∈ ω (𝐹‘𝑣) = 𝑢 → 𝑢 ∈ 𝒫 𝑥)
4031, 39biimtrdi 256 . . . . . . 7 (𝐹 Fn ω → (𝑢 ∈ ran 𝐹 → 𝑢 ∈ 𝒫 𝑥))
4140ssrdv 3937 . . . . . 6 (𝐹 Fn ω → ran 𝐹 ⊆ 𝒫 𝑥)
4241ancli 558 . . . . 5 (𝐹 Fn ω → (𝐹 Fn ω ∧ ran 𝐹 ⊆ 𝒫 𝑥))
432, 30, 42mp2b 10 . . . 4 (𝐹 Fn ω ∧ ran 𝐹 ⊆ 𝒫 𝑥)
44 df-f 6542 . . . 4 (𝐹:ω⟶𝒫 𝑥 ↔ (𝐹 Fn ω ∧ ran 𝐹 ⊆ 𝒫 𝑥))
4543, 44mpbir 234 . . 3 𝐹:ω⟶𝒫 𝑥
4627, 45jctil 529 . 2 ((𝑥 ≠ ∅ ∧ 𝑥 ⊆ ∪ 𝑥) → (𝐹:ω⟶𝒫 𝑥 ∧ ∀𝑣 ∈ ω ∀𝑢 ∈ ω ((𝐹‘𝑣) = (𝐹‘𝑢) → 𝑣 = 𝑢)))
47 dff13 7258 . 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 1570   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  {crab 3413  Vcvv 3451   ∩ cin 3898   ⊆ wss 3899   ⊊ wpss 3900  ∅c0 4279  𝒫 cpw 4557  ∪ cuni 4867   ↦ cmpt 5186  ran crn 5652   ↾ cres 5653  Ord word 6361   Fn wfn 6533  ⟶wf 6534  –1-1→wf1 6535  ‘cfv 6538  ωcom 7877  reccrdg 8417
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-nul 5260  ax-pr 5391  ax-un 7751  ax-reg 9586
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  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 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-ov 7423  df-om 7878  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418
This theorem is used by:  inf3lem7  9635  dominf  10523  dominfac  10658
  Copyright terms: Public domain W3C validator