Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ismrc Structured version   Visualization version   GIF version

Theorem ismrc 41027
Description: A function is a Moore closure operator iff it satisfies mrcssid 17498, mrcss 17497, and mrcidm 17500. (Contributed by Stefan O'Rear, 1-Feb-2015.)
Assertion
Ref Expression
ismrc (𝐹 ∈ (mrCls β€œ (Mooreβ€˜π΅)) ↔ (𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))))
Distinct variable groups:   π‘₯,𝐹,𝑦   π‘₯,𝐡,𝑦

Proof of Theorem ismrc
Dummy variables 𝑧 𝑀 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fnmrc 17488 . . . . 5 mrCls Fn βˆͺ ran Moore
2 fnfun 6603 . . . . 5 (mrCls Fn βˆͺ ran Moore β†’ Fun mrCls)
31, 2ax-mp 5 . . . 4 Fun mrCls
4 fvelima 6909 . . . 4 ((Fun mrCls ∧ 𝐹 ∈ (mrCls β€œ (Mooreβ€˜π΅))) β†’ βˆƒπ‘§ ∈ (Mooreβ€˜π΅)(mrClsβ€˜π‘§) = 𝐹)
53, 4mpan 689 . . 3 (𝐹 ∈ (mrCls β€œ (Mooreβ€˜π΅)) β†’ βˆƒπ‘§ ∈ (Mooreβ€˜π΅)(mrClsβ€˜π‘§) = 𝐹)
6 elfvex 6881 . . . . . 6 (𝑧 ∈ (Mooreβ€˜π΅) β†’ 𝐡 ∈ V)
7 eqid 2737 . . . . . . . 8 (mrClsβ€˜π‘§) = (mrClsβ€˜π‘§)
87mrcf 17490 . . . . . . 7 (𝑧 ∈ (Mooreβ€˜π΅) β†’ (mrClsβ€˜π‘§):𝒫 π΅βŸΆπ‘§)
9 mresspw 17473 . . . . . . 7 (𝑧 ∈ (Mooreβ€˜π΅) β†’ 𝑧 βŠ† 𝒫 𝐡)
108, 9fssd 6687 . . . . . 6 (𝑧 ∈ (Mooreβ€˜π΅) β†’ (mrClsβ€˜π‘§):𝒫 π΅βŸΆπ’« 𝐡)
117mrcssid 17498 . . . . . . . . . 10 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ π‘₯ βŠ† 𝐡) β†’ π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯))
1211adantrr 716 . . . . . . . . 9 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ (π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯)) β†’ π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯))
137mrcss 17497 . . . . . . . . . . 11 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ 𝑦 βŠ† π‘₯ ∧ π‘₯ βŠ† 𝐡) β†’ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯))
14133expb 1121 . . . . . . . . . 10 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ (𝑦 βŠ† π‘₯ ∧ π‘₯ βŠ† 𝐡)) β†’ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯))
1514ancom2s 649 . . . . . . . . 9 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ (π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯)) β†’ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯))
167mrcidm 17500 . . . . . . . . . 10 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ π‘₯ βŠ† 𝐡) β†’ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯))
1716adantrr 716 . . . . . . . . 9 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ (π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯)) β†’ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯))
1812, 15, 173jca 1129 . . . . . . . 8 ((𝑧 ∈ (Mooreβ€˜π΅) ∧ (π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯)) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯)))
1918ex 414 . . . . . . 7 (𝑧 ∈ (Mooreβ€˜π΅) β†’ ((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯))))
2019alrimivv 1932 . . . . . 6 (𝑧 ∈ (Mooreβ€˜π΅) β†’ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯))))
216, 10, 203jca 1129 . . . . 5 (𝑧 ∈ (Mooreβ€˜π΅) β†’ (𝐡 ∈ V ∧ (mrClsβ€˜π‘§):𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯)))))
22 feq1 6650 . . . . . 6 ((mrClsβ€˜π‘§) = 𝐹 β†’ ((mrClsβ€˜π‘§):𝒫 π΅βŸΆπ’« 𝐡 ↔ 𝐹:𝒫 π΅βŸΆπ’« 𝐡))
23 fveq1 6842 . . . . . . . . . 10 ((mrClsβ€˜π‘§) = 𝐹 β†’ ((mrClsβ€˜π‘§)β€˜π‘₯) = (πΉβ€˜π‘₯))
2423sseq2d 3977 . . . . . . . . 9 ((mrClsβ€˜π‘§) = 𝐹 β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ↔ π‘₯ βŠ† (πΉβ€˜π‘₯)))
25 fveq1 6842 . . . . . . . . . 10 ((mrClsβ€˜π‘§) = 𝐹 β†’ ((mrClsβ€˜π‘§)β€˜π‘¦) = (πΉβ€˜π‘¦))
2625, 23sseq12d 3978 . . . . . . . . 9 ((mrClsβ€˜π‘§) = 𝐹 β†’ (((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ↔ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)))
27 id 22 . . . . . . . . . . 11 ((mrClsβ€˜π‘§) = 𝐹 β†’ (mrClsβ€˜π‘§) = 𝐹)
2827, 23fveq12d 6850 . . . . . . . . . 10 ((mrClsβ€˜π‘§) = 𝐹 β†’ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = (πΉβ€˜(πΉβ€˜π‘₯)))
2928, 23eqeq12d 2753 . . . . . . . . 9 ((mrClsβ€˜π‘§) = 𝐹 β†’ (((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯) ↔ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))
3024, 26, 293anbi123d 1437 . . . . . . . 8 ((mrClsβ€˜π‘§) = 𝐹 β†’ ((π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯)) ↔ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))))
3130imbi2d 341 . . . . . . 7 ((mrClsβ€˜π‘§) = 𝐹 β†’ (((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯))) ↔ ((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))))
32312albidv 1927 . . . . . 6 ((mrClsβ€˜π‘§) = 𝐹 β†’ (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯))) ↔ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))))
3322, 323anbi23d 1440 . . . . 5 ((mrClsβ€˜π‘§) = 𝐹 β†’ ((𝐡 ∈ V ∧ (mrClsβ€˜π‘§):𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜π‘¦) βŠ† ((mrClsβ€˜π‘§)β€˜π‘₯) ∧ ((mrClsβ€˜π‘§)β€˜((mrClsβ€˜π‘§)β€˜π‘₯)) = ((mrClsβ€˜π‘§)β€˜π‘₯)))) ↔ (𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))))))
3421, 33syl5ibcom 244 . . . 4 (𝑧 ∈ (Mooreβ€˜π΅) β†’ ((mrClsβ€˜π‘§) = 𝐹 β†’ (𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))))))
3534rexlimiv 3146 . . 3 (βˆƒπ‘§ ∈ (Mooreβ€˜π΅)(mrClsβ€˜π‘§) = 𝐹 β†’ (𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))))
365, 35syl 17 . 2 (𝐹 ∈ (mrCls β€œ (Mooreβ€˜π΅)) β†’ (𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))))
37 simp1 1137 . . . 4 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ 𝐡 ∈ V)
38 simp2 1138 . . . 4 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ 𝐹:𝒫 π΅βŸΆπ’« 𝐡)
39 ssid 3967 . . . . . . 7 𝑧 βŠ† 𝑧
40 3simpb 1150 . . . . . . . . . . 11 ((π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))
4140imim2i 16 . . . . . . . . . 10 (((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ ((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))))
42412alimi 1815 . . . . . . . . 9 (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))))
43 sseq1 3970 . . . . . . . . . . . . . 14 (π‘₯ = 𝑧 β†’ (π‘₯ βŠ† 𝐡 ↔ 𝑧 βŠ† 𝐡))
4443adantr 482 . . . . . . . . . . . . 13 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ (π‘₯ βŠ† 𝐡 ↔ 𝑧 βŠ† 𝐡))
45 sseq12 3972 . . . . . . . . . . . . . 14 ((𝑦 = 𝑧 ∧ π‘₯ = 𝑧) β†’ (𝑦 βŠ† π‘₯ ↔ 𝑧 βŠ† 𝑧))
4645ancoms 460 . . . . . . . . . . . . 13 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ (𝑦 βŠ† π‘₯ ↔ 𝑧 βŠ† 𝑧))
4744, 46anbi12d 632 . . . . . . . . . . . 12 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ ((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) ↔ (𝑧 βŠ† 𝐡 ∧ 𝑧 βŠ† 𝑧)))
48 id 22 . . . . . . . . . . . . . . 15 (π‘₯ = 𝑧 β†’ π‘₯ = 𝑧)
49 fveq2 6843 . . . . . . . . . . . . . . 15 (π‘₯ = 𝑧 β†’ (πΉβ€˜π‘₯) = (πΉβ€˜π‘§))
5048, 49sseq12d 3978 . . . . . . . . . . . . . 14 (π‘₯ = 𝑧 β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ↔ 𝑧 βŠ† (πΉβ€˜π‘§)))
5150adantr 482 . . . . . . . . . . . . 13 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ↔ 𝑧 βŠ† (πΉβ€˜π‘§)))
52 2fveq3 6848 . . . . . . . . . . . . . . 15 (π‘₯ = 𝑧 β†’ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜(πΉβ€˜π‘§)))
5352, 49eqeq12d 2753 . . . . . . . . . . . . . 14 (π‘₯ = 𝑧 β†’ ((πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯) ↔ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§)))
5453adantr 482 . . . . . . . . . . . . 13 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ ((πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯) ↔ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§)))
5551, 54anbi12d 632 . . . . . . . . . . . 12 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ ((π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)) ↔ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§))))
5647, 55imbi12d 345 . . . . . . . . . . 11 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑧) β†’ (((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) ↔ ((𝑧 βŠ† 𝐡 ∧ 𝑧 βŠ† 𝑧) β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§)))))
5756spc2gv 3560 . . . . . . . . . 10 ((𝑧 ∈ V ∧ 𝑧 ∈ V) β†’ (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑧 βŠ† 𝑧) β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§)))))
5857el2v 3454 . . . . . . . . 9 (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑧 βŠ† 𝑧) β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§))))
5942, 58syl 17 . . . . . . . 8 (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑧 βŠ† 𝑧) β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§))))
60593ad2ant3 1136 . . . . . . 7 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑧 βŠ† 𝑧) β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§))))
6139, 60mpan2i 696 . . . . . 6 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ (𝑧 βŠ† 𝐡 β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§))))
6261imp 408 . . . . 5 (((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) ∧ 𝑧 βŠ† 𝐡) β†’ (𝑧 βŠ† (πΉβ€˜π‘§) ∧ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§)))
6362simpld 496 . . . 4 (((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) ∧ 𝑧 βŠ† 𝐡) β†’ 𝑧 βŠ† (πΉβ€˜π‘§))
64 simp2 1138 . . . . . . . . 9 ((π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯))
6564imim2i 16 . . . . . . . 8 (((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ ((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)))
66652alimi 1815 . . . . . . 7 (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯))) β†’ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)))
67663ad2ant3 1136 . . . . . 6 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)))
6843adantr 482 . . . . . . . . . 10 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑀) β†’ (π‘₯ βŠ† 𝐡 ↔ 𝑧 βŠ† 𝐡))
69 sseq12 3972 . . . . . . . . . . 11 ((𝑦 = 𝑀 ∧ π‘₯ = 𝑧) β†’ (𝑦 βŠ† π‘₯ ↔ 𝑀 βŠ† 𝑧))
7069ancoms 460 . . . . . . . . . 10 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑀) β†’ (𝑦 βŠ† π‘₯ ↔ 𝑀 βŠ† 𝑧))
7168, 70anbi12d 632 . . . . . . . . 9 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑀) β†’ ((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) ↔ (𝑧 βŠ† 𝐡 ∧ 𝑀 βŠ† 𝑧)))
72 fveq2 6843 . . . . . . . . . 10 (𝑦 = 𝑀 β†’ (πΉβ€˜π‘¦) = (πΉβ€˜π‘€))
73 sseq12 3972 . . . . . . . . . 10 (((πΉβ€˜π‘¦) = (πΉβ€˜π‘€) ∧ (πΉβ€˜π‘₯) = (πΉβ€˜π‘§)) β†’ ((πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ↔ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§)))
7472, 49, 73syl2anr 598 . . . . . . . . 9 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑀) β†’ ((πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ↔ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§)))
7571, 74imbi12d 345 . . . . . . . 8 ((π‘₯ = 𝑧 ∧ 𝑦 = 𝑀) β†’ (((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)) ↔ ((𝑧 βŠ† 𝐡 ∧ 𝑀 βŠ† 𝑧) β†’ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§))))
7675spc2gv 3560 . . . . . . 7 ((𝑧 ∈ V ∧ 𝑀 ∈ V) β†’ (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑀 βŠ† 𝑧) β†’ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§))))
7776el2v 3454 . . . . . 6 (βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯)) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑀 βŠ† 𝑧) β†’ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§)))
7867, 77syl 17 . . . . 5 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ ((𝑧 βŠ† 𝐡 ∧ 𝑀 βŠ† 𝑧) β†’ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§)))
79783impib 1117 . . . 4 (((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) ∧ 𝑧 βŠ† 𝐡 ∧ 𝑀 βŠ† 𝑧) β†’ (πΉβ€˜π‘€) βŠ† (πΉβ€˜π‘§))
8062simprd 497 . . . 4 (((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) ∧ 𝑧 βŠ† 𝐡) β†’ (πΉβ€˜(πΉβ€˜π‘§)) = (πΉβ€˜π‘§))
8137, 38, 63, 79, 80ismrcd2 41025 . . 3 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ 𝐹 = (mrClsβ€˜dom (𝐹 ∩ I )))
8237, 38, 63, 79, 80ismrcd1 41024 . . . 4 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ dom (𝐹 ∩ I ) ∈ (Mooreβ€˜π΅))
83 fvssunirn 6876 . . . . . 6 (Mooreβ€˜π΅) βŠ† βˆͺ ran Moore
841fndmi 6607 . . . . . 6 dom mrCls = βˆͺ ran Moore
8583, 84sseqtrri 3982 . . . . 5 (Mooreβ€˜π΅) βŠ† dom mrCls
86 funfvima2 7182 . . . . 5 ((Fun mrCls ∧ (Mooreβ€˜π΅) βŠ† dom mrCls) β†’ (dom (𝐹 ∩ I ) ∈ (Mooreβ€˜π΅) β†’ (mrClsβ€˜dom (𝐹 ∩ I )) ∈ (mrCls β€œ (Mooreβ€˜π΅))))
873, 85, 86mp2an 691 . . . 4 (dom (𝐹 ∩ I ) ∈ (Mooreβ€˜π΅) β†’ (mrClsβ€˜dom (𝐹 ∩ I )) ∈ (mrCls β€œ (Mooreβ€˜π΅)))
8882, 87syl 17 . . 3 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ (mrClsβ€˜dom (𝐹 ∩ I )) ∈ (mrCls β€œ (Mooreβ€˜π΅)))
8981, 88eqeltrd 2838 . 2 ((𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))) β†’ 𝐹 ∈ (mrCls β€œ (Mooreβ€˜π΅)))
9036, 89impbii 208 1 (𝐹 ∈ (mrCls β€œ (Mooreβ€˜π΅)) ↔ (𝐡 ∈ V ∧ 𝐹:𝒫 π΅βŸΆπ’« 𝐡 ∧ βˆ€π‘₯βˆ€π‘¦((π‘₯ βŠ† 𝐡 ∧ 𝑦 βŠ† π‘₯) β†’ (π‘₯ βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜π‘¦) βŠ† (πΉβ€˜π‘₯) ∧ (πΉβ€˜(πΉβ€˜π‘₯)) = (πΉβ€˜π‘₯)))))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088  βˆ€wal 1540   = wceq 1542   ∈ wcel 2107  βˆƒwrex 3074  Vcvv 3446   ∩ cin 3910   βŠ† wss 3911  π’« cpw 4561  βˆͺ cuni 4866   I cid 5531  dom cdm 5634  ran crn 5635   β€œ cima 5637  Fun wfun 6491   Fn wfn 6492  βŸΆwf 6493  β€˜cfv 6497  Moorecmre 17463  mrClscmrc 17464
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-sep 5257  ax-nul 5264  ax-pow 5321  ax-pr 5385  ax-un 7673
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-ral 3066  df-rex 3075  df-rab 3409  df-v 3448  df-sbc 3741  df-csb 3857  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-nul 4284  df-if 4488  df-pw 4563  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4867  df-int 4909  df-br 5107  df-opab 5169  df-mpt 5190  df-id 5532  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-iota 6449  df-fun 6499  df-fn 6500  df-f 6501  df-fv 6505  df-mre 17467  df-mrc 17468
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator