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

Theorem inf3lem2 9317
Description: Lemma for our Axiom of Infinity => standard Axiom of Infinity. See inf3 9323 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 6756 . . . . 5 (𝑣 = ∅ → (𝐹𝑣) = (𝐹‘∅))
21neeq1d 3002 . . . 4 (𝑣 = ∅ → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹‘∅) ≠ 𝑥))
32imbi2d 340 . . 3 (𝑣 = ∅ → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘∅) ≠ 𝑥)))
4 fveq2 6756 . . . . 5 (𝑣 = 𝑢 → (𝐹𝑣) = (𝐹𝑢))
54neeq1d 3002 . . . 4 (𝑣 = 𝑢 → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹𝑢) ≠ 𝑥))
65imbi2d 340 . . 3 (𝑣 = 𝑢 → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑢) ≠ 𝑥)))
7 fveq2 6756 . . . . 5 (𝑣 = suc 𝑢 → (𝐹𝑣) = (𝐹‘suc 𝑢))
87neeq1d 3002 . . . 4 (𝑣 = suc 𝑢 → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹‘suc 𝑢) ≠ 𝑥))
98imbi2d 340 . . 3 (𝑣 = suc 𝑢 → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑣) ≠ 𝑥) ↔ ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥)))
10 fveq2 6756 . . . . 5 (𝑣 = 𝐴 → (𝐹𝑣) = (𝐹𝐴))
1110neeq1d 3002 . . . 4 (𝑣 = 𝐴 → ((𝐹𝑣) ≠ 𝑥 ↔ (𝐹𝐴) ≠ 𝑥))
1211imbi2d 340 . . 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 9313 . . . . . . 7 (𝐹‘∅) = ∅
1817eqeq1i 2743 . . . . . 6 ((𝐹‘∅) = 𝑥 ↔ ∅ = 𝑥)
19 eqcom 2745 . . . . . 6 (∅ = 𝑥𝑥 = ∅)
2018, 19sylbb 218 . . . . 5 ((𝐹‘∅) = 𝑥𝑥 = ∅)
2120necon3i 2975 . . . 4 (𝑥 ≠ ∅ → (𝐹‘∅) ≠ 𝑥)
2221adantr 480 . . 3 ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘∅) ≠ 𝑥)
23 vex 3426 . . . . . . . . 9 𝑢 ∈ V
2413, 14, 23, 16inf3lemd 9315 . . . . . . . 8 (𝑢 ∈ ω → (𝐹𝑢) ⊆ 𝑥)
25 df-pss 3902 . . . . . . . . . 10 ((𝐹𝑢) ⊊ 𝑥 ↔ ((𝐹𝑢) ⊆ 𝑥 ∧ (𝐹𝑢) ≠ 𝑥))
26 pssnel 4401 . . . . . . . . . 10 ((𝐹𝑢) ⊊ 𝑥 → ∃𝑣(𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)))
2725, 26sylbir 234 . . . . . . . . 9 (((𝐹𝑢) ⊆ 𝑥 ∧ (𝐹𝑢) ≠ 𝑥) → ∃𝑣(𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)))
28 ssel 3910 . . . . . . . . . . . . . . 15 (𝑥 𝑥 → (𝑣𝑥𝑣 𝑥))
29 eluni 4839 . . . . . . . . . . . . . . 15 (𝑣 𝑥 ↔ ∃𝑓(𝑣𝑓𝑓𝑥))
3028, 29syl6ib 250 . . . . . . . . . . . . . 14 (𝑥 𝑥 → (𝑣𝑥 → ∃𝑓(𝑣𝑓𝑓𝑥)))
31 eleq2 2827 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹‘suc 𝑢) = 𝑥 → (𝑓 ∈ (𝐹‘suc 𝑢) ↔ 𝑓𝑥))
3231biimparc 479 . . . . . . . . . . . . . . . . . . . 20 ((𝑓𝑥 ∧ (𝐹‘suc 𝑢) = 𝑥) → 𝑓 ∈ (𝐹‘suc 𝑢))
3313, 14, 23, 16inf3lemc 9314 . . . . . . . . . . . . . . . . . . . . . 22 (𝑢 ∈ ω → (𝐹‘suc 𝑢) = (𝐺‘(𝐹𝑢)))
3433eleq2d 2824 . . . . . . . . . . . . . . . . . . . . 21 (𝑢 ∈ ω → (𝑓 ∈ (𝐹‘suc 𝑢) ↔ 𝑓 ∈ (𝐺‘(𝐹𝑢))))
35 elin 3899 . . . . . . . . . . . . . . . . . . . . . 22 (𝑣 ∈ (𝑓𝑥) ↔ (𝑣𝑓𝑣𝑥))
36 vex 3426 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑓 ∈ V
37 fvex 6769 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐹𝑢) ∈ V
3813, 14, 36, 37inf3lema 9312 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 ∈ (𝐺‘(𝐹𝑢)) ↔ (𝑓𝑥 ∧ (𝑓𝑥) ⊆ (𝐹𝑢)))
3938simprbi 496 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 ∈ (𝐺‘(𝐹𝑢)) → (𝑓𝑥) ⊆ (𝐹𝑢))
4039sseld 3916 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 ∈ (𝐺‘(𝐹𝑢)) → (𝑣 ∈ (𝑓𝑥) → 𝑣 ∈ (𝐹𝑢)))
4135, 40syl5bir 242 . . . . . . . . . . . . . . . . . . . . 21 (𝑓 ∈ (𝐺‘(𝐹𝑢)) → ((𝑣𝑓𝑣𝑥) → 𝑣 ∈ (𝐹𝑢)))
4234, 41syl6bi 252 . . . . . . . . . . . . . . . . . . . 20 (𝑢 ∈ ω → (𝑓 ∈ (𝐹‘suc 𝑢) → ((𝑣𝑓𝑣𝑥) → 𝑣 ∈ (𝐹𝑢))))
4332, 42syl5 34 . . . . . . . . . . . . . . . . . . 19 (𝑢 ∈ ω → ((𝑓𝑥 ∧ (𝐹‘suc 𝑢) = 𝑥) → ((𝑣𝑓𝑣𝑥) → 𝑣 ∈ (𝐹𝑢))))
4443com23 86 . . . . . . . . . . . . . . . . . 18 (𝑢 ∈ ω → ((𝑣𝑓𝑣𝑥) → ((𝑓𝑥 ∧ (𝐹‘suc 𝑢) = 𝑥) → 𝑣 ∈ (𝐹𝑢))))
4544exp5c 444 . . . . . . . . . . . . . . . . 17 (𝑢 ∈ ω → (𝑣𝑓 → (𝑣𝑥 → (𝑓𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢))))))
4645com34 91 . . . . . . . . . . . . . . . 16 (𝑢 ∈ ω → (𝑣𝑓 → (𝑓𝑥 → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢))))))
4746impd 410 . . . . . . . . . . . . . . 15 (𝑢 ∈ ω → ((𝑣𝑓𝑓𝑥) → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))))
4847exlimdv 1937 . . . . . . . . . . . . . 14 (𝑢 ∈ ω → (∃𝑓(𝑣𝑓𝑓𝑥) → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))))
4930, 48sylan9r 508 . . . . . . . . . . . . 13 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (𝑣𝑥 → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))))
5049pm2.43d 53 . . . . . . . . . . . 12 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (𝑣𝑥 → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢))))
51 id 22 . . . . . . . . . . . . 13 (((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)) → ((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)))
5251necon3bd 2956 . . . . . . . . . . . 12 (((𝐹‘suc 𝑢) = 𝑥𝑣 ∈ (𝐹𝑢)) → (¬ 𝑣 ∈ (𝐹𝑢) → (𝐹‘suc 𝑢) ≠ 𝑥))
5350, 52syl6 35 . . . . . . . . . . 11 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (𝑣𝑥 → (¬ 𝑣 ∈ (𝐹𝑢) → (𝐹‘suc 𝑢) ≠ 𝑥)))
5453impd 410 . . . . . . . . . 10 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → ((𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)) → (𝐹‘suc 𝑢) ≠ 𝑥))
5554exlimdv 1937 . . . . . . . . 9 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (∃𝑣(𝑣𝑥 ∧ ¬ 𝑣 ∈ (𝐹𝑢)) → (𝐹‘suc 𝑢) ≠ 𝑥))
5627, 55syl5 34 . . . . . . . 8 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → (((𝐹𝑢) ⊆ 𝑥 ∧ (𝐹𝑢) ≠ 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥))
5724, 56sylani 603 . . . . . . 7 ((𝑢 ∈ ω ∧ 𝑥 𝑥) → ((𝑢 ∈ ω ∧ (𝐹𝑢) ≠ 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥))
5857exp4b 430 . . . . . 6 (𝑢 ∈ ω → (𝑥 𝑥 → (𝑢 ∈ ω → ((𝐹𝑢) ≠ 𝑥 → (𝐹‘suc 𝑢) ≠ 𝑥))))
5958pm2.43a 54 . . . . 5 (𝑢 ∈ ω → (𝑥 𝑥 → ((𝐹𝑢) ≠ 𝑥 → (𝐹‘suc 𝑢) ≠ 𝑥)))
6059adantld 490 . . . 4 (𝑢 ∈ ω → ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → ((𝐹𝑢) ≠ 𝑥 → (𝐹‘suc 𝑢) ≠ 𝑥)))
6160a2d 29 . . 3 (𝑢 ∈ ω → (((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝑢) ≠ 𝑥) → ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹‘suc 𝑢) ≠ 𝑥)))
623, 6, 9, 12, 22, 61finds 7719 . 2 (𝐴 ∈ ω → ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐹𝐴) ≠ 𝑥))
6362com12 32 1 ((𝑥 ≠ ∅ ∧ 𝑥 𝑥) → (𝐴 ∈ ω → (𝐹𝐴) ≠ 𝑥))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1539  wex 1783  wcel 2108  wne 2942  {crab 3067  Vcvv 3422  cin 3882  wss 3883  wpss 3884  c0 4253   cuni 4836  cmpt 5153  cres 5582  suc csuc 6253  cfv 6418  ωcom 7687  reccrdg 8211
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pr 5347  ax-un 7566
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-ov 7258  df-om 7688  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212
This theorem is referenced by:  inf3lem3  9318
  Copyright terms: Public domain W3C validator