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

Theorem fpwwecbv 9418
Description: Lemma for fpwwe 9420. (Contributed by Mario Carneiro, 15-May-2015.)
Hypothesis
Ref Expression
fpwwe.1 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦))}
Assertion
Ref Expression
fpwwecbv 𝑊 = {⟨𝑎, 𝑠⟩ ∣ ((𝑎𝐴𝑠 ⊆ (𝑎 × 𝑎)) ∧ (𝑠 We 𝑎 ∧ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧))}
Distinct variable groups:   𝑟,𝑎,𝑠,𝑥,𝐴   𝑦,𝑎,𝑧,𝐹,𝑟,𝑠,𝑥
Allowed substitution hints:   𝐴(𝑦,𝑧)   𝑊(𝑥,𝑦,𝑧,𝑠,𝑟,𝑎)

Proof of Theorem fpwwecbv
StepHypRef Expression
1 fpwwe.1 . 2 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦))}
2 simpl 473 . . . . . 6 ((𝑥 = 𝑎𝑟 = 𝑠) → 𝑥 = 𝑎)
32sseq1d 3616 . . . . 5 ((𝑥 = 𝑎𝑟 = 𝑠) → (𝑥𝐴𝑎𝐴))
4 simpr 477 . . . . . 6 ((𝑥 = 𝑎𝑟 = 𝑠) → 𝑟 = 𝑠)
52sqxpeqd 5106 . . . . . 6 ((𝑥 = 𝑎𝑟 = 𝑠) → (𝑥 × 𝑥) = (𝑎 × 𝑎))
64, 5sseq12d 3618 . . . . 5 ((𝑥 = 𝑎𝑟 = 𝑠) → (𝑟 ⊆ (𝑥 × 𝑥) ↔ 𝑠 ⊆ (𝑎 × 𝑎)))
73, 6anbi12d 746 . . . 4 ((𝑥 = 𝑎𝑟 = 𝑠) → ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ↔ (𝑎𝐴𝑠 ⊆ (𝑎 × 𝑎))))
8 weeq2 5068 . . . . . 6 (𝑥 = 𝑎 → (𝑟 We 𝑥𝑟 We 𝑎))
9 weeq1 5067 . . . . . 6 (𝑟 = 𝑠 → (𝑟 We 𝑎𝑠 We 𝑎))
108, 9sylan9bb 735 . . . . 5 ((𝑥 = 𝑎𝑟 = 𝑠) → (𝑟 We 𝑥𝑠 We 𝑎))
11 sneq 4163 . . . . . . . . . 10 (𝑦 = 𝑧 → {𝑦} = {𝑧})
1211imaeq2d 5430 . . . . . . . . 9 (𝑦 = 𝑧 → (𝑟 “ {𝑦}) = (𝑟 “ {𝑧}))
1312fveq2d 6157 . . . . . . . 8 (𝑦 = 𝑧 → (𝐹‘(𝑟 “ {𝑦})) = (𝐹‘(𝑟 “ {𝑧})))
14 id 22 . . . . . . . 8 (𝑦 = 𝑧𝑦 = 𝑧)
1513, 14eqeq12d 2636 . . . . . . 7 (𝑦 = 𝑧 → ((𝐹‘(𝑟 “ {𝑦})) = 𝑦 ↔ (𝐹‘(𝑟 “ {𝑧})) = 𝑧))
1615cbvralv 3162 . . . . . 6 (∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦 ↔ ∀𝑧𝑥 (𝐹‘(𝑟 “ {𝑧})) = 𝑧)
174cnveqd 5263 . . . . . . . . . 10 ((𝑥 = 𝑎𝑟 = 𝑠) → 𝑟 = 𝑠)
1817imaeq1d 5429 . . . . . . . . 9 ((𝑥 = 𝑎𝑟 = 𝑠) → (𝑟 “ {𝑧}) = (𝑠 “ {𝑧}))
1918fveq2d 6157 . . . . . . . 8 ((𝑥 = 𝑎𝑟 = 𝑠) → (𝐹‘(𝑟 “ {𝑧})) = (𝐹‘(𝑠 “ {𝑧})))
2019eqeq1d 2623 . . . . . . 7 ((𝑥 = 𝑎𝑟 = 𝑠) → ((𝐹‘(𝑟 “ {𝑧})) = 𝑧 ↔ (𝐹‘(𝑠 “ {𝑧})) = 𝑧))
212, 20raleqbidv 3144 . . . . . 6 ((𝑥 = 𝑎𝑟 = 𝑠) → (∀𝑧𝑥 (𝐹‘(𝑟 “ {𝑧})) = 𝑧 ↔ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧))
2216, 21syl5bb 272 . . . . 5 ((𝑥 = 𝑎𝑟 = 𝑠) → (∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦 ↔ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧))
2310, 22anbi12d 746 . . . 4 ((𝑥 = 𝑎𝑟 = 𝑠) → ((𝑟 We 𝑥 ∧ ∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦) ↔ (𝑠 We 𝑎 ∧ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧)))
247, 23anbi12d 746 . . 3 ((𝑥 = 𝑎𝑟 = 𝑠) → (((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦)) ↔ ((𝑎𝐴𝑠 ⊆ (𝑎 × 𝑎)) ∧ (𝑠 We 𝑎 ∧ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧))))
2524cbvopabv 4689 . 2 {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 (𝐹‘(𝑟 “ {𝑦})) = 𝑦))} = {⟨𝑎, 𝑠⟩ ∣ ((𝑎𝐴𝑠 ⊆ (𝑎 × 𝑎)) ∧ (𝑠 We 𝑎 ∧ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧))}
261, 25eqtri 2643 1 𝑊 = {⟨𝑎, 𝑠⟩ ∣ ((𝑎𝐴𝑠 ⊆ (𝑎 × 𝑎)) ∧ (𝑠 We 𝑎 ∧ ∀𝑧𝑎 (𝐹‘(𝑠 “ {𝑧})) = 𝑧))}
Colors of variables: wff setvar class
Syntax hints:  wa 384   = wceq 1480  wral 2907  wss 3559  {csn 4153  {copab 4677   We wwe 5037   × cxp 5077  ccnv 5078  cima 5082  cfv 5852
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ral 2912  df-rex 2913  df-rab 2916  df-v 3191  df-dif 3562  df-un 3564  df-in 3566  df-ss 3573  df-nul 3897  df-if 4064  df-sn 4154  df-pr 4156  df-op 4160  df-uni 4408  df-br 4619  df-opab 4679  df-po 5000  df-so 5001  df-fr 5038  df-we 5040  df-xp 5085  df-cnv 5087  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-iota 5815  df-fv 5860
This theorem is referenced by:  canthnum  9423  canthp1  9428
  Copyright terms: Public domain W3C validator