Table of ContentsTable of Contents Mathbox for Jeff Hankins < Previous   Next >
Related theorems
Unicode version

Theorem compfipin0lem 15435
Description: Lemma for compfipin0 15436.
Assertion
Ref Expression
compfipin0lem |- (J e. Top -> (A.x e. ~P (Clsd` J)(A.w e. (~Px i^i Fin) -. (/) = |^|w -> -. (/) = |^|x) -> A.y e. ~P J(A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y)))
Distinct variable group:   x,w,y,z,J

Proof of Theorem compfipin0lem
StepHypRef Expression
1 imassrn 4278 . . . . . . 7 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))}
2 eqid 1884 . . . . . . . . . 10 |- U.J = U.J
3 eqid 1884 . . . . . . . . . 10 |- {<.r, s>. | (r e. J /\ s = (U.J \ r))} = {<.r, s>. | (r e. J /\ s = (U.J \ r))}
42, 3opncldf1 15402 . . . . . . . . 9 |- (J e. Top -> {<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1-onto->(Clsd` J))
5 f1ofo 4643 . . . . . . . . 9 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1-onto->(Clsd` J) -> {<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-onto->(Clsd` J))
6 forn 4620 . . . . . . . . 9 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-onto->(Clsd` J) -> ran {<.r, s>. | (r e. J /\ s = (U.J \ r))} = (Clsd` J))
74, 5, 63syl 24 . . . . . . . 8 |- (J e. Top -> ran {<.r, s>. | (r e. J /\ s = (U.J \ r))} = (Clsd` J))
87sseq2d 2645 . . . . . . 7 |- (J e. Top -> (({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))} <-> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ (Clsd` J)))
91, 8mpbii 210 . . . . . 6 |- (J e. Top -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ (Clsd` J))
10 fvex 4689 . . . . . . 7 |- (Clsd` J) e. _V
1110elpw2 3464 . . . . . 6 |- (({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) e. ~P(Clsd` J) <-> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ (Clsd` J))
129, 11sylibr 217 . . . . 5 |- (J e. Top -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) e. ~P(Clsd` J))
1312adantr 425 . . . 4 |- ((J e. Top /\ y e. ~PJ) -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) e. ~P(Clsd` J))
14 pweq 3036 . . . . . . . 8 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> ~Px = ~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))
1514ineq1d 2795 . . . . . . 7 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> (~Px i^i Fin) = (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin))
1615raleqdv 2269 . . . . . 6 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> (A.w e. (~Px i^i Fin) -. (/) = |^|w <-> A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w))
17 inteq 3217 . . . . . . . 8 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> |^|x = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))
1817eqeq2d 1895 . . . . . . 7 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> ((/) = |^|x <-> (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)))
1918notbid 673 . . . . . 6 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> (-. (/) = |^|x <-> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)))
2016, 19imbi12d 688 . . . . 5 |- (x = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> ((A.w e. (~Px i^i Fin) -. (/) = |^|w -> -. (/) = |^|x) <-> (A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))))
2120rcla4v 2376 . . . 4 |- (({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) e. ~P(Clsd` J) -> (A.x e. ~P (Clsd` J)(A.w e. (~Px i^i Fin) -. (/) = |^|w -> -. (/) = |^|x) -> (A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))))
2213, 21syl 12 . . 3 |- ((J e. Top /\ y e. ~PJ) -> (A.x e. ~P (Clsd` J)(A.w e. (~Px i^i Fin) -. (/) = |^|w -> -. (/) = |^|x) -> (A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))))
23 elin 2786 . . . . . . . . . 10 |- ((/) e. (~Py i^i Fin) <-> ((/) e. ~Py /\ (/) e. Fin))
24 0elpw 3473 . . . . . . . . . 10 |- (/) e. ~Py
25 emfin 10165 . . . . . . . . . 10 |- (/) e. Fin
2623, 24, 25mpbir2an 800 . . . . . . . . 9 |- (/) e. (~Py i^i Fin)
27 uni0 3205 . . . . . . . . . 10 |- U.(/) = (/)
2827eqcomi 1888 . . . . . . . . 9 |- (/) = U.(/)
29 unieq 3185 . . . . . . . . . . 11 |- (z = (/) -> U.z = U.(/))
3029eqeq2d 1895 . . . . . . . . . 10 |- (z = (/) -> ((/) = U.z <-> (/) = U.(/)))
3130rcla4ev 2381 . . . . . . . . 9 |- (((/) e. (~Py i^i Fin) /\ (/) = U.(/)) -> E.z e. (~Py i^i Fin)(/) = U.z)
3226, 28, 31mp2an 761 . . . . . . . 8 |- E.z e. (~Py i^i Fin)(/) = U.z
33 eqeq1 1890 . . . . . . . . 9 |- (U.J = (/) -> (U.J = U.z <-> (/) = U.z))
3433rexbidv 2124 . . . . . . . 8 |- (U.J = (/) -> (E.z e. (~Py i^i Fin)U.J = U.z <-> E.z e. (~Py i^i Fin)(/) = U.z))
3532, 34mpbiri 211 . . . . . . 7 |- (U.J = (/) -> E.z e. (~Py i^i Fin)U.J = U.z)
36 dfrex2 2116 . . . . . . 7 |- (E.z e. (~Py i^i Fin)U.J = U.z <-> -. A.z e. (~Py i^i Fin) -. U.J = U.z)
3735, 36sylib 215 . . . . . 6 |- (U.J = (/) -> -. A.z e. (~Py i^i Fin) -. U.J = U.z)
3837pm2.21d 94 . . . . 5 |- (U.J = (/) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y))
3938a1i13 15326 . . . 4 |- ((J e. Top /\ y e. ~PJ) -> (U.J = (/) -> ((A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y))))
40 elin 2786 . . . . . . . . . . . . 13 |- ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. (~Py i^i Fin) <-> ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. ~Py /\ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. Fin))
41 imass2 4299 . . . . . . . . . . . . . . . . . 18 |- (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)))
4241adantl 424 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ) /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)))
43 f1imacnv 4656 . . . . . . . . . . . . . . . . . . . 20 |- (({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1->(Clsd` J) /\ y C_ J) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) = y)
44 f1of1 4634 . . . . . . . . . . . . . . . . . . . . 21 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1-onto->(Clsd` J) -> {<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1->(Clsd` J))
454, 44syl 12 . . . . . . . . . . . . . . . . . . . 20 |- (J e. Top -> {<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1->(Clsd` J))
4643, 45sylan 497 . . . . . . . . . . . . . . . . . . 19 |- ((J e. Top /\ y C_ J) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) = y)
47 visset 2295 . . . . . . . . . . . . . . . . . . . 20 |- y e. _V
4847elpw 3037 . . . . . . . . . . . . . . . . . . 19 |- (y e. ~PJ <-> y C_ J)
4946, 48sylan2b 501 . . . . . . . . . . . . . . . . . 18 |- ((J e. Top /\ y e. ~PJ) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) = y)
5049adantr 425 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ) /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) = y)
5142, 50sseqtrd 2653 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ) /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ y)
52513adantl3 1034 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ y)
5352adantrr 431 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ y)
54 f1ocnv 4651 . . . . . . . . . . . . . . . . . 18 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1-onto->(Clsd` J) -> `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1-onto->J)
55 f1ofun 4637 . . . . . . . . . . . . . . . . . . 19 |- (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1-onto->J -> Fun `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
56 visset 2295 . . . . . . . . . . . . . . . . . . . 20 |- w e. _V
5756funimaex 4496 . . . . . . . . . . . . . . . . . . 19 |- (Fun `'{<.r, s>. | (r e. J /\ s = (U.J \ r))} -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V)
5855, 57syl 12 . . . . . . . . . . . . . . . . . 18 |- (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1-onto->J -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V)
594, 54, 583syl 24 . . . . . . . . . . . . . . . . 17 |- (J e. Top -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V)
60593ad2ant1 897 . . . . . . . . . . . . . . . 16 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V)
6160adantr 425 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V)
62 elpwg 3038 . . . . . . . . . . . . . . 15 |- ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V -> ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. ~Py <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ y))
6361, 62syl 12 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. ~Py <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) C_ y))
6453, 63mpbird 213 . . . . . . . . . . . . 13 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. ~Py)
65 simprr 451 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> w e. Fin)
66 f1of1 4634 . . . . . . . . . . . . . . . . . . . 20 |- (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1-onto->J -> `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1->J)
674, 54, 663syl 24 . . . . . . . . . . . . . . . . . . 19 |- (J e. Top -> `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1->J)
68673ad2ant1 897 . . . . . . . . . . . . . . . . . 18 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1->J)
6968adantr 425 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1->J)
707sseq2d 2645 . . . . . . . . . . . . . . . . . . . . 21 |- (J e. Top -> (w C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))} <-> w C_ (Clsd` J)))
7170biimpa 460 . . . . . . . . . . . . . . . . . . . 20 |- ((J e. Top /\ w C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))}) -> w C_ (Clsd` J))
72 sstr 2625 . . . . . . . . . . . . . . . . . . . . 21 |- ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))}) -> w C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))})
731, 72mpan2 760 . . . . . . . . . . . . . . . . . . . 20 |- (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> w C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))})
7471, 73sylan2 500 . . . . . . . . . . . . . . . . . . 19 |- ((J e. Top /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> w C_ (Clsd` J))
75743ad2antl1 1038 . . . . . . . . . . . . . . . . . 18 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> w C_ (Clsd` J))
7675adantrr 431 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> w C_ (Clsd` J))
77 f1ores 4654 . . . . . . . . . . . . . . . . 17 |- ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}:(Clsd` J)-1-1->J /\ w C_ (Clsd` J)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))} |` w):w-1-1-onto->(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
7869, 76, 77syl11anc 524 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))} |` w):w-1-1-onto->(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
7956f1oen 5457 . . . . . . . . . . . . . . . 16 |- ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))} |` w):w-1-1-onto->(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) -> w ~~ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
8078, 79syl 12 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> w ~~ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
81 enfi 5627 . . . . . . . . . . . . . . 15 |- (((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. _V /\ w ~~ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w)) -> (w e. Fin <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. Fin))
8261, 80, 81syl11anc 524 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (w e. Fin <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. Fin))
8365, 82mpbid 212 . . . . . . . . . . . . 13 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. Fin)
8440, 64, 83sylanbrc 527 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. (~Py i^i Fin))
85 unieq 3185 . . . . . . . . . . . . . . 15 |- (z = (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) -> U.z = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
8685eqeq2d 1895 . . . . . . . . . . . . . 14 |- (z = (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) -> (U.J = U.z <-> U.J = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w)))
8786notbid 673 . . . . . . . . . . . . 13 |- (z = (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) -> (-. U.J = U.z <-> -. U.J = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w)))
8887rcla4v 2376 . . . . . . . . . . . 12 |- ((`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) e. (~Py i^i Fin) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w)))
8984, 88syl 12 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w)))
90 difeq2 2719 . . . . . . . . . . . . . . 15 |- ((/) = |^|w -> (U.J \ (/)) = (U.J \ |^|w))
9190ad2antll 443 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> (U.J \ (/)) = (U.J \ |^|w))
92 dif0 2943 . . . . . . . . . . . . . 14 |- (U.J \ (/)) = U.J
93 intiin 3307 . . . . . . . . . . . . . . . 16 |- |^|w = |^|_v e. w v
9493difeq2i 2723 . . . . . . . . . . . . . . 15 |- (U.J \ |^|w) = (U.J \ |^|_v e. w v)
95 iundif2 3322 . . . . . . . . . . . . . . 15 |- U_v e. w (U.J \ v) = (U.J \ |^|_v e. w v)
9694, 95eqtr4i 1911 . . . . . . . . . . . . . 14 |- (U.J \ |^|w) = U_v e. w (U.J \ v)
9791, 92, 963eqtr3g 1952 . . . . . . . . . . . . 13 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> U.J = U_v e. w (U.J \ v))
98 uniexg 3795 . . . . . . . . . . . . . . . . . . 19 |- (J e. Top -> U.J e. _V)
99 difexg 3458 . . . . . . . . . . . . . . . . . . 19 |- (U.J e. _V -> (U.J \ v) e. _V)
10098, 99syl 12 . . . . . . . . . . . . . . . . . 18 |- (J e. Top -> (U.J \ v) e. _V)
1011003ad2ant1 897 . . . . . . . . . . . . . . . . 17 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (U.J \ v) e. _V)
102101adantr 425 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> (U.J \ v) e. _V)
103102a1d 15 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> (v e. w -> (U.J \ v) e. _V))
104103r19.21aiv 2175 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> A.v e. w (U.J \ v) e. _V)
105 dfiun2g 3283 . . . . . . . . . . . . . 14 |- (A.v e. w (U.J \ v) e. _V -> U_v e. w (U.J \ v) = U.{u | E.v e. w u = (U.J \ v)})
106104, 105syl 12 . . . . . . . . . . . . 13 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> U_v e. w (U.J \ v) = U.{u | E.v e. w u = (U.J \ v)})
107 simp1 876 . . . . . . . . . . . . . . . . . . . . . . . 24 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> J e. Top)
108107adantr 425 . . . . . . . . . . . . . . . . . . . . . . 23 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> J e. Top)
109 sstr 2625 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ (Clsd` J)) -> w C_ (Clsd` J))
110109ancoms 484 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ((({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ (Clsd` J) /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> w C_ (Clsd` J))
1111a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (J e. Top -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ ran {<.r, s>. | (r e. J /\ s = (U.J \ r))})
112111, 7sseqtrd 2653 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (J e. Top -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) C_ (Clsd` J))
113110, 112sylan 497 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ((J e. Top /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> w C_ (Clsd` J))
114113sseld 2619 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((J e. Top /\ w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (v e. w -> v e. (Clsd` J)))
115114impr 422 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ((J e. Top /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ v e. w)) -> v e. (Clsd` J))
116115adantrlr 437 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- ((J e. Top /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ v e. w)) -> v e. (Clsd` J))
117116adantrlr 437 . . . . . . . . . . . . . . . . . . . . . . . 24 |- ((J e. Top /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> v e. (Clsd` J))
1181173ad2antl1 1038 . . . . . . . . . . . . . . . . . . . . . . 23 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> v e. (Clsd` J))
1192, 3opncldf3 15404 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((J e. Top /\ v e. (Clsd` J)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = (U.J \ v))
120108, 118, 119syl11anc 524 . . . . . . . . . . . . . . . . . . . . . 22 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = (U.J \ v))
121120eqcomd 1889 . . . . . . . . . . . . . . . . . . . . 21 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> (U.J \ v) = (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v))
122121eqeq1d 1892 . . . . . . . . . . . . . . . . . . . 20 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> ((U.J \ v) = u <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u))
123 eqcom 1886 . . . . . . . . . . . . . . . . . . . 20 |- (u = (U.J \ v) <-> (U.J \ v) = u)
124122, 123syl5bb 591 . . . . . . . . . . . . . . . . . . 19 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w) /\ v e. w)) -> (u = (U.J \ v) <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u))
125124expr 418 . . . . . . . . . . . . . . . . . 18 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> (v e. w -> (u = (U.J \ v) <-> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u)))
126125pm5.32d 709 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> ((v e. w /\ u = (U.J \ v)) <-> (v e. w /\ (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u)))
127126rexbidv2 2126 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> (E.v e. w u = (U.J \ v) <-> E.v e. w (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u))
128127abbidv 2008 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> {u | E.v e. w u = (U.J \ v)} = {u | E.v e. w (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u})
1294, 54, 553syl 24 . . . . . . . . . . . . . . . . . 18 |- (J e. Top -> Fun `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
1301293ad2ant1 897 . . . . . . . . . . . . . . . . 17 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> Fun `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
131130adantr 425 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> Fun `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
132 df-rn 4005 . . . . . . . . . . . . . . . . . . 19 |- ran {<.r, s>. | (r e. J /\ s = (U.J \ r))} = dom `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}
13373, 132syl6ss 2663 . . . . . . . . . . . . . . . . . 18 |- (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> w C_ dom `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
134133adantr 425 . . . . . . . . . . . . . . . . 17 |- ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) -> w C_ dom `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
135134ad2antrl 442 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> w C_ dom `'{<.r, s>. | (r e. J /\ s = (U.J \ r))})
136 dfimafn 4720 . . . . . . . . . . . . . . . 16 |- ((Fun `'{<.r, s>. | (r e. J /\ s = (U.J \ r))} /\ w C_ dom `'{<.r, s>. | (r e. J /\ s = (U.J \ r))}) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) = {u | E.v e. w (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u})
137131, 135, 136syl11anc 524 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w) = {u | E.v e. w (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u})
138128, 137eqtr4d 1928 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> {u | E.v e. w u = (U.J \ v)} = (`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
139138unieqd 3188 . . . . . . . . . . . . 13 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> U.{u | E.v e. w u = (U.J \ v)} = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
14097, 106, 1393eqtrd 1929 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) /\ (/) = |^|w)) -> U.J = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w))
141140expr 418 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> ((/) = |^|w -> U.J = U.(`'{<.r, s>. | (r e. J /\ s = (U.J \ r))}"w)))
14289, 141nsyld 132 . . . . . . . . . 10 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. (/) = |^|w))
143142ex 402 . . . . . . . . 9 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> ((w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. (/) = |^|w)))
144 elin 2786 . . . . . . . . . 10 |- (w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) <-> (w e. ~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin))
14556elpw 3037 . . . . . . . . . . 11 |- (w e. ~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) <-> w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))
146145anbi1i 539 . . . . . . . . . 10 |- ((w e. ~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin) <-> (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin))
147144, 146bitri 190 . . . . . . . . 9 |- (w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) <-> (w C_ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) /\ w e. Fin))
148143, 147syl5ib 223 . . . . . . . 8 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. (/) = |^|w)))
149148com23 36 . . . . . . 7 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> (w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -> -. (/) = |^|w)))
150149r19.21adv 2181 . . . . . 6 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w))
151 difeq2 2719 . . . . . . . . . . . 12 |- (U.J = U.y -> (U.J \ U.J) = (U.J \ U.y))
152151adantl 424 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (U.J \ U.J) = (U.J \ U.y))
153 difid 2942 . . . . . . . . . . 11 |- (U.J \ U.J) = (/)
154 uniiun 3306 . . . . . . . . . . . 12 |- U.y = U_v e. y v
155154difeq2i 2723 . . . . . . . . . . 11 |- (U.J \ U.y) = (U.J \ U_v e. y v)
156152, 153, 1553eqtr3g 1952 . . . . . . . . . 10 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (/) = (U.J \ U_v e. y v))
157 eqtr 1904 . . . . . . . . . . . . . . . . . . . 20 |- ((U.J = U.y /\ U.y = (/)) -> U.J = (/))
158157ex 402 . . . . . . . . . . . . . . . . . . 19 |- (U.J = U.y -> (U.y = (/) -> U.J = (/)))
159158adantl 424 . . . . . . . . . . . . . . . . . 18 |- (((J e. Top /\ y e. ~PJ) /\ U.J = U.y) -> (U.y = (/) -> U.J = (/)))
160 unieq 3185 . . . . . . . . . . . . . . . . . . 19 |- (y = (/) -> U.y = U.(/))
161160, 27syl6eq 1944 . . . . . . . . . . . . . . . . . 18 |- (y = (/) -> U.y = (/))
162159, 161syl5 20 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ) /\ U.J = U.y) -> (y = (/) -> U.J = (/)))
163162con3d 111 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ) /\ U.J = U.y) -> (-. U.J = (/) -> -. y = (/)))
164163ex 402 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ y e. ~PJ) -> (U.J = U.y -> (-. U.J = (/) -> -. y = (/))))
165164com23 36 . . . . . . . . . . . . . 14 |- ((J e. Top /\ y e. ~PJ) -> (-. U.J = (/) -> (U.J = U.y -> -. y = (/))))
1661653impia 1064 . . . . . . . . . . . . 13 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (U.J = U.y -> -. y = (/)))
167166imp 377 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> -. y = (/))
168 df-ne 2019 . . . . . . . . . . . 12 |- (y =/= (/) <-> -. y = (/))
169167, 168sylibr 217 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> y =/= (/))
170 iindif2 3324 . . . . . . . . . . 11 |- (y =/= (/) -> |^|_v e. y (U.J \ v) = (U.J \ U_v e. y v))
171169, 170syl 12 . . . . . . . . . 10 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> |^|_v e. y (U.J \ v) = (U.J \ U_v e. y v))
172156, 171eqtr4d 1928 . . . . . . . . 9 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (/) = |^|_v e. y (U.J \ v))
173101adantr 425 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (U.J \ v) e. _V)
174173a1d 15 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (v e. y -> (U.J \ v) e. _V))
175174r19.21aiv 2175 . . . . . . . . . 10 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> A.v e. y (U.J \ v) e. _V)
176 dfiin2g 3286 . . . . . . . . . 10 |- (A.v e. y (U.J \ v) e. _V -> |^|_v e. y (U.J \ v) = |^|{u | E.v e. y u = (U.J \ v)})
177175, 176syl 12 . . . . . . . . 9 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> |^|_v e. y (U.J \ v) = |^|{u | E.v e. y u = (U.J \ v)})
178107adantr 425 . . . . . . . . . . . . . . . . . . 19 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (U.J = U.y /\ v e. y)) -> J e. Top)
179 ssel2 2616 . . . . . . . . . . . . . . . . . . . . . 22 |- ((y C_ J /\ v e. y) -> v e. J)
180179, 48sylanb 498 . . . . . . . . . . . . . . . . . . . . 21 |- ((y e. ~PJ /\ v e. y) -> v e. J)
1811803ad2antl2 1039 . . . . . . . . . . . . . . . . . . . 20 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ v e. y) -> v e. J)
182181adantrl 430 . . . . . . . . . . . . . . . . . . 19 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (U.J = U.y /\ v e. y)) -> v e. J)
1832, 3opncldf2 15403 . . . . . . . . . . . . . . . . . . 19 |- ((J e. Top /\ v e. J) -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = (U.J \ v))
184178, 182, 183syl11anc 524 . . . . . . . . . . . . . . . . . 18 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (U.J = U.y /\ v e. y)) -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = (U.J \ v))
185184eqcomd 1889 . . . . . . . . . . . . . . . . 17 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (U.J = U.y /\ v e. y)) -> (U.J \ v) = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v))
186185eqeq1d 1892 . . . . . . . . . . . . . . . 16 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (U.J = U.y /\ v e. y)) -> ((U.J \ v) = u <-> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u))
187186, 123syl5bb 591 . . . . . . . . . . . . . . 15 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ (U.J = U.y /\ v e. y)) -> (u = (U.J \ v) <-> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u))
188187expr 418 . . . . . . . . . . . . . 14 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (v e. y -> (u = (U.J \ v) <-> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u)))
189188pm5.32d 709 . . . . . . . . . . . . 13 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> ((v e. y /\ u = (U.J \ v)) <-> (v e. y /\ ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u)))
190189rexbidv2 2126 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (E.v e. y u = (U.J \ v) <-> E.v e. y ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u))
191190abbidv 2008 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> {u | E.v e. y u = (U.J \ v)} = {u | E.v e. y ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u})
192 f1ofun 4637 . . . . . . . . . . . . . . 15 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1-onto->(Clsd` J) -> Fun {<.r, s>. | (r e. J /\ s = (U.J \ r))})
1934, 192syl 12 . . . . . . . . . . . . . 14 |- (J e. Top -> Fun {<.r, s>. | (r e. J /\ s = (U.J \ r))})
1941933ad2ant1 897 . . . . . . . . . . . . 13 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> Fun {<.r, s>. | (r e. J /\ s = (U.J \ r))})
195194adantr 425 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> Fun {<.r, s>. | (r e. J /\ s = (U.J \ r))})
196 f1ofn 4636 . . . . . . . . . . . . . . . . . 18 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))}:J-1-1-onto->(Clsd` J) -> {<.r, s>. | (r e. J /\ s = (U.J \ r))} Fn J)
197 fndm 4512 . . . . . . . . . . . . . . . . . 18 |- ({<.r, s>. | (r e. J /\ s = (U.J \ r))} Fn J -> dom {<.r, s>. | (r e. J /\ s = (U.J \ r))} = J)
1984, 196, 1973syl 24 . . . . . . . . . . . . . . . . 17 |- (J e. Top -> dom {<.r, s>. | (r e. J /\ s = (U.J \ r))} = J)
199198sseq2d 2645 . . . . . . . . . . . . . . . 16 |- (J e. Top -> (y C_ dom {<.r, s>. | (r e. J /\ s = (U.J \ r))} <-> y C_ J))
200199biimpar 461 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ y C_ J) -> y C_ dom {<.r, s>. | (r e. J /\ s = (U.J \ r))})
201200, 48sylan2b 501 . . . . . . . . . . . . . 14 |- ((J e. Top /\ y e. ~PJ) -> y C_ dom {<.r, s>. | (r e. J /\ s = (U.J \ r))})
2022013adant3 896 . . . . . . . . . . . . 13 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> y C_ dom {<.r, s>. | (r e. J /\ s = (U.J \ r))})
203202adantr 425 . . . . . . . . . . . 12 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> y C_ dom {<.r, s>. | (r e. J /\ s = (U.J \ r))})
204 dfimafn 4720 . . . . . . . . . . . 12 |- ((Fun {<.r, s>. | (r e. J /\ s = (U.J \ r))} /\ y C_ dom {<.r, s>. | (r e. J /\ s = (U.J \ r))}) -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) = {u | E.v e. y ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u})
205195, 203, 204syl11anc 524 . . . . . . . . . . 11 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) = {u | E.v e. y ({<.r, s>. | (r e. J /\ s = (U.J \ r))}` v) = u})
206191, 205eqtr4d 1928 . . . . . . . . . 10 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> {u | E.v e. y u = (U.J \ v)} = ({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))
207206inteqd 3219 . . . . . . . . 9 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> |^|{u | E.v e. y u = (U.J \ v)} = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))
208172, 177, 2073eqtrd 1929 . . . . . . . 8 |- (((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) /\ U.J = U.y) -> (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y))
209208ex 402 . . . . . . 7 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (U.J = U.y -> (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)))
210209con3d 111 . . . . . 6 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> (-. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) -> -. U.J = U.y))
211150, 210imim12d 69 . . . . 5 |- ((J e. Top /\ y e. ~PJ /\ -. U.J = (/)) -> ((A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y)))
2122113expia 1069 . . . 4 |- ((J e. Top /\ y e. ~PJ) -> (-. U.J = (/) -> ((A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y))))
21339, 212pm2.61d 141 . . 3 |- ((J e. Top /\ y e. ~PJ) -> ((A.w e. (~P({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y) i^i Fin) -. (/) = |^|w -> -. (/) = |^|({<.r, s>. | (r e. J /\ s = (U.J \ r))}"y)) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y)))
21422, 213syld 30 . 2 |- ((J e. Top /\ y e. ~PJ) -> (A.x e. ~P (Clsd` J)(A.w e. (~Px i^i Fin) -. (/) = |^|w -> -. (/) = |^|x) -> (A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y)))
215214r19.21adva 2182 1 |- (J e. Top -> (A.x e. ~P (Clsd` J)(A.w e. (~Px i^i Fin) -. (/) = |^|w -> -. (/) = |^|x) -> A.y e. ~P J(A.z e. (~Py i^i Fin) -. U.J = U.z -> -. U.J = U.y)))
Colors of variables: wff set class
Syntax hints:  -. wn 2   -> wi 3   <-> wb 163   /\ wa 240   /\ w3a 858   = wceq 1298   e. wcel 1300  {cab 1871   =/= wne 2017  A.wral 2105  E.wrex 2106  _Vcvv 2292   \ cdif 2590   i^i cin 2592   C_ wss 2593  (/)c0 2875  ~Pcpw 3032  U.cuni 3177  |^|cint 3214  U_ciun 3255  |^|_ciin 3256   class class class wbr 3338  {copab 3395  `'ccnv 3985  dom cdm 3986  ran crn 3987   |` cres 3988  "cima 3989  Fun wfun 3992   Fn wfn 3993  -1-1->wf1 3995  -onto->wfo 3996  -1-1-onto->wf1o 3997  ` cfv 3998   ~~ cen 5423  Fincfn 5426  Topctop 8857  Clsdccld 8936
This theorem is referenced by:  compfipin0 15436
This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 1304  ax-gen 1305  ax-8 1306  ax-9 1307  ax-10 1308  ax-11 1309  ax-12 1310  ax-13 1311  ax-14 1312  ax-17 1317  ax-4 1319  ax-5o 1321  ax-6o 1324  ax-9o 1481  ax-10o 1500  ax-16 1580  ax-11o 1588  ax-ext 1865  ax-rep 3428  ax-sep 3438  ax-nul 3445  ax-pow 3481  ax-pr 3524  ax-un 3790
This theorem depends on definitions:  df-bi 164  df-or 241  df-an 242  df-3or 859  df-3an 860  df-ex 1327  df-sb 1536  df-eu 1775  df-mo 1776  df-clab 1872  df-cleq 1877  df-clel 1880  df-ne 2019  df-ral 2109  df-rex 2110  df-rab 2112  df-v 2294  df-dif 2597  df-un 2600  df-in 2603  df-ss 2605  df-pss 2607  df-nul 2876  df-if 2983  df-pw 3035  df-sn 3049  df-pr 3050  df-tp 3052  df-op 3053  df-uni 3178  df-int 3215  df-iun 3257  df-iin 3258  df-br 3339  df-opab 3396  df-tr 3412  df-eprel 3583  df-id 3586  df-po 3591  df-so 3604  df-fr 3625  df-we 3644  df-ord 3660  df-on 3661  df-lim 3662  df-suc 3663  df-om 3950  df-xp 4000  df-rel 4001  df-cnv 4002  df-co 4003  df-dm 4004  df-rn 4005  df-res 4006  df-ima 4007  df-fun 4008  df-fn 4009  df-f 4010  df-f1 4011  df-fo 4012  df-f1o 4013  df-fv 4014  df-er 5318  df-en 5427  df-fin 5430  df-cld 8939
Copyright terms: Public domain