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

Theorem unxpdomlem2 9195
Description: Lemma for unxpdom 9197. (Contributed by Mario Carneiro, 13-Jan-2013.)
Hypotheses
Ref Expression
unxpdomlem1.1 𝐹 = (𝑥 ∈ (𝑎𝑏) ↦ 𝐺)
unxpdomlem1.2 𝐺 = if(𝑥𝑎, ⟨𝑥, if(𝑥 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑥 = 𝑡, 𝑛, 𝑚), 𝑥⟩)
unxpdomlem2.1 (𝜑𝑤 ∈ (𝑎𝑏))
unxpdomlem2.2 (𝜑 → ¬ 𝑚 = 𝑛)
unxpdomlem2.3 (𝜑 → ¬ 𝑠 = 𝑡)
Assertion
Ref Expression
unxpdomlem2 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → ¬ (𝐹𝑧) = (𝐹𝑤))
Distinct variable groups:   𝑤,𝐹,𝑧   𝑎,𝑏,𝑚,𝑛,𝑠,𝑡,𝑤,𝑥,𝑧
Allowed substitution hints:   𝜑(𝑥,𝑧,𝑤,𝑡,𝑚,𝑛,𝑠,𝑎,𝑏)   𝐹(𝑥,𝑡,𝑚,𝑛,𝑠,𝑎,𝑏)   𝐺(𝑥,𝑧,𝑤,𝑡,𝑚,𝑛,𝑠,𝑎,𝑏)

Proof of Theorem unxpdomlem2
StepHypRef Expression
1 unxpdomlem2.3 . . 3 (𝜑 → ¬ 𝑠 = 𝑡)
21adantr 481 . 2 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → ¬ 𝑠 = 𝑡)
3 elun1 4136 . . . . . . . . . 10 (𝑧𝑎𝑧 ∈ (𝑎𝑏))
43ad2antrl 726 . . . . . . . . 9 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → 𝑧 ∈ (𝑎𝑏))
5 unxpdomlem1.1 . . . . . . . . . 10 𝐹 = (𝑥 ∈ (𝑎𝑏) ↦ 𝐺)
6 unxpdomlem1.2 . . . . . . . . . 10 𝐺 = if(𝑥𝑎, ⟨𝑥, if(𝑥 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑥 = 𝑡, 𝑛, 𝑚), 𝑥⟩)
75, 6unxpdomlem1 9194 . . . . . . . . 9 (𝑧 ∈ (𝑎𝑏) → (𝐹𝑧) = if(𝑧𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩))
84, 7syl 17 . . . . . . . 8 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → (𝐹𝑧) = if(𝑧𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩))
9 iftrue 4492 . . . . . . . . 9 (𝑧𝑎 → if(𝑧𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩) = ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩)
109ad2antrl 726 . . . . . . . 8 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → if(𝑧𝑎, ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑧 = 𝑡, 𝑛, 𝑚), 𝑧⟩) = ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩)
118, 10eqtrd 2776 . . . . . . 7 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → (𝐹𝑧) = ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩)
12 unxpdomlem2.1 . . . . . . . . . 10 (𝜑𝑤 ∈ (𝑎𝑏))
1312adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → 𝑤 ∈ (𝑎𝑏))
145, 6unxpdomlem1 9194 . . . . . . . . 9 (𝑤 ∈ (𝑎𝑏) → (𝐹𝑤) = if(𝑤𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩))
1513, 14syl 17 . . . . . . . 8 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → (𝐹𝑤) = if(𝑤𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩))
16 iffalse 4495 . . . . . . . . 9 𝑤𝑎 → if(𝑤𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩) = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
1716ad2antll 727 . . . . . . . 8 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → if(𝑤𝑎, ⟨𝑤, if(𝑤 = 𝑚, 𝑡, 𝑠)⟩, ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩) = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
1815, 17eqtrd 2776 . . . . . . 7 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → (𝐹𝑤) = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
1911, 18eqeq12d 2752 . . . . . 6 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → ((𝐹𝑧) = (𝐹𝑤) ↔ ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩ = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩))
2019biimpa 477 . . . . 5 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → ⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩ = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩)
21 vex 3449 . . . . . 6 𝑧 ∈ V
22 vex 3449 . . . . . . 7 𝑡 ∈ V
23 vex 3449 . . . . . . 7 𝑠 ∈ V
2422, 23ifex 4536 . . . . . 6 if(𝑧 = 𝑚, 𝑡, 𝑠) ∈ V
2521, 24opth 5433 . . . . 5 (⟨𝑧, if(𝑧 = 𝑚, 𝑡, 𝑠)⟩ = ⟨if(𝑤 = 𝑡, 𝑛, 𝑚), 𝑤⟩ ↔ (𝑧 = if(𝑤 = 𝑡, 𝑛, 𝑚) ∧ if(𝑧 = 𝑚, 𝑡, 𝑠) = 𝑤))
2620, 25sylib 217 . . . 4 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑧 = if(𝑤 = 𝑡, 𝑛, 𝑚) ∧ if(𝑧 = 𝑚, 𝑡, 𝑠) = 𝑤))
2726simprd 496 . . 3 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → if(𝑧 = 𝑚, 𝑡, 𝑠) = 𝑤)
28 iftrue 4492 . . . . . . 7 (𝑧 = 𝑚 → if(𝑧 = 𝑚, 𝑡, 𝑠) = 𝑡)
2927eqeq1d 2738 . . . . . . 7 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (if(𝑧 = 𝑚, 𝑡, 𝑠) = 𝑡𝑤 = 𝑡))
3028, 29imbitrid 243 . . . . . 6 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑧 = 𝑚𝑤 = 𝑡))
31 iftrue 4492 . . . . . . 7 (𝑤 = 𝑡 → if(𝑤 = 𝑡, 𝑛, 𝑚) = 𝑛)
3226simpld 495 . . . . . . . 8 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → 𝑧 = if(𝑤 = 𝑡, 𝑛, 𝑚))
3332eqeq1d 2738 . . . . . . 7 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑧 = 𝑛 ↔ if(𝑤 = 𝑡, 𝑛, 𝑚) = 𝑛))
3431, 33syl5ibr 245 . . . . . 6 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑤 = 𝑡𝑧 = 𝑛))
3530, 34syld 47 . . . . 5 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑧 = 𝑚𝑧 = 𝑛))
36 unxpdomlem2.2 . . . . . . 7 (𝜑 → ¬ 𝑚 = 𝑛)
3736ad2antrr 724 . . . . . 6 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → ¬ 𝑚 = 𝑛)
38 equequ1 2028 . . . . . . 7 (𝑧 = 𝑚 → (𝑧 = 𝑛𝑚 = 𝑛))
3938notbid 317 . . . . . 6 (𝑧 = 𝑚 → (¬ 𝑧 = 𝑛 ↔ ¬ 𝑚 = 𝑛))
4037, 39syl5ibrcom 246 . . . . 5 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑧 = 𝑚 → ¬ 𝑧 = 𝑛))
4135, 40pm2.65d 195 . . . 4 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → ¬ 𝑧 = 𝑚)
4241iffalsed 4497 . . 3 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → if(𝑧 = 𝑚, 𝑡, 𝑠) = 𝑠)
43 iffalse 4495 . . . . 5 𝑤 = 𝑡 → if(𝑤 = 𝑡, 𝑛, 𝑚) = 𝑚)
4432eqeq1d 2738 . . . . 5 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (𝑧 = 𝑚 ↔ if(𝑤 = 𝑡, 𝑛, 𝑚) = 𝑚))
4543, 44syl5ibr 245 . . . 4 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → (¬ 𝑤 = 𝑡𝑧 = 𝑚))
4641, 45mt3d 148 . . 3 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → 𝑤 = 𝑡)
4727, 42, 463eqtr3d 2784 . 2 (((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) ∧ (𝐹𝑧) = (𝐹𝑤)) → 𝑠 = 𝑡)
482, 47mtand 814 1 ((𝜑 ∧ (𝑧𝑎 ∧ ¬ 𝑤𝑎)) → ¬ (𝐹𝑧) = (𝐹𝑤))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396   = wceq 1541  wcel 2106  cun 3908  ifcif 4486  cop 4592  cmpt 5188  cfv 6496
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  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 2707  ax-sep 5256  ax-nul 5263  ax-pr 5384
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ral 3065  df-rex 3074  df-rab 3408  df-v 3447  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-nul 4283  df-if 4487  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-br 5106  df-opab 5168  df-mpt 5189  df-id 5531  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-iota 6448  df-fun 6498  df-fv 6504
This theorem is referenced by:  unxpdomlem3  9196
  Copyright terms: Public domain W3C validator