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

Theorem fpwwe2lem10 10254
Description: Lemma for fpwwe2 10257. (Contributed by Mario Carneiro, 15-May-2015.) (Revised by AV, 20-Jul-2024.)
Hypotheses
Ref Expression
fpwwe2.1 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
fpwwe2.2 (𝜑𝐴𝑉)
fpwwe2.3 ((𝜑 ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
fpwwe2.4 𝑋 = dom 𝑊
Assertion
Ref Expression
fpwwe2lem10 (𝜑𝑊:dom 𝑊⟶𝒫 (𝑋 × 𝑋))
Distinct variable groups:   𝑦,𝑢,𝑟,𝑥,𝐹   𝑋,𝑟,𝑢,𝑥,𝑦   𝜑,𝑟,𝑢,𝑥,𝑦   𝐴,𝑟,𝑥   𝑊,𝑟,𝑢,𝑥,𝑦
Allowed substitution hints:   𝐴(𝑦,𝑢)   𝑉(𝑥,𝑦,𝑢,𝑟)

Proof of Theorem fpwwe2lem10
Dummy variables 𝑠 𝑡 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fpwwe2.1 . . . . . 6 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
21relopabiv 5690 . . . . 5 Rel 𝑊
32a1i 11 . . . 4 (𝜑 → Rel 𝑊)
4 simprr 773 . . . . . . . . 9 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑠 = (𝑡 ∩ (𝑤 × 𝑤)))) → 𝑠 = (𝑡 ∩ (𝑤 × 𝑤)))
5 fpwwe2.2 . . . . . . . . . . . . . . 15 (𝜑𝐴𝑉)
61, 5fpwwe2lem2 10246 . . . . . . . . . . . . . 14 (𝜑 → (𝑤𝑊𝑡 ↔ ((𝑤𝐴𝑡 ⊆ (𝑤 × 𝑤)) ∧ (𝑡 We 𝑤 ∧ ∀𝑦𝑤 [(𝑡 “ {𝑦}) / 𝑢](𝑢𝐹(𝑡 ∩ (𝑢 × 𝑢))) = 𝑦))))
76simprbda 502 . . . . . . . . . . . . 13 ((𝜑𝑤𝑊𝑡) → (𝑤𝐴𝑡 ⊆ (𝑤 × 𝑤)))
87simprd 499 . . . . . . . . . . . 12 ((𝜑𝑤𝑊𝑡) → 𝑡 ⊆ (𝑤 × 𝑤))
98adantrl 716 . . . . . . . . . . 11 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → 𝑡 ⊆ (𝑤 × 𝑤))
109adantr 484 . . . . . . . . . 10 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑠 = (𝑡 ∩ (𝑤 × 𝑤)))) → 𝑡 ⊆ (𝑤 × 𝑤))
11 df-ss 3883 . . . . . . . . . 10 (𝑡 ⊆ (𝑤 × 𝑤) ↔ (𝑡 ∩ (𝑤 × 𝑤)) = 𝑡)
1210, 11sylib 221 . . . . . . . . 9 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑠 = (𝑡 ∩ (𝑤 × 𝑤)))) → (𝑡 ∩ (𝑤 × 𝑤)) = 𝑡)
134, 12eqtrd 2777 . . . . . . . 8 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑠 = (𝑡 ∩ (𝑤 × 𝑤)))) → 𝑠 = 𝑡)
14 simprr 773 . . . . . . . . 9 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑡 = (𝑠 ∩ (𝑤 × 𝑤)))) → 𝑡 = (𝑠 ∩ (𝑤 × 𝑤)))
151, 5fpwwe2lem2 10246 . . . . . . . . . . . . . 14 (𝜑 → (𝑤𝑊𝑠 ↔ ((𝑤𝐴𝑠 ⊆ (𝑤 × 𝑤)) ∧ (𝑠 We 𝑤 ∧ ∀𝑦𝑤 [(𝑠 “ {𝑦}) / 𝑢](𝑢𝐹(𝑠 ∩ (𝑢 × 𝑢))) = 𝑦))))
1615simprbda 502 . . . . . . . . . . . . 13 ((𝜑𝑤𝑊𝑠) → (𝑤𝐴𝑠 ⊆ (𝑤 × 𝑤)))
1716simprd 499 . . . . . . . . . . . 12 ((𝜑𝑤𝑊𝑠) → 𝑠 ⊆ (𝑤 × 𝑤))
1817adantrr 717 . . . . . . . . . . 11 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → 𝑠 ⊆ (𝑤 × 𝑤))
1918adantr 484 . . . . . . . . . 10 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑡 = (𝑠 ∩ (𝑤 × 𝑤)))) → 𝑠 ⊆ (𝑤 × 𝑤))
20 df-ss 3883 . . . . . . . . . 10 (𝑠 ⊆ (𝑤 × 𝑤) ↔ (𝑠 ∩ (𝑤 × 𝑤)) = 𝑠)
2119, 20sylib 221 . . . . . . . . 9 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑡 = (𝑠 ∩ (𝑤 × 𝑤)))) → (𝑠 ∩ (𝑤 × 𝑤)) = 𝑠)
2214, 21eqtr2d 2778 . . . . . . . 8 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑤𝑤𝑡 = (𝑠 ∩ (𝑤 × 𝑤)))) → 𝑠 = 𝑡)
235adantr 484 . . . . . . . . 9 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → 𝐴𝑉)
24 fpwwe2.3 . . . . . . . . . 10 ((𝜑 ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
2524adantlr 715 . . . . . . . . 9 (((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
26 simprl 771 . . . . . . . . 9 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → 𝑤𝑊𝑠)
27 simprr 773 . . . . . . . . 9 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → 𝑤𝑊𝑡)
281, 23, 25, 26, 27fpwwe2lem9 10253 . . . . . . . 8 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → ((𝑤𝑤𝑠 = (𝑡 ∩ (𝑤 × 𝑤))) ∨ (𝑤𝑤𝑡 = (𝑠 ∩ (𝑤 × 𝑤)))))
2913, 22, 28mpjaodan 959 . . . . . . 7 ((𝜑 ∧ (𝑤𝑊𝑠𝑤𝑊𝑡)) → 𝑠 = 𝑡)
3029ex 416 . . . . . 6 (𝜑 → ((𝑤𝑊𝑠𝑤𝑊𝑡) → 𝑠 = 𝑡))
3130alrimiv 1935 . . . . 5 (𝜑 → ∀𝑡((𝑤𝑊𝑠𝑤𝑊𝑡) → 𝑠 = 𝑡))
3231alrimivv 1936 . . . 4 (𝜑 → ∀𝑤𝑠𝑡((𝑤𝑊𝑠𝑤𝑊𝑡) → 𝑠 = 𝑡))
33 dffun2 6390 . . . 4 (Fun 𝑊 ↔ (Rel 𝑊 ∧ ∀𝑤𝑠𝑡((𝑤𝑊𝑠𝑤𝑊𝑡) → 𝑠 = 𝑡)))
343, 32, 33sylanbrc 586 . . 3 (𝜑 → Fun 𝑊)
3534funfnd 6411 . 2 (𝜑𝑊 Fn dom 𝑊)
36 vex 3412 . . . . 5 𝑠 ∈ V
3736elrn 5762 . . . 4 (𝑠 ∈ ran 𝑊 ↔ ∃𝑤 𝑤𝑊𝑠)
382releldmi 5817 . . . . . . . . . . . 12 (𝑤𝑊𝑠𝑤 ∈ dom 𝑊)
3938adantl 485 . . . . . . . . . . 11 ((𝜑𝑤𝑊𝑠) → 𝑤 ∈ dom 𝑊)
40 elssuni 4851 . . . . . . . . . . 11 (𝑤 ∈ dom 𝑊𝑤 dom 𝑊)
4139, 40syl 17 . . . . . . . . . 10 ((𝜑𝑤𝑊𝑠) → 𝑤 dom 𝑊)
42 fpwwe2.4 . . . . . . . . . 10 𝑋 = dom 𝑊
4341, 42sseqtrrdi 3952 . . . . . . . . 9 ((𝜑𝑤𝑊𝑠) → 𝑤𝑋)
44 xpss12 5566 . . . . . . . . 9 ((𝑤𝑋𝑤𝑋) → (𝑤 × 𝑤) ⊆ (𝑋 × 𝑋))
4543, 43, 44syl2anc 587 . . . . . . . 8 ((𝜑𝑤𝑊𝑠) → (𝑤 × 𝑤) ⊆ (𝑋 × 𝑋))
4617, 45sstrd 3911 . . . . . . 7 ((𝜑𝑤𝑊𝑠) → 𝑠 ⊆ (𝑋 × 𝑋))
4746ex 416 . . . . . 6 (𝜑 → (𝑤𝑊𝑠𝑠 ⊆ (𝑋 × 𝑋)))
48 velpw 4518 . . . . . 6 (𝑠 ∈ 𝒫 (𝑋 × 𝑋) ↔ 𝑠 ⊆ (𝑋 × 𝑋))
4947, 48syl6ibr 255 . . . . 5 (𝜑 → (𝑤𝑊𝑠𝑠 ∈ 𝒫 (𝑋 × 𝑋)))
5049exlimdv 1941 . . . 4 (𝜑 → (∃𝑤 𝑤𝑊𝑠𝑠 ∈ 𝒫 (𝑋 × 𝑋)))
5137, 50syl5bi 245 . . 3 (𝜑 → (𝑠 ∈ ran 𝑊𝑠 ∈ 𝒫 (𝑋 × 𝑋)))
5251ssrdv 3907 . 2 (𝜑 → ran 𝑊 ⊆ 𝒫 (𝑋 × 𝑋))
53 df-f 6384 . 2 (𝑊:dom 𝑊⟶𝒫 (𝑋 × 𝑋) ↔ (𝑊 Fn dom 𝑊 ∧ ran 𝑊 ⊆ 𝒫 (𝑋 × 𝑋)))
5435, 52, 53sylanbrc 586 1 (𝜑𝑊:dom 𝑊⟶𝒫 (𝑋 × 𝑋))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399  w3a 1089  wal 1541   = wceq 1543  wex 1787  wcel 2110  wral 3061  [wsbc 3694  cin 3865  wss 3866  𝒫 cpw 4513  {csn 4541   cuni 4819   class class class wbr 5053  {copab 5115   We wwe 5508   × cxp 5549  ccnv 5550  dom cdm 5551  ran crn 5552  cima 5554  Rel wrel 5556  Fun wfun 6374   Fn wfn 6375  wf 6376  (class class class)co 7213
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2708  ax-rep 5179  ax-sep 5192  ax-nul 5199  ax-pow 5258  ax-pr 5322  ax-un 7523
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2886  df-ne 2941  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3410  df-sbc 3695  df-csb 3812  df-dif 3869  df-un 3871  df-in 3873  df-ss 3883  df-pss 3885  df-nul 4238  df-if 4440  df-pw 4515  df-sn 4542  df-pr 4544  df-tp 4546  df-op 4548  df-uni 4820  df-iun 4906  df-br 5054  df-opab 5116  df-mpt 5136  df-tr 5162  df-id 5455  df-eprel 5460  df-po 5468  df-so 5469  df-fr 5509  df-se 5510  df-we 5511  df-xp 5557  df-rel 5558  df-cnv 5559  df-co 5560  df-dm 5561  df-rn 5562  df-res 5563  df-ima 5564  df-pred 6160  df-ord 6216  df-on 6217  df-lim 6218  df-suc 6219  df-iota 6338  df-fun 6382  df-fn 6383  df-f 6384  df-f1 6385  df-fo 6386  df-f1o 6387  df-fv 6388  df-isom 6389  df-riota 7170  df-ov 7216  df-wrecs 8047  df-recs 8108  df-oi 9126
This theorem is referenced by:  fpwwe2lem12  10256  fpwwe2  10257
  Copyright terms: Public domain W3C validator