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

Theorem fpwwe2lem2 9656
Description: Lemma for fpwwe2 9667. (Contributed by Mario Carneiro, 19-May-2015.)
Hypotheses
Ref Expression
fpwwe2.1 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
fpwwe2.2 (𝜑𝐴 ∈ V)
Assertion
Ref Expression
fpwwe2lem2 (𝜑 → (𝑋𝑊𝑅 ↔ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))))
Distinct variable groups:   𝑦,𝑢,𝑟,𝑥,𝐹   𝑋,𝑟,𝑢,𝑥,𝑦   𝜑,𝑟,𝑢,𝑥,𝑦   𝐴,𝑟,𝑥   𝑅,𝑟,𝑢,𝑥,𝑦   𝑊,𝑟,𝑢,𝑥,𝑦
Allowed substitution hints:   𝐴(𝑦,𝑢)

Proof of Theorem fpwwe2lem2
StepHypRef Expression
1 fpwwe2.1 . . . . 5 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
21relopabi 5384 . . . 4 Rel 𝑊
32a1i 11 . . 3 (𝜑 → Rel 𝑊)
4 brrelex12 5295 . . 3 ((Rel 𝑊𝑋𝑊𝑅) → (𝑋 ∈ V ∧ 𝑅 ∈ V))
53, 4sylan 569 . 2 ((𝜑𝑋𝑊𝑅) → (𝑋 ∈ V ∧ 𝑅 ∈ V))
6 fpwwe2.2 . . . . 5 (𝜑𝐴 ∈ V)
76adantr 466 . . . 4 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → 𝐴 ∈ V)
8 simprll 764 . . . 4 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → 𝑋𝐴)
97, 8ssexd 4939 . . 3 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → 𝑋 ∈ V)
10 xpexg 7107 . . . . 5 ((𝑋 ∈ V ∧ 𝑋 ∈ V) → (𝑋 × 𝑋) ∈ V)
119, 9, 10syl2anc 573 . . . 4 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → (𝑋 × 𝑋) ∈ V)
12 simprlr 765 . . . 4 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → 𝑅 ⊆ (𝑋 × 𝑋))
1311, 12ssexd 4939 . . 3 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → 𝑅 ∈ V)
149, 13jca 501 . 2 ((𝜑 ∧ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))) → (𝑋 ∈ V ∧ 𝑅 ∈ V))
15 simpl 468 . . . . . 6 ((𝑥 = 𝑋𝑟 = 𝑅) → 𝑥 = 𝑋)
1615sseq1d 3781 . . . . 5 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑥𝐴𝑋𝐴))
17 simpr 471 . . . . . 6 ((𝑥 = 𝑋𝑟 = 𝑅) → 𝑟 = 𝑅)
1815sqxpeqd 5281 . . . . . 6 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑥 × 𝑥) = (𝑋 × 𝑋))
1917, 18sseq12d 3783 . . . . 5 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑟 ⊆ (𝑥 × 𝑥) ↔ 𝑅 ⊆ (𝑋 × 𝑋)))
2016, 19anbi12d 616 . . . 4 ((𝑥 = 𝑋𝑟 = 𝑅) → ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ↔ (𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋))))
21 weeq2 5238 . . . . . 6 (𝑥 = 𝑋 → (𝑟 We 𝑥𝑟 We 𝑋))
22 weeq1 5237 . . . . . 6 (𝑟 = 𝑅 → (𝑟 We 𝑋𝑅 We 𝑋))
2321, 22sylan9bb 499 . . . . 5 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑟 We 𝑥𝑅 We 𝑋))
2417cnveqd 5436 . . . . . . . 8 ((𝑥 = 𝑋𝑟 = 𝑅) → 𝑟 = 𝑅)
2524imaeq1d 5606 . . . . . . 7 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑟 “ {𝑦}) = (𝑅 “ {𝑦}))
2617ineq1d 3964 . . . . . . . . 9 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑟 ∩ (𝑢 × 𝑢)) = (𝑅 ∩ (𝑢 × 𝑢)))
2726oveq2d 6809 . . . . . . . 8 ((𝑥 = 𝑋𝑟 = 𝑅) → (𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = (𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))))
2827eqeq1d 2773 . . . . . . 7 ((𝑥 = 𝑋𝑟 = 𝑅) → ((𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦 ↔ (𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))
2925, 28sbceqbid 3594 . . . . . 6 ((𝑥 = 𝑋𝑟 = 𝑅) → ([(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦[(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))
3015, 29raleqbidv 3301 . . . . 5 ((𝑥 = 𝑋𝑟 = 𝑅) → (∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦 ↔ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))
3123, 30anbi12d 616 . . . 4 ((𝑥 = 𝑋𝑟 = 𝑅) → ((𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦) ↔ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦)))
3220, 31anbi12d 616 . . 3 ((𝑥 = 𝑋𝑟 = 𝑅) → (((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦)) ↔ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))))
3332, 1brabga 5122 . 2 ((𝑋 ∈ V ∧ 𝑅 ∈ V) → (𝑋𝑊𝑅 ↔ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))))
345, 14, 33pm5.21nd 803 1 (𝜑 → (𝑋𝑊𝑅 ↔ ((𝑋𝐴𝑅 ⊆ (𝑋 × 𝑋)) ∧ (𝑅 We 𝑋 ∧ ∀𝑦𝑋 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 382   = wceq 1631  wcel 2145  wral 3061  Vcvv 3351  [wsbc 3587  cin 3722  wss 3723  {csn 4316   class class class wbr 4786  {copab 4846   We wwe 5207   × cxp 5247  ccnv 5248  cima 5252  Rel wrel 5254  (class class class)co 6793
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7096
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ral 3066  df-rex 3067  df-rab 3070  df-v 3353  df-sbc 3588  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-op 4323  df-uni 4575  df-br 4787  df-opab 4847  df-po 5170  df-so 5171  df-fr 5208  df-we 5210  df-xp 5255  df-rel 5256  df-cnv 5257  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-iota 5994  df-fv 6039  df-ov 6796
This theorem is referenced by:  fpwwe2lem3  9657  fpwwe2lem6  9659  fpwwe2lem7  9660  fpwwe2lem9  9662  fpwwe2lem11  9664  fpwwe2lem12  9665  fpwwe2lem13  9666  fpwwe2  9667  canthwelem  9674  pwfseqlem4  9686
  Copyright terms: Public domain W3C validator