Users' Mathboxes Mathbox for Richard Penner < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  dssmapnvod Structured version   Visualization version   GIF version

Theorem dssmapnvod 40373
Description: For any base set 𝐵 the duality operator for self-mappings of subsets of that base set is its own inverse, an involution. (Contributed by RP, 20-Apr-2021.)
Hypotheses
Ref Expression
dssmapfvd.o 𝑂 = (𝑏 ∈ V ↦ (𝑓 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑓‘(𝑏𝑠))))))
dssmapfvd.d 𝐷 = (𝑂𝐵)
dssmapfvd.b (𝜑𝐵𝑉)
Assertion
Ref Expression
dssmapnvod (𝜑𝐷 = 𝐷)
Distinct variable groups:   𝐵,𝑏,𝑓,𝑠   𝜑,𝑏,𝑓,𝑠
Allowed substitution hints:   𝐷(𝑓,𝑠,𝑏)   𝑂(𝑓,𝑠,𝑏)   𝑉(𝑓,𝑠,𝑏)

Proof of Theorem dssmapnvod
Dummy variables 𝑔 𝑧 𝑡 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpr 487 . . . . . . . . 9 ((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) → 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))
2 difeq2 4095 . . . . . . . . . . . 12 (𝑠 = 𝑡 → (𝐵𝑠) = (𝐵𝑡))
32fveq2d 6676 . . . . . . . . . . 11 (𝑠 = 𝑡 → (𝑓‘(𝐵𝑠)) = (𝑓‘(𝐵𝑡)))
43difeq2d 4101 . . . . . . . . . 10 (𝑠 = 𝑡 → (𝐵 ∖ (𝑓‘(𝐵𝑠))) = (𝐵 ∖ (𝑓‘(𝐵𝑡))))
54cbvmptv 5171 . . . . . . . . 9 (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))) = (𝑡 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑡))))
61, 5syl6eq 2874 . . . . . . . 8 ((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) → 𝑔 = (𝑡 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑡)))))
7 ssun1 4150 . . . . . . . . . . . 12 𝐵 ⊆ (𝐵 ∪ (𝑓‘(𝐵𝑡)))
87sspwi 4555 . . . . . . . . . . 11 𝒫 𝐵 ⊆ 𝒫 (𝐵 ∪ (𝑓‘(𝐵𝑡)))
9 dssmapfvd.b . . . . . . . . . . . 12 (𝜑𝐵𝑉)
10 pwidg 4563 . . . . . . . . . . . 12 (𝐵𝑉𝐵 ∈ 𝒫 𝐵)
119, 10syl 17 . . . . . . . . . . 11 (𝜑𝐵 ∈ 𝒫 𝐵)
128, 11sseldi 3967 . . . . . . . . . 10 (𝜑𝐵 ∈ 𝒫 (𝐵 ∪ (𝑓‘(𝐵𝑡))))
13 fvex 6685 . . . . . . . . . . 11 (𝑓‘(𝐵𝑡)) ∈ V
1413elpwun 7493 . . . . . . . . . 10 (𝐵 ∈ 𝒫 (𝐵 ∪ (𝑓‘(𝐵𝑡))) ↔ (𝐵 ∖ (𝑓‘(𝐵𝑡))) ∈ 𝒫 𝐵)
1512, 14sylib 220 . . . . . . . . 9 (𝜑 → (𝐵 ∖ (𝑓‘(𝐵𝑡))) ∈ 𝒫 𝐵)
1615ad2antrr 724 . . . . . . . 8 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑓‘(𝐵𝑡))) ∈ 𝒫 𝐵)
176, 16fmpt3d 6882 . . . . . . 7 ((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) → 𝑔:𝒫 𝐵⟶𝒫 𝐵)
189pwexd 5282 . . . . . . . . 9 (𝜑 → 𝒫 𝐵 ∈ V)
1918adantr 483 . . . . . . . 8 ((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) → 𝒫 𝐵 ∈ V)
2019, 19elmapd 8422 . . . . . . 7 ((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) → (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ↔ 𝑔:𝒫 𝐵⟶𝒫 𝐵))
2117, 20mpbird 259 . . . . . 6 ((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) → 𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵))
2221adantrl 714 . . . . 5 ((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) → 𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵))
23 simplr 767 . . . . . . . . . . . 12 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))
24 difeq2 4095 . . . . . . . . . . . . . . 15 (𝑠 = 𝑢 → (𝐵𝑠) = (𝐵𝑢))
2524fveq2d 6676 . . . . . . . . . . . . . 14 (𝑠 = 𝑢 → (𝑓‘(𝐵𝑠)) = (𝑓‘(𝐵𝑢)))
2625difeq2d 4101 . . . . . . . . . . . . 13 (𝑠 = 𝑢 → (𝐵 ∖ (𝑓‘(𝐵𝑠))) = (𝐵 ∖ (𝑓‘(𝐵𝑢))))
2726cbvmptv 5171 . . . . . . . . . . . 12 (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))) = (𝑢 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑢))))
2823, 27syl6eq 2874 . . . . . . . . . . 11 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → 𝑔 = (𝑢 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑢)))))
29 difeq2 4095 . . . . . . . . . . . . . 14 (𝑢 = (𝐵𝑡) → (𝐵𝑢) = (𝐵 ∖ (𝐵𝑡)))
3029fveq2d 6676 . . . . . . . . . . . . 13 (𝑢 = (𝐵𝑡) → (𝑓‘(𝐵𝑢)) = (𝑓‘(𝐵 ∖ (𝐵𝑡))))
3130difeq2d 4101 . . . . . . . . . . . 12 (𝑢 = (𝐵𝑡) → (𝐵 ∖ (𝑓‘(𝐵𝑢))) = (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))))
3231adantl 484 . . . . . . . . . . 11 ((((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) ∧ 𝑢 = (𝐵𝑡)) → (𝐵 ∖ (𝑓‘(𝐵𝑢))) = (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))))
33 ssun1 4150 . . . . . . . . . . . . . . 15 𝐵 ⊆ (𝐵𝑡)
3433sspwi 4555 . . . . . . . . . . . . . 14 𝒫 𝐵 ⊆ 𝒫 (𝐵𝑡)
3534, 11sseldi 3967 . . . . . . . . . . . . 13 (𝜑𝐵 ∈ 𝒫 (𝐵𝑡))
36 vex 3499 . . . . . . . . . . . . . 14 𝑡 ∈ V
3736elpwun 7493 . . . . . . . . . . . . 13 (𝐵 ∈ 𝒫 (𝐵𝑡) ↔ (𝐵𝑡) ∈ 𝒫 𝐵)
3835, 37sylib 220 . . . . . . . . . . . 12 (𝜑 → (𝐵𝑡) ∈ 𝒫 𝐵)
3938ad2antrr 724 . . . . . . . . . . 11 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵𝑡) ∈ 𝒫 𝐵)
40 difexg 5233 . . . . . . . . . . . . 13 (𝐵𝑉 → (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))) ∈ V)
419, 40syl 17 . . . . . . . . . . . 12 (𝜑 → (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))) ∈ V)
4241ad2antrr 724 . . . . . . . . . . 11 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))) ∈ V)
4328, 32, 39, 42fvmptd 6777 . . . . . . . . . 10 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑔‘(𝐵𝑡)) = (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))))
4443difeq2d 4101 . . . . . . . . 9 (((𝜑𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑔‘(𝐵𝑡))) = (𝐵 ∖ (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡))))))
4544adantlrl 718 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑔‘(𝐵𝑡))) = (𝐵 ∖ (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡))))))
46 elpwi 4550 . . . . . . . . . . . . 13 (𝑡 ∈ 𝒫 𝐵𝑡𝐵)
47 dfss4 4237 . . . . . . . . . . . . 13 (𝑡𝐵 ↔ (𝐵 ∖ (𝐵𝑡)) = 𝑡)
4846, 47sylib 220 . . . . . . . . . . . 12 (𝑡 ∈ 𝒫 𝐵 → (𝐵 ∖ (𝐵𝑡)) = 𝑡)
4948fveq2d 6676 . . . . . . . . . . 11 (𝑡 ∈ 𝒫 𝐵 → (𝑓‘(𝐵 ∖ (𝐵𝑡))) = (𝑓𝑡))
5049difeq2d 4101 . . . . . . . . . 10 (𝑡 ∈ 𝒫 𝐵 → (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡)))) = (𝐵 ∖ (𝑓𝑡)))
5150difeq2d 4101 . . . . . . . . 9 (𝑡 ∈ 𝒫 𝐵 → (𝐵 ∖ (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡))))) = (𝐵 ∖ (𝐵 ∖ (𝑓𝑡))))
5251adantl 484 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝐵 ∖ (𝑓‘(𝐵 ∖ (𝐵𝑡))))) = (𝐵 ∖ (𝐵 ∖ (𝑓𝑡))))
5318, 18elmapd 8422 . . . . . . . . . . . . 13 (𝜑 → (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ↔ 𝑓:𝒫 𝐵⟶𝒫 𝐵))
5453biimpa 479 . . . . . . . . . . . 12 ((𝜑𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵)) → 𝑓:𝒫 𝐵⟶𝒫 𝐵)
5554ffvelrnda 6853 . . . . . . . . . . 11 (((𝜑𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑓𝑡) ∈ 𝒫 𝐵)
5655elpwid 4552 . . . . . . . . . 10 (((𝜑𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑓𝑡) ⊆ 𝐵)
57 dfss4 4237 . . . . . . . . . 10 ((𝑓𝑡) ⊆ 𝐵 ↔ (𝐵 ∖ (𝐵 ∖ (𝑓𝑡))) = (𝑓𝑡))
5856, 57sylib 220 . . . . . . . . 9 (((𝜑𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝐵 ∖ (𝑓𝑡))) = (𝑓𝑡))
5958adantlrr 719 . . . . . . . 8 (((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝐵 ∖ (𝑓𝑡))) = (𝑓𝑡))
6045, 52, 593eqtrrd 2863 . . . . . . 7 (((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑓𝑡) = (𝐵 ∖ (𝑔‘(𝐵𝑡))))
6160ralrimiva 3184 . . . . . 6 ((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) → ∀𝑡 ∈ 𝒫 𝐵(𝑓𝑡) = (𝐵 ∖ (𝑔‘(𝐵𝑡))))
62 elmapfn 8431 . . . . . . . 8 (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) → 𝑓 Fn 𝒫 𝐵)
6362ad2antrl 726 . . . . . . 7 ((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) → 𝑓 Fn 𝒫 𝐵)
64 difeq2 4095 . . . . . . . . 9 (𝑡 = 𝑧 → (𝐵𝑡) = (𝐵𝑧))
6564fveq2d 6676 . . . . . . . 8 (𝑡 = 𝑧 → (𝑔‘(𝐵𝑡)) = (𝑔‘(𝐵𝑧)))
6665difeq2d 4101 . . . . . . 7 (𝑡 = 𝑧 → (𝐵 ∖ (𝑔‘(𝐵𝑡))) = (𝐵 ∖ (𝑔‘(𝐵𝑧))))
67 difexg 5233 . . . . . . . . 9 (𝐵𝑉 → (𝐵 ∖ (𝑔‘(𝐵𝑡))) ∈ V)
689, 67syl 17 . . . . . . . 8 (𝜑 → (𝐵 ∖ (𝑔‘(𝐵𝑡))) ∈ V)
6968ad2antrr 724 . . . . . . 7 (((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑔‘(𝐵𝑡))) ∈ V)
70 difexg 5233 . . . . . . . . 9 (𝐵𝑉 → (𝐵 ∖ (𝑔‘(𝐵𝑧))) ∈ V)
719, 70syl 17 . . . . . . . 8 (𝜑 → (𝐵 ∖ (𝑔‘(𝐵𝑧))) ∈ V)
7271ad2antrr 724 . . . . . . 7 (((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) ∧ 𝑧 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑔‘(𝐵𝑧))) ∈ V)
7363, 66, 69, 72fnmptfvd 6813 . . . . . 6 ((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) → (𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))) ↔ ∀𝑡 ∈ 𝒫 𝐵(𝑓𝑡) = (𝐵 ∖ (𝑔‘(𝐵𝑡)))))
7461, 73mpbird 259 . . . . 5 ((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) → 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))
7522, 74jca 514 . . . 4 ((𝜑 ∧ (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))) → (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))))
76 simpr 487 . . . . . . . . 9 ((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) → 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))
77 difeq2 4095 . . . . . . . . . . . 12 (𝑧 = 𝑡 → (𝐵𝑧) = (𝐵𝑡))
7877fveq2d 6676 . . . . . . . . . . 11 (𝑧 = 𝑡 → (𝑔‘(𝐵𝑧)) = (𝑔‘(𝐵𝑡)))
7978difeq2d 4101 . . . . . . . . . 10 (𝑧 = 𝑡 → (𝐵 ∖ (𝑔‘(𝐵𝑧))) = (𝐵 ∖ (𝑔‘(𝐵𝑡))))
8079cbvmptv 5171 . . . . . . . . 9 (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))) = (𝑡 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑡))))
8176, 80syl6eq 2874 . . . . . . . 8 ((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) → 𝑓 = (𝑡 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑡)))))
82 ssun1 4150 . . . . . . . . . . . 12 𝐵 ⊆ (𝐵 ∪ (𝑔‘(𝐵𝑡)))
8382sspwi 4555 . . . . . . . . . . 11 𝒫 𝐵 ⊆ 𝒫 (𝐵 ∪ (𝑔‘(𝐵𝑡)))
8483, 11sseldi 3967 . . . . . . . . . 10 (𝜑𝐵 ∈ 𝒫 (𝐵 ∪ (𝑔‘(𝐵𝑡))))
85 fvex 6685 . . . . . . . . . . 11 (𝑔‘(𝐵𝑡)) ∈ V
8685elpwun 7493 . . . . . . . . . 10 (𝐵 ∈ 𝒫 (𝐵 ∪ (𝑔‘(𝐵𝑡))) ↔ (𝐵 ∖ (𝑔‘(𝐵𝑡))) ∈ 𝒫 𝐵)
8784, 86sylib 220 . . . . . . . . 9 (𝜑 → (𝐵 ∖ (𝑔‘(𝐵𝑡))) ∈ 𝒫 𝐵)
8887ad2antrr 724 . . . . . . . 8 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑔‘(𝐵𝑡))) ∈ 𝒫 𝐵)
8981, 88fmpt3d 6882 . . . . . . 7 ((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) → 𝑓:𝒫 𝐵⟶𝒫 𝐵)
9018adantr 483 . . . . . . . 8 ((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) → 𝒫 𝐵 ∈ V)
9190, 90elmapd 8422 . . . . . . 7 ((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) → (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ↔ 𝑓:𝒫 𝐵⟶𝒫 𝐵))
9289, 91mpbird 259 . . . . . 6 ((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) → 𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵))
9392adantrl 714 . . . . 5 ((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) → 𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵))
94 simplr 767 . . . . . . . . . . . 12 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))
95 difeq2 4095 . . . . . . . . . . . . . . 15 (𝑧 = 𝑢 → (𝐵𝑧) = (𝐵𝑢))
9695fveq2d 6676 . . . . . . . . . . . . . 14 (𝑧 = 𝑢 → (𝑔‘(𝐵𝑧)) = (𝑔‘(𝐵𝑢)))
9796difeq2d 4101 . . . . . . . . . . . . 13 (𝑧 = 𝑢 → (𝐵 ∖ (𝑔‘(𝐵𝑧))) = (𝐵 ∖ (𝑔‘(𝐵𝑢))))
9897cbvmptv 5171 . . . . . . . . . . . 12 (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))) = (𝑢 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑢))))
9994, 98syl6eq 2874 . . . . . . . . . . 11 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → 𝑓 = (𝑢 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑢)))))
10029fveq2d 6676 . . . . . . . . . . . . 13 (𝑢 = (𝐵𝑡) → (𝑔‘(𝐵𝑢)) = (𝑔‘(𝐵 ∖ (𝐵𝑡))))
101100difeq2d 4101 . . . . . . . . . . . 12 (𝑢 = (𝐵𝑡) → (𝐵 ∖ (𝑔‘(𝐵𝑢))) = (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))))
102101adantl 484 . . . . . . . . . . 11 ((((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) ∧ 𝑢 = (𝐵𝑡)) → (𝐵 ∖ (𝑔‘(𝐵𝑢))) = (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))))
10338ad2antrr 724 . . . . . . . . . . 11 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵𝑡) ∈ 𝒫 𝐵)
104 difexg 5233 . . . . . . . . . . . . 13 (𝐵𝑉 → (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))) ∈ V)
1059, 104syl 17 . . . . . . . . . . . 12 (𝜑 → (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))) ∈ V)
106105ad2antrr 724 . . . . . . . . . . 11 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))) ∈ V)
10799, 102, 103, 106fvmptd 6777 . . . . . . . . . 10 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑓‘(𝐵𝑡)) = (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))))
108107difeq2d 4101 . . . . . . . . 9 (((𝜑𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑓‘(𝐵𝑡))) = (𝐵 ∖ (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡))))))
109108adantlrl 718 . . . . . . . 8 (((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑓‘(𝐵𝑡))) = (𝐵 ∖ (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡))))))
11048fveq2d 6676 . . . . . . . . . . 11 (𝑡 ∈ 𝒫 𝐵 → (𝑔‘(𝐵 ∖ (𝐵𝑡))) = (𝑔𝑡))
111110difeq2d 4101 . . . . . . . . . 10 (𝑡 ∈ 𝒫 𝐵 → (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡)))) = (𝐵 ∖ (𝑔𝑡)))
112111difeq2d 4101 . . . . . . . . 9 (𝑡 ∈ 𝒫 𝐵 → (𝐵 ∖ (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡))))) = (𝐵 ∖ (𝐵 ∖ (𝑔𝑡))))
113112adantl 484 . . . . . . . 8 (((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝐵 ∖ (𝑔‘(𝐵 ∖ (𝐵𝑡))))) = (𝐵 ∖ (𝐵 ∖ (𝑔𝑡))))
11418, 18elmapd 8422 . . . . . . . . . . . . 13 (𝜑 → (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ↔ 𝑔:𝒫 𝐵⟶𝒫 𝐵))
115114biimpa 479 . . . . . . . . . . . 12 ((𝜑𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵)) → 𝑔:𝒫 𝐵⟶𝒫 𝐵)
116115ffvelrnda 6853 . . . . . . . . . . 11 (((𝜑𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑔𝑡) ∈ 𝒫 𝐵)
117116elpwid 4552 . . . . . . . . . 10 (((𝜑𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑔𝑡) ⊆ 𝐵)
118 dfss4 4237 . . . . . . . . . 10 ((𝑔𝑡) ⊆ 𝐵 ↔ (𝐵 ∖ (𝐵 ∖ (𝑔𝑡))) = (𝑔𝑡))
119117, 118sylib 220 . . . . . . . . 9 (((𝜑𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵)) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝐵 ∖ (𝑔𝑡))) = (𝑔𝑡))
120119adantlrr 719 . . . . . . . 8 (((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝐵 ∖ (𝑔𝑡))) = (𝑔𝑡))
121109, 113, 1203eqtrrd 2863 . . . . . . 7 (((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝑔𝑡) = (𝐵 ∖ (𝑓‘(𝐵𝑡))))
122121ralrimiva 3184 . . . . . 6 ((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) → ∀𝑡 ∈ 𝒫 𝐵(𝑔𝑡) = (𝐵 ∖ (𝑓‘(𝐵𝑡))))
123 elmapfn 8431 . . . . . . . 8 (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) → 𝑔 Fn 𝒫 𝐵)
124123ad2antrl 726 . . . . . . 7 ((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) → 𝑔 Fn 𝒫 𝐵)
125 difeq2 4095 . . . . . . . . 9 (𝑡 = 𝑠 → (𝐵𝑡) = (𝐵𝑠))
126125fveq2d 6676 . . . . . . . 8 (𝑡 = 𝑠 → (𝑓‘(𝐵𝑡)) = (𝑓‘(𝐵𝑠)))
127126difeq2d 4101 . . . . . . 7 (𝑡 = 𝑠 → (𝐵 ∖ (𝑓‘(𝐵𝑡))) = (𝐵 ∖ (𝑓‘(𝐵𝑠))))
128 difexg 5233 . . . . . . . . 9 (𝐵𝑉 → (𝐵 ∖ (𝑓‘(𝐵𝑡))) ∈ V)
1299, 128syl 17 . . . . . . . 8 (𝜑 → (𝐵 ∖ (𝑓‘(𝐵𝑡))) ∈ V)
130129ad2antrr 724 . . . . . . 7 (((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) ∧ 𝑡 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑓‘(𝐵𝑡))) ∈ V)
131 difexg 5233 . . . . . . . . 9 (𝐵𝑉 → (𝐵 ∖ (𝑓‘(𝐵𝑠))) ∈ V)
1329, 131syl 17 . . . . . . . 8 (𝜑 → (𝐵 ∖ (𝑓‘(𝐵𝑠))) ∈ V)
133132ad2antrr 724 . . . . . . 7 (((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) ∧ 𝑠 ∈ 𝒫 𝐵) → (𝐵 ∖ (𝑓‘(𝐵𝑠))) ∈ V)
134124, 127, 130, 133fnmptfvd 6813 . . . . . 6 ((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) → (𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))) ↔ ∀𝑡 ∈ 𝒫 𝐵(𝑔𝑡) = (𝐵 ∖ (𝑓‘(𝐵𝑡)))))
135122, 134mpbird 259 . . . . 5 ((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) → 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠)))))
13693, 135jca 514 . . . 4 ((𝜑 ∧ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))) → (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))))
13775, 136impbida 799 . . 3 (𝜑 → ((𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑔 = (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) ↔ (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ∧ 𝑓 = (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧)))))))
138137mptcnv 6000 . 2 (𝜑(𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ↦ (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))) = (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ↦ (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))))
139 dssmapfvd.o . . . 4 𝑂 = (𝑏 ∈ V ↦ (𝑓 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑓‘(𝑏𝑠))))))
140 dssmapfvd.d . . . 4 𝐷 = (𝑂𝐵)
141139, 140, 9dssmapfvd 40370 . . 3 (𝜑𝐷 = (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ↦ (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))))
142141cnveqd 5748 . 2 (𝜑𝐷 = (𝑓 ∈ (𝒫 𝐵m 𝒫 𝐵) ↦ (𝑠 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑓‘(𝐵𝑠))))))
143 fveq1 6671 . . . . . . . . 9 (𝑓 = 𝑔 → (𝑓‘(𝑏𝑠)) = (𝑔‘(𝑏𝑠)))
144143difeq2d 4101 . . . . . . . 8 (𝑓 = 𝑔 → (𝑏 ∖ (𝑓‘(𝑏𝑠))) = (𝑏 ∖ (𝑔‘(𝑏𝑠))))
145144mpteq2dv 5164 . . . . . . 7 (𝑓 = 𝑔 → (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑓‘(𝑏𝑠)))) = (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑠)))))
146 difeq2 4095 . . . . . . . . . 10 (𝑠 = 𝑧 → (𝑏𝑠) = (𝑏𝑧))
147146fveq2d 6676 . . . . . . . . 9 (𝑠 = 𝑧 → (𝑔‘(𝑏𝑠)) = (𝑔‘(𝑏𝑧)))
148147difeq2d 4101 . . . . . . . 8 (𝑠 = 𝑧 → (𝑏 ∖ (𝑔‘(𝑏𝑠))) = (𝑏 ∖ (𝑔‘(𝑏𝑧))))
149148cbvmptv 5171 . . . . . . 7 (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑠)))) = (𝑧 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑧))))
150145, 149syl6eq 2874 . . . . . 6 (𝑓 = 𝑔 → (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑓‘(𝑏𝑠)))) = (𝑧 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑧)))))
151150cbvmptv 5171 . . . . 5 (𝑓 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑓‘(𝑏𝑠))))) = (𝑔 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑧 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑧)))))
152151mpteq2i 5160 . . . 4 (𝑏 ∈ V ↦ (𝑓 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑠 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑓‘(𝑏𝑠)))))) = (𝑏 ∈ V ↦ (𝑔 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑧 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑧))))))
153139, 152eqtri 2846 . . 3 𝑂 = (𝑏 ∈ V ↦ (𝑔 ∈ (𝒫 𝑏m 𝒫 𝑏) ↦ (𝑧 ∈ 𝒫 𝑏 ↦ (𝑏 ∖ (𝑔‘(𝑏𝑧))))))
154153, 140, 9dssmapfvd 40370 . 2 (𝜑𝐷 = (𝑔 ∈ (𝒫 𝐵m 𝒫 𝐵) ↦ (𝑧 ∈ 𝒫 𝐵 ↦ (𝐵 ∖ (𝑔‘(𝐵𝑧))))))
155138, 142, 1543eqtr4d 2868 1 (𝜑𝐷 = 𝐷)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 398   = wceq 1537  wcel 2114  wral 3140  Vcvv 3496  cdif 3935  cun 3936  wss 3938  𝒫 cpw 4541  cmpt 5148  ccnv 5556   Fn wfn 6352  wf 6353  cfv 6357  (class class class)co 7158  m cmap 8408
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-ral 3145  df-rex 3146  df-reu 3147  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-ov 7161  df-oprab 7162  df-mpo 7163  df-1st 7691  df-2nd 7692  df-map 8410
This theorem is referenced by:  dssmapf1od  40374  dssmap2d  40375  ntrclsnvobr  40409  clsneicnv  40462  neicvgnvo  40472  dssmapclsntr  40486
  Copyright terms: Public domain W3C validator