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

Theorem fpwwe2 9318
Description: Given any function 𝐹 from well-orderings of subsets of 𝐴 to 𝐴, there is a unique well-ordered subset 𝑋, (𝑊𝑋)⟩ which "agrees" with 𝐹 in the sense that each initial segment maps to its upper bound, and such that the entire set maps to an element of the set (so that it cannot be extended without losing the well-ordering). This theorem can be used to prove dfac8a 8710. Theorem 1.1 of [KanamoriPincus] p. 415. (Contributed by Mario Carneiro, 18-May-2015.)
Hypotheses
Ref Expression
fpwwe2.1 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
fpwwe2.2 (𝜑𝐴 ∈ V)
fpwwe2.3 ((𝜑 ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
fpwwe2.4 𝑋 = dom 𝑊
Assertion
Ref Expression
fpwwe2 (𝜑 → ((𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌) ↔ (𝑌 = 𝑋𝑅 = (𝑊𝑋))))
Distinct variable groups:   𝑦,𝑢,𝑟,𝑥,𝐹   𝑋,𝑟,𝑢,𝑥,𝑦   𝜑,𝑟,𝑢,𝑥,𝑦   𝐴,𝑟,𝑥   𝑅,𝑟,𝑢,𝑥,𝑦   𝑌,𝑟,𝑢,𝑥,𝑦   𝑊,𝑟,𝑢,𝑥,𝑦
Allowed substitution hints:   𝐴(𝑦,𝑢)

Proof of Theorem fpwwe2
Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fpwwe2.1 . . . . . . . . . . 11 𝑊 = {⟨𝑥, 𝑟⟩ ∣ ((𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥)) ∧ (𝑟 We 𝑥 ∧ ∀𝑦𝑥 [(𝑟 “ {𝑦}) / 𝑢](𝑢𝐹(𝑟 ∩ (𝑢 × 𝑢))) = 𝑦))}
2 fpwwe2.2 . . . . . . . . . . 11 (𝜑𝐴 ∈ V)
3 fpwwe2.3 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
4 fpwwe2.4 . . . . . . . . . . 11 𝑋 = dom 𝑊
51, 2, 3, 4fpwwe2lem11 9315 . . . . . . . . . 10 (𝜑𝑊:dom 𝑊⟶𝒫 (𝑋 × 𝑋))
6 ffun 5944 . . . . . . . . . 10 (𝑊:dom 𝑊⟶𝒫 (𝑋 × 𝑋) → Fun 𝑊)
75, 6syl 17 . . . . . . . . 9 (𝜑 → Fun 𝑊)
8 funbrfv2b 6132 . . . . . . . . 9 (Fun 𝑊 → (𝑌𝑊𝑅 ↔ (𝑌 ∈ dom 𝑊 ∧ (𝑊𝑌) = 𝑅)))
97, 8syl 17 . . . . . . . 8 (𝜑 → (𝑌𝑊𝑅 ↔ (𝑌 ∈ dom 𝑊 ∧ (𝑊𝑌) = 𝑅)))
109simprbda 650 . . . . . . 7 ((𝜑𝑌𝑊𝑅) → 𝑌 ∈ dom 𝑊)
1110adantrr 748 . . . . . 6 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑌 ∈ dom 𝑊)
12 elssuni 4394 . . . . . . 7 (𝑌 ∈ dom 𝑊𝑌 dom 𝑊)
1312, 4syl6sseqr 3611 . . . . . 6 (𝑌 ∈ dom 𝑊𝑌𝑋)
1411, 13syl 17 . . . . 5 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑌𝑋)
15 simpl 471 . . . . . . 7 ((𝑋𝑌 ∧ (𝑊𝑋) = (𝑅 ∩ (𝑌 × 𝑋))) → 𝑋𝑌)
1615a1i 11 . . . . . 6 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → ((𝑋𝑌 ∧ (𝑊𝑋) = (𝑅 ∩ (𝑌 × 𝑋))) → 𝑋𝑌))
17 simplrr 796 . . . . . . . . 9 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑌𝐹𝑅) ∈ 𝑌)
182adantr 479 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝐴 ∈ V)
1918adantr 479 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → 𝐴 ∈ V)
201, 2, 3, 4fpwwe2lem12 9316 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑋 ∈ dom 𝑊)
21 funfvbrb 6220 . . . . . . . . . . . . . . . . . . . 20 (Fun 𝑊 → (𝑋 ∈ dom 𝑊𝑋𝑊(𝑊𝑋)))
227, 21syl 17 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑋 ∈ dom 𝑊𝑋𝑊(𝑊𝑋)))
2320, 22mpbid 220 . . . . . . . . . . . . . . . . . 18 (𝜑𝑋𝑊(𝑊𝑋))
241, 2fpwwe2lem2 9307 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑋𝑊(𝑊𝑋) ↔ ((𝑋𝐴 ∧ (𝑊𝑋) ⊆ (𝑋 × 𝑋)) ∧ ((𝑊𝑋) We 𝑋 ∧ ∀𝑦𝑋 [((𝑊𝑋) “ {𝑦}) / 𝑢](𝑢𝐹((𝑊𝑋) ∩ (𝑢 × 𝑢))) = 𝑦))))
2523, 24mpbid 220 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑋𝐴 ∧ (𝑊𝑋) ⊆ (𝑋 × 𝑋)) ∧ ((𝑊𝑋) We 𝑋 ∧ ∀𝑦𝑋 [((𝑊𝑋) “ {𝑦}) / 𝑢](𝑢𝐹((𝑊𝑋) ∩ (𝑢 × 𝑢))) = 𝑦)))
2625ad2antrr 757 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑋𝐴 ∧ (𝑊𝑋) ⊆ (𝑋 × 𝑋)) ∧ ((𝑊𝑋) We 𝑋 ∧ ∀𝑦𝑋 [((𝑊𝑋) “ {𝑦}) / 𝑢](𝑢𝐹((𝑊𝑋) ∩ (𝑢 × 𝑢))) = 𝑦)))
2726simpld 473 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑋𝐴 ∧ (𝑊𝑋) ⊆ (𝑋 × 𝑋)))
2827simpld 473 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → 𝑋𝐴)
2919, 28ssexd 4725 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → 𝑋 ∈ V)
30 difexg 4727 . . . . . . . . . . . . 13 (𝑋 ∈ V → (𝑋𝑌) ∈ V)
3129, 30syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑋𝑌) ∈ V)
3226simprd 477 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑊𝑋) We 𝑋 ∧ ∀𝑦𝑋 [((𝑊𝑋) “ {𝑦}) / 𝑢](𝑢𝐹((𝑊𝑋) ∩ (𝑢 × 𝑢))) = 𝑦))
3332simpld 473 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑊𝑋) We 𝑋)
34 wefr 5015 . . . . . . . . . . . . 13 ((𝑊𝑋) We 𝑋 → (𝑊𝑋) Fr 𝑋)
3533, 34syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑊𝑋) Fr 𝑋)
36 difssd 3696 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑋𝑌) ⊆ 𝑋)
37 fri 4987 . . . . . . . . . . . . 13 ((((𝑋𝑌) ∈ V ∧ (𝑊𝑋) Fr 𝑋) ∧ ((𝑋𝑌) ⊆ 𝑋 ∧ (𝑋𝑌) ≠ ∅)) → ∃𝑧 ∈ (𝑋𝑌)∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧)
3837expr 640 . . . . . . . . . . . 12 ((((𝑋𝑌) ∈ V ∧ (𝑊𝑋) Fr 𝑋) ∧ (𝑋𝑌) ⊆ 𝑋) → ((𝑋𝑌) ≠ ∅ → ∃𝑧 ∈ (𝑋𝑌)∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧))
3931, 35, 36, 38syl21anc 1316 . . . . . . . . . . 11 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑋𝑌) ≠ ∅ → ∃𝑧 ∈ (𝑋𝑌)∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧))
40 ssdif0 3892 . . . . . . . . . . . . . . 15 ((𝑋 ∩ ((𝑊𝑋) “ {𝑧})) ⊆ 𝑌 ↔ ((𝑋 ∩ ((𝑊𝑋) “ {𝑧})) ∖ 𝑌) = ∅)
41 indif1 3826 . . . . . . . . . . . . . . . 16 ((𝑋𝑌) ∩ ((𝑊𝑋) “ {𝑧})) = ((𝑋 ∩ ((𝑊𝑋) “ {𝑧})) ∖ 𝑌)
4241eqeq1i 2611 . . . . . . . . . . . . . . 15 (((𝑋𝑌) ∩ ((𝑊𝑋) “ {𝑧})) = ∅ ↔ ((𝑋 ∩ ((𝑊𝑋) “ {𝑧})) ∖ 𝑌) = ∅)
43 disj 3965 . . . . . . . . . . . . . . . 16 (((𝑋𝑌) ∩ ((𝑊𝑋) “ {𝑧})) = ∅ ↔ ∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤 ∈ ((𝑊𝑋) “ {𝑧}))
44 vex 3172 . . . . . . . . . . . . . . . . . . 19 𝑧 ∈ V
45 vex 3172 . . . . . . . . . . . . . . . . . . . 20 𝑤 ∈ V
4645eliniseg 5397 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ V → (𝑤 ∈ ((𝑊𝑋) “ {𝑧}) ↔ 𝑤(𝑊𝑋)𝑧))
4744, 46ax-mp 5 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ ((𝑊𝑋) “ {𝑧}) ↔ 𝑤(𝑊𝑋)𝑧)
4847notbii 308 . . . . . . . . . . . . . . . . 17 𝑤 ∈ ((𝑊𝑋) “ {𝑧}) ↔ ¬ 𝑤(𝑊𝑋)𝑧)
4948ralbii 2959 . . . . . . . . . . . . . . . 16 (∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤 ∈ ((𝑊𝑋) “ {𝑧}) ↔ ∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧)
5043, 49bitri 262 . . . . . . . . . . . . . . 15 (((𝑋𝑌) ∩ ((𝑊𝑋) “ {𝑧})) = ∅ ↔ ∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧)
5140, 42, 503bitr2i 286 . . . . . . . . . . . . . 14 ((𝑋 ∩ ((𝑊𝑋) “ {𝑧})) ⊆ 𝑌 ↔ ∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧)
52 cnvimass 5388 . . . . . . . . . . . . . . . . 17 ((𝑊𝑋) “ {𝑧}) ⊆ dom (𝑊𝑋)
5327simprd 477 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑊𝑋) ⊆ (𝑋 × 𝑋))
54 dmss 5229 . . . . . . . . . . . . . . . . . . 19 ((𝑊𝑋) ⊆ (𝑋 × 𝑋) → dom (𝑊𝑋) ⊆ dom (𝑋 × 𝑋))
5553, 54syl 17 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → dom (𝑊𝑋) ⊆ dom (𝑋 × 𝑋))
56 dmxpid 5250 . . . . . . . . . . . . . . . . . 18 dom (𝑋 × 𝑋) = 𝑋
5755, 56syl6sseq 3610 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → dom (𝑊𝑋) ⊆ 𝑋)
5852, 57syl5ss 3575 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑊𝑋) “ {𝑧}) ⊆ 𝑋)
59 sseqin2 3775 . . . . . . . . . . . . . . . 16 (((𝑊𝑋) “ {𝑧}) ⊆ 𝑋 ↔ (𝑋 ∩ ((𝑊𝑋) “ {𝑧})) = ((𝑊𝑋) “ {𝑧}))
6058, 59sylib 206 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑋 ∩ ((𝑊𝑋) “ {𝑧})) = ((𝑊𝑋) “ {𝑧}))
6160sseq1d 3591 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑋 ∩ ((𝑊𝑋) “ {𝑧})) ⊆ 𝑌 ↔ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌))
6251, 61syl5bbr 272 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧 ↔ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌))
6362rexbidv 3030 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (∃𝑧 ∈ (𝑋𝑌)∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧 ↔ ∃𝑧 ∈ (𝑋𝑌)((𝑊𝑋) “ {𝑧}) ⊆ 𝑌))
64 eldifn 3691 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∈ (𝑋𝑌) → ¬ 𝑧𝑌)
6564ad2antrl 759 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → ¬ 𝑧𝑌)
66 eleq1 2672 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑤 = 𝑧 → (𝑤𝑌𝑧𝑌))
6766notbid 306 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑤 = 𝑧 → (¬ 𝑤𝑌 ↔ ¬ 𝑧𝑌))
6865, 67syl5ibrcom 235 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑤 = 𝑧 → ¬ 𝑤𝑌))
6968con2d 127 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑤𝑌 → ¬ 𝑤 = 𝑧))
7069imp 443 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → ¬ 𝑤 = 𝑧)
7165adantr 479 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → ¬ 𝑧𝑌)
72 simprr 791 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → 𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))
7372ad2antrr 757 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))
7473breqd 4585 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑧𝑅𝑤𝑧((𝑊𝑋) ∩ (𝑋 × 𝑌))𝑤))
75 eldifi 3690 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑧 ∈ (𝑋𝑌) → 𝑧𝑋)
7675ad2antrl 759 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑧𝑋)
7776adantr 479 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑧𝑋)
78 simpr 475 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑤𝑌)
79 brxp 5058 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧(𝑋 × 𝑌)𝑤 ↔ (𝑧𝑋𝑤𝑌))
8077, 78, 79sylanbrc 694 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑧(𝑋 × 𝑌)𝑤)
81 brin 4625 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧((𝑊𝑋) ∩ (𝑋 × 𝑌))𝑤 ↔ (𝑧(𝑊𝑋)𝑤𝑧(𝑋 × 𝑌)𝑤))
8281rbaib 944 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧(𝑋 × 𝑌)𝑤 → (𝑧((𝑊𝑋) ∩ (𝑋 × 𝑌))𝑤𝑧(𝑊𝑋)𝑤))
8380, 82syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑧((𝑊𝑋) ∩ (𝑋 × 𝑌))𝑤𝑧(𝑊𝑋)𝑤))
8474, 83bitrd 266 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑧𝑅𝑤𝑧(𝑊𝑋)𝑤))
851, 2fpwwe2lem2 9307 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (𝑌𝑊𝑅 ↔ ((𝑌𝐴𝑅 ⊆ (𝑌 × 𝑌)) ∧ (𝑅 We 𝑌 ∧ ∀𝑦𝑌 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦))))
8685biimpa 499 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑌𝑊𝑅) → ((𝑌𝐴𝑅 ⊆ (𝑌 × 𝑌)) ∧ (𝑅 We 𝑌 ∧ ∀𝑦𝑌 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦)))
8786adantrr 748 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → ((𝑌𝐴𝑅 ⊆ (𝑌 × 𝑌)) ∧ (𝑅 We 𝑌 ∧ ∀𝑦𝑌 [(𝑅 “ {𝑦}) / 𝑢](𝑢𝐹(𝑅 ∩ (𝑢 × 𝑢))) = 𝑦)))
8887simpld 473 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → (𝑌𝐴𝑅 ⊆ (𝑌 × 𝑌)))
8988simprd 477 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑅 ⊆ (𝑌 × 𝑌))
9089ad3antrrr 761 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑅 ⊆ (𝑌 × 𝑌))
9190ssbrd 4617 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑧𝑅𝑤𝑧(𝑌 × 𝑌)𝑤))
92 brxp 5058 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧(𝑌 × 𝑌)𝑤 ↔ (𝑧𝑌𝑤𝑌))
9392simplbi 474 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧(𝑌 × 𝑌)𝑤𝑧𝑌)
9491, 93syl6 34 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑧𝑅𝑤𝑧𝑌))
9584, 94sylbird 248 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑧(𝑊𝑋)𝑤𝑧𝑌))
9671, 95mtod 187 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → ¬ 𝑧(𝑊𝑋)𝑤)
9733ad2antrr 757 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑊𝑋) We 𝑋)
98 weso 5016 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑊𝑋) We 𝑋 → (𝑊𝑋) Or 𝑋)
9997, 98syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑊𝑋) Or 𝑋)
10014ad2antrr 757 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑌𝑋)
101100sselda 3564 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑤𝑋)
102 sotric 4972 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑊𝑋) Or 𝑋 ∧ (𝑤𝑋𝑧𝑋)) → (𝑤(𝑊𝑋)𝑧 ↔ ¬ (𝑤 = 𝑧𝑧(𝑊𝑋)𝑤)))
103 ioran 509 . . . . . . . . . . . . . . . . . . . . . . 23 (¬ (𝑤 = 𝑧𝑧(𝑊𝑋)𝑤) ↔ (¬ 𝑤 = 𝑧 ∧ ¬ 𝑧(𝑊𝑋)𝑤))
104102, 103syl6bb 274 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑊𝑋) Or 𝑋 ∧ (𝑤𝑋𝑧𝑋)) → (𝑤(𝑊𝑋)𝑧 ↔ (¬ 𝑤 = 𝑧 ∧ ¬ 𝑧(𝑊𝑋)𝑤)))
10599, 101, 77, 104syl12anc 1315 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → (𝑤(𝑊𝑋)𝑧 ↔ (¬ 𝑤 = 𝑧 ∧ ¬ 𝑧(𝑊𝑋)𝑤)))
10670, 96, 105mpbir2and 958 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑤(𝑊𝑋)𝑧)
107106, 47sylibr 222 . . . . . . . . . . . . . . . . . . 19 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑤𝑌) → 𝑤 ∈ ((𝑊𝑋) “ {𝑧}))
108107ex 448 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑤𝑌𝑤 ∈ ((𝑊𝑋) “ {𝑧})))
109108ssrdv 3570 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑌 ⊆ ((𝑊𝑋) “ {𝑧}))
110 simprr 791 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)
111109, 110eqssd 3581 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑌 = ((𝑊𝑋) “ {𝑧}))
112 in32 3783 . . . . . . . . . . . . . . . . . 18 (((𝑊𝑋) ∩ (𝑋 × 𝑌)) ∩ (𝑌 × 𝑌)) = (((𝑊𝑋) ∩ (𝑌 × 𝑌)) ∩ (𝑋 × 𝑌))
113 simplrr 796 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))
114113ineq1d 3771 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑅 ∩ (𝑌 × 𝑌)) = (((𝑊𝑋) ∩ (𝑋 × 𝑌)) ∩ (𝑌 × 𝑌)))
11589ad2antrr 757 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑅 ⊆ (𝑌 × 𝑌))
116 df-ss 3550 . . . . . . . . . . . . . . . . . . . 20 (𝑅 ⊆ (𝑌 × 𝑌) ↔ (𝑅 ∩ (𝑌 × 𝑌)) = 𝑅)
117115, 116sylib 206 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑅 ∩ (𝑌 × 𝑌)) = 𝑅)
118114, 117eqtr3d 2642 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (((𝑊𝑋) ∩ (𝑋 × 𝑌)) ∩ (𝑌 × 𝑌)) = 𝑅)
119 inss2 3792 . . . . . . . . . . . . . . . . . . . 20 ((𝑊𝑋) ∩ (𝑌 × 𝑌)) ⊆ (𝑌 × 𝑌)
120 xpss1 5137 . . . . . . . . . . . . . . . . . . . . 21 (𝑌𝑋 → (𝑌 × 𝑌) ⊆ (𝑋 × 𝑌))
121100, 120syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑌 × 𝑌) ⊆ (𝑋 × 𝑌))
122119, 121syl5ss 3575 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → ((𝑊𝑋) ∩ (𝑌 × 𝑌)) ⊆ (𝑋 × 𝑌))
123 df-ss 3550 . . . . . . . . . . . . . . . . . . 19 (((𝑊𝑋) ∩ (𝑌 × 𝑌)) ⊆ (𝑋 × 𝑌) ↔ (((𝑊𝑋) ∩ (𝑌 × 𝑌)) ∩ (𝑋 × 𝑌)) = ((𝑊𝑋) ∩ (𝑌 × 𝑌)))
124122, 123sylib 206 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (((𝑊𝑋) ∩ (𝑌 × 𝑌)) ∩ (𝑋 × 𝑌)) = ((𝑊𝑋) ∩ (𝑌 × 𝑌)))
125112, 118, 1243eqtr3a 2664 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑅 = ((𝑊𝑋) ∩ (𝑌 × 𝑌)))
126111sqxpeqd 5052 . . . . . . . . . . . . . . . . . 18 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑌 × 𝑌) = (((𝑊𝑋) “ {𝑧}) × ((𝑊𝑋) “ {𝑧})))
127126ineq2d 3772 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → ((𝑊𝑋) ∩ (𝑌 × 𝑌)) = ((𝑊𝑋) ∩ (((𝑊𝑋) “ {𝑧}) × ((𝑊𝑋) “ {𝑧}))))
128125, 127eqtrd 2640 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑅 = ((𝑊𝑋) ∩ (((𝑊𝑋) “ {𝑧}) × ((𝑊𝑋) “ {𝑧}))))
129111, 128oveq12d 6542 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑌𝐹𝑅) = (((𝑊𝑋) “ {𝑧})𝐹((𝑊𝑋) ∩ (((𝑊𝑋) “ {𝑧}) × ((𝑊𝑋) “ {𝑧})))))
13019adantr 479 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝐴 ∈ V)
13123adantr 479 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑋𝑊(𝑊𝑋))
132131ad2antrr 757 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → 𝑋𝑊(𝑊𝑋))
1331, 130, 132fpwwe2lem3 9308 . . . . . . . . . . . . . . . 16 (((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) ∧ 𝑧𝑋) → (((𝑊𝑋) “ {𝑧})𝐹((𝑊𝑋) ∩ (((𝑊𝑋) “ {𝑧}) × ((𝑊𝑋) “ {𝑧})))) = 𝑧)
13476, 133mpdan 698 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (((𝑊𝑋) “ {𝑧})𝐹((𝑊𝑋) ∩ (((𝑊𝑋) “ {𝑧}) × ((𝑊𝑋) “ {𝑧})))) = 𝑧)
135129, 134eqtrd 2640 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → (𝑌𝐹𝑅) = 𝑧)
136135, 65eqneltrd 2703 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) ∧ (𝑧 ∈ (𝑋𝑌) ∧ ((𝑊𝑋) “ {𝑧}) ⊆ 𝑌)) → ¬ (𝑌𝐹𝑅) ∈ 𝑌)
137136rexlimdvaa 3010 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (∃𝑧 ∈ (𝑋𝑌)((𝑊𝑋) “ {𝑧}) ⊆ 𝑌 → ¬ (𝑌𝐹𝑅) ∈ 𝑌))
13863, 137sylbid 228 . . . . . . . . . . 11 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (∃𝑧 ∈ (𝑋𝑌)∀𝑤 ∈ (𝑋𝑌) ¬ 𝑤(𝑊𝑋)𝑧 → ¬ (𝑌𝐹𝑅) ∈ 𝑌))
13939, 138syld 45 . . . . . . . . . 10 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑋𝑌) ≠ ∅ → ¬ (𝑌𝐹𝑅) ∈ 𝑌))
140139necon4ad 2797 . . . . . . . . 9 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → ((𝑌𝐹𝑅) ∈ 𝑌 → (𝑋𝑌) = ∅))
14117, 140mpd 15 . . . . . . . 8 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → (𝑋𝑌) = ∅)
142 ssdif0 3892 . . . . . . . 8 (𝑋𝑌 ↔ (𝑋𝑌) = ∅)
143141, 142sylibr 222 . . . . . . 7 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))) → 𝑋𝑌)
144143ex 448 . . . . . 6 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → ((𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌))) → 𝑋𝑌))
1453adantlr 746 . . . . . . 7 (((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) ∧ (𝑥𝐴𝑟 ⊆ (𝑥 × 𝑥) ∧ 𝑟 We 𝑥)) → (𝑥𝐹𝑟) ∈ 𝐴)
146 simprl 789 . . . . . . 7 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑌𝑊𝑅)
1471, 18, 145, 131, 146fpwwe2lem10 9314 . . . . . 6 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → ((𝑋𝑌 ∧ (𝑊𝑋) = (𝑅 ∩ (𝑌 × 𝑋))) ∨ (𝑌𝑋𝑅 = ((𝑊𝑋) ∩ (𝑋 × 𝑌)))))
14816, 144, 147mpjaod 394 . . . . 5 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑋𝑌)
14914, 148eqssd 3581 . . . 4 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑌 = 𝑋)
1507adantr 479 . . . . . 6 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → Fun 𝑊)
151149, 146eqbrtrrd 4598 . . . . . 6 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑋𝑊𝑅)
152 funbrfv 6126 . . . . . 6 (Fun 𝑊 → (𝑋𝑊𝑅 → (𝑊𝑋) = 𝑅))
153150, 151, 152sylc 62 . . . . 5 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → (𝑊𝑋) = 𝑅)
154153eqcomd 2612 . . . 4 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → 𝑅 = (𝑊𝑋))
155149, 154jca 552 . . 3 ((𝜑 ∧ (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)) → (𝑌 = 𝑋𝑅 = (𝑊𝑋)))
156155ex 448 . 2 (𝜑 → ((𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌) → (𝑌 = 𝑋𝑅 = (𝑊𝑋))))
1571, 2, 3, 4fpwwe2lem13 9317 . . . 4 (𝜑 → (𝑋𝐹(𝑊𝑋)) ∈ 𝑋)
15823, 157jca 552 . . 3 (𝜑 → (𝑋𝑊(𝑊𝑋) ∧ (𝑋𝐹(𝑊𝑋)) ∈ 𝑋))
159 breq12 4579 . . . 4 ((𝑌 = 𝑋𝑅 = (𝑊𝑋)) → (𝑌𝑊𝑅𝑋𝑊(𝑊𝑋)))
160 oveq12 6533 . . . . 5 ((𝑌 = 𝑋𝑅 = (𝑊𝑋)) → (𝑌𝐹𝑅) = (𝑋𝐹(𝑊𝑋)))
161 simpl 471 . . . . 5 ((𝑌 = 𝑋𝑅 = (𝑊𝑋)) → 𝑌 = 𝑋)
162160, 161eleq12d 2678 . . . 4 ((𝑌 = 𝑋𝑅 = (𝑊𝑋)) → ((𝑌𝐹𝑅) ∈ 𝑌 ↔ (𝑋𝐹(𝑊𝑋)) ∈ 𝑋))
163159, 162anbi12d 742 . . 3 ((𝑌 = 𝑋𝑅 = (𝑊𝑋)) → ((𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌) ↔ (𝑋𝑊(𝑊𝑋) ∧ (𝑋𝐹(𝑊𝑋)) ∈ 𝑋)))
164158, 163syl5ibrcom 235 . 2 (𝜑 → ((𝑌 = 𝑋𝑅 = (𝑊𝑋)) → (𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌)))
165156, 164impbid 200 1 (𝜑 → ((𝑌𝑊𝑅 ∧ (𝑌𝐹𝑅) ∈ 𝑌) ↔ (𝑌 = 𝑋𝑅 = (𝑊𝑋))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 194  wo 381  wa 382  w3a 1030   = wceq 1474  wcel 1976  wne 2776  wral 2892  wrex 2893  Vcvv 3169  [wsbc 3398  cdif 3533  cin 3535  wss 3536  c0 3870  𝒫 cpw 4104  {csn 4121   cuni 4363   class class class wbr 4574  {copab 4633   Or wor 4945   Fr wfr 4981   We wwe 4983   × cxp 5023  ccnv 5024  dom cdm 5025  cima 5028  Fun wfun 5781  wf 5783  cfv 5787  (class class class)co 6524
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-8 1978  ax-9 1985  ax-10 2005  ax-11 2020  ax-12 2032  ax-13 2229  ax-ext 2586  ax-rep 4690  ax-sep 4700  ax-nul 4709  ax-pow 4761  ax-pr 4825  ax-un 6821
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3or 1031  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867  df-eu 2458  df-mo 2459  df-clab 2593  df-cleq 2599  df-clel 2602  df-nfc 2736  df-ne 2778  df-ral 2897  df-rex 2898  df-reu 2899  df-rmo 2900  df-rab 2901  df-v 3171  df-sbc 3399  df-csb 3496  df-dif 3539  df-un 3541  df-in 3543  df-ss 3550  df-pss 3552  df-nul 3871  df-if 4033  df-pw 4106  df-sn 4122  df-pr 4124  df-tp 4126  df-op 4128  df-uni 4364  df-iun 4448  df-br 4575  df-opab 4635  df-mpt 4636  df-tr 4672  df-eprel 4936  df-id 4940  df-po 4946  df-so 4947  df-fr 4984  df-se 4985  df-we 4986  df-xp 5031  df-rel 5032  df-cnv 5033  df-co 5034  df-dm 5035  df-rn 5036  df-res 5037  df-ima 5038  df-pred 5580  df-ord 5626  df-on 5627  df-lim 5628  df-suc 5629  df-iota 5751  df-fun 5789  df-fn 5790  df-f 5791  df-f1 5792  df-fo 5793  df-f1o 5794  df-fv 5795  df-isom 5796  df-riota 6486  df-ov 6527  df-wrecs 7268  df-recs 7329  df-oi 8272
This theorem is referenced by:  fpwwe  9321  canthwelem  9325  pwfseqlem4  9337
  Copyright terms: Public domain W3C validator