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

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

Proof of Theorem inf3lem2
Dummy variables 𝑣 𝑢 𝑓 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6774 . . . . 5 (𝑣 = ∅ → (𝐹𝑣) = (𝐹‘∅))
21neeq1d 3003 . . . 4 (𝑣 = ∅ → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹‘∅) ≠ 𝑥))
32imbi2d 341 . . 3 (𝑣 = ∅ → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘∅) ≠ 𝑥)))
4 fveq2 6774 . . . . 5 (𝑣 = 𝑢 → (𝐹𝑣) = (𝐹𝑢))
54neeq1d 3003 . . . 4 (𝑣 = 𝑢 → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹𝑢) ≠ 𝑥))
65imbi2d 341 . . 3 (𝑣 = 𝑢 → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑢) ≠ 𝑥)))
7 fveq2 6774 . . . . 5 (𝑣 = suc 𝑢 → (𝐹𝑣) = (𝐹‘suc 𝑢))
87neeq1d 3003 . . . 4 (𝑣 = suc 𝑢 → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹‘suc 𝑢) ≠ 𝑥))
98imbi2d 341 . . 3 (𝑣 = suc 𝑢 → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥)))
10 fveq2 6774 . . . . 5 (𝑣 = 𝐴 → (𝐹𝑣) = (𝐹𝐴))
1110neeq1d 3003 . . . 4 (𝑣 = 𝐴 → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹𝐴) ≠ 𝑥))
1211imbi2d 341 . . 3 (𝑣 = 𝐴 → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝐴) ≠ 𝑥)))
13 inf3lem.1 . . . . . . . 8 𝐺 = (𝑦 ∈ V ↦ {𝑤𝑥 ∣ (𝑤𝑥) ⊆ 𝑦})
14 inf3lem.2 . . . . . . . 8 𝐹 = (rec(𝐺, ∅) ↾ ω)
15 inf3lem.3 . . . . . . . 8 𝐴 ∈ V
16 inf3lem.4 . . . . . . . 8 𝐵 ∈ V
1713, 14, 15, 16inf3lemb 9383 . . . . . . 7 (𝐹‘∅) = ∅
1817eqeq1i 2743 . . . . . 6 ((𝐹‘∅) = 𝑥 ↔ ∅ = 𝑥)
19 eqcom 2745 . . . . . 6 (∅ = 𝑥𝑥 = ∅)
2018, 19sylbb 218 . . . . 5 ((𝐹‘∅) = 𝑥𝑥 = ∅)
2120necon3i 2976 . . . 4 (𝑥 ≠ ∅ → (𝐹‘∅) ≠ 𝑥)
2221adantr 481 . . 3 ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘∅) ≠ 𝑥)
23 vex 3436 . . . . . . . . 9 𝑢 ∈ V
2413, 14, 23, 16inf3lemd 9385 . . . . . . . 8 (𝑢 ∈ ω → (𝐹𝑢) ⊆ 𝑥)
25 df-pss 3906 . . . . . . . . . 10 ((𝐹𝑢) ⊊ 𝑥 ↔ ((𝐹𝑢) ⊆ 𝑥 ∧ (𝐹𝑢) ≠ 𝑥))
26 pssnel 4404 . . . . . . . . . 10 ((𝐹𝑢) ⊊ 𝑥 → ∃𝑣(𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)))
2725, 26sylbir 234 . . . . . . . . 9 (((𝐹𝑢) ⊆ 𝑥 ∧ (𝐹𝑢) ≠ 𝑥) → ∃𝑣(𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)))
28 ssel 3914 . . . . . . . . . . . . . . 15 (𝑥 𝑥 → (𝑣𝑥𝑣 𝑥))
29 eluni 4842 . . . . . . . . . . . . . . 15 (𝑣 𝑥 ↔ ∃𝑓(𝑣𝑓𝑓𝑥))
3028, 29syl6ib 250 . . . . . . . . . . . . . 14 (𝑥 𝑥 → (𝑣𝑥 → ∃𝑓(𝑣𝑓𝑓𝑥)))
31 eleq2 2827 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹‘suc 𝑢) = 𝑥 → (𝑓 ∈ (𝐹‘suc 𝑢) ↔ 𝑓𝑥))
3231biimparc 480 . . . . . . . . . . . . . . . . . . . 20 ((𝑓𝑥 ∧ (𝐹‘suc 𝑢) = 𝑥) → 𝑓 ∈ (𝐹‘suc 𝑢))
3313, 14, 23, 16inf3lemc 9384 . . . . . . . . . . . . . . . . . . . . . 22 (𝑢 ∈ ω → (𝐹‘suc 𝑢) = (𝐺‘(𝐹𝑢)))
3433eleq2d 2824 . . . . . . . . . . . . . . . . . . . . 21 (𝑢 ∈ ω → (𝑓 ∈ (𝐹‘suc 𝑢) ↔ 𝑓 ∈ (𝐺‘(𝐹𝑢))))
35 elin 3903 . . . . . . . . . . . . . . . . . . . . . 22 (𝑣 ∈ (𝑓𝑥) ↔ (𝑣𝑓𝑣𝑥))
36 vex 3436 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑓 ∈ V
37 fvex 6787 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐹𝑢) ∈ V
3813, 14, 36, 37inf3lema 9382 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 ∈ (𝐺‘(𝐹𝑢)) ↔ (𝑓𝑥 ∧ (𝑓𝑥) ⊆ (𝐹𝑢)))
3938simprbi 497 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 ∈ (𝐺‘(𝐹𝑢)) → (𝑓𝑥) ⊆ (𝐹𝑢))
4039sseld 3920 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 ∈ (𝐺‘(𝐹𝑢)) → (𝑣 ∈ (𝑓𝑥) → 𝑣 ∈ (𝐹𝑢)))
4135, 40syl5bir 242 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 ∈ (𝐺‘(𝐹𝑢)) → ((𝑣𝑓𝑣𝑥) → 𝑣 ∈ (𝐹𝑢)))
4234, 41syl6bi 252 . . . . . . . . . . . . . . . . . . . 20 (𝑢 ∈ ω → (𝑓 ∈ (𝐹‘suc 𝑢) → ((𝑣𝑓𝑣𝑥) → 𝑣 ∈ (𝐹𝑢))))
4332, 42syl5 34 . . . . . . . . . . . . . . . . . . 19 (𝑢 ∈ ω → ((𝑓𝑥 ∧ (𝐹‘suc 𝑢) = 𝑥) → ((𝑣𝑓𝑣𝑥) → 𝑣 ∈ (𝐹𝑢))))
4443com23 86 . . . . . . . . . . . . . . . . . 18 (𝑢 ∈ ω → ((𝑣𝑓𝑣𝑥) → ((𝑓𝑥 ∧ (𝐹‘suc 𝑢) = 𝑥) → 𝑣 ∈ (𝐹𝑢))))
4544exp5c 445 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ ω → (𝑣𝑓 → (𝑣𝑥 → (𝑓𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢))))))
4645com34 91 . . . . . . . . . . . . . . . 16 (𝑢 ∈ ω → (𝑣𝑓 → (𝑓𝑥 → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢))))))
4746impd 411 . . . . . . . . . . . . . . 15 (𝑢 ∈ ω → ((𝑣𝑓𝑓𝑥) → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))))
4847exlimdv 1936 . . . . . . . . . . . . . 14 (𝑢 ∈ ω → (∃𝑓(𝑣𝑓𝑓𝑥) → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))))
4930, 48sylan9r 509 . . . . . . . . . . . . 13 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (𝑣𝑥 → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))))
5049pm2.43d 53 . . . . . . . . . . . 12 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢))))
51 id 22 . . . . . . . . . . . . 13 (((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)) → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))
5251necon3bd 2957 . . . . . . . . . . . 12 (((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)) → (¬ 𝑣 ∈ (𝐹𝑢) → (𝐹‘suc 𝑢) ≠ 𝑥))
5350, 52syl6 35 . . . . . . . . . . 11 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (𝑣𝑥 → (¬ 𝑣 ∈ (𝐹𝑢) → (𝐹‘suc 𝑢) ≠ 𝑥)))
5453impd 411 . . . . . . . . . 10 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → ((𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)) → (𝐹‘suc 𝑢) ≠ 𝑥))
5554exlimdv 1936 . . . . . . . . 9 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (∃𝑣(𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)) → (𝐹‘suc 𝑢) ≠ 𝑥))
5627, 55syl5 34 . . . . . . . 8 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (((𝐹𝑢) ⊆ 𝑥 ∧ (𝐹𝑢) ≠ 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥))
5724, 56sylani 604 . . . . . . 7 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → ((𝑢 ∈ ω ∧ (𝐹𝑢) ≠ 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥))
5857exp4b 431 . . . . . 6 (𝑢 ∈ ω → (𝑥 𝑥 → (𝑢 ∈ ω → ((𝐹𝑢) ≠ 𝑥 → (𝐹‘suc 𝑢) ≠ 𝑥))))
5958pm2.43a 54 . . . . 5 (𝑢 ∈ ω → (𝑥 𝑥 → ((𝐹𝑢) ≠ 𝑥 → (𝐹‘suc 𝑢) ≠ 𝑥)))
6059adantld 491 . . . 4 (𝑢 ∈ ω → ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → ((𝐹𝑢) ≠ 𝑥 → (𝐹‘suc 𝑢) ≠ 𝑥)))
6160a2d 29 . . 3 (𝑢 ∈ ω → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑢) ≠ 𝑥) → ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥)))
623, 6, 9, 12, 22, 61finds 7745 . 2 (𝐴 ∈ ω → ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝐴) ≠ 𝑥))
6362com12 32 1 ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐴 ∈ ω → (𝐹𝐴) ≠ 𝑥))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396   = wceq 1539  wex 1782  wcel 2106  wne 2943  {crab 3068  Vcvv 3432  cin 3886  wss 3887  wpss 3888  c0 4256   cuni 4839  cmpt 5157  cres 5591  suc csuc 6268  cfv 6433  ωcom 7712  reccrdg 8240
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pr 5352  ax-un 7588
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-ov 7278  df-om 7713  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241
This theorem is referenced by:  inf3lem3  9388
  Copyright terms: Public domain W3C validator