| Step | Hyp | Ref
| Expression |
| 1 | | eqid 2734 |
. . . 4
⊢ (𝑘 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃)),
𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹)))) = (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹)))) |
| 2 | 1 | reldmmpo 7536 |
. . 3
⊢ Rel dom
(𝑘 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃)),
𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹)))) |
| 3 | | eqid 2734 |
. . . . . . 7
⊢
((1st ‘𝑃) Func (2nd ‘𝑃)) = ((1st
‘𝑃) Func
(2nd ‘𝑃)) |
| 4 | | eqid 2734 |
. . . . . . 7
⊢
((1st ‘𝑃) Nat (2nd ‘𝑃)) = ((1st
‘𝑃) Nat
(2nd ‘𝑃)) |
| 5 | | simpr 484 |
. . . . . . 7
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) → 𝐹 ∈ V) |
| 6 | | simpl 482 |
. . . . . . 7
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) → 𝑃 ∈ V) |
| 7 | | eqidd 2735 |
. . . . . . 7
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) →
(1st ‘𝑃) =
(1st ‘𝑃)) |
| 8 | | eqidd 2735 |
. . . . . . 7
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) →
(2nd ‘𝑃) =
(2nd ‘𝑃)) |
| 9 | 3, 4, 5, 6, 7, 8 | prcofvalg 49150 |
. . . . . 6
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (𝑃
−∘F 𝐹) = 〈(𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)) ↦ (𝑘 ∘func
𝐹)), (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹))))〉) |
| 10 | | ovex 7433 |
. . . . . . . 8
⊢
((1st ‘𝑃) Func (2nd ‘𝑃)) ∈ V |
| 11 | 10 | mptex 7212 |
. . . . . . 7
⊢ (𝑘 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑘
∘func 𝐹)) ∈ V |
| 12 | 10, 10 | mpoex 8073 |
. . . . . . 7
⊢ (𝑘 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃)),
𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹)))) ∈ V |
| 13 | 11, 12 | op2ndd 7994 |
. . . . . 6
⊢ ((𝑃
−∘F 𝐹) = 〈(𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)) ↦ (𝑘 ∘func
𝐹)), (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹))))〉 →
(2nd ‘(𝑃
−∘F 𝐹)) = (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹))))) |
| 14 | 9, 13 | syl 17 |
. . . . 5
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) →
(2nd ‘(𝑃
−∘F 𝐹)) = (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹))))) |
| 15 | 14 | dmeqd 5883 |
. . . 4
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) → dom
(2nd ‘(𝑃
−∘F 𝐹)) = dom (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹))))) |
| 16 | 15 | releqd 5755 |
. . 3
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (Rel dom
(2nd ‘(𝑃
−∘F 𝐹)) ↔ Rel dom (𝑘 ∈ ((1st ‘𝑃) Func (2nd
‘𝑃)), 𝑙 ∈ ((1st
‘𝑃) Func
(2nd ‘𝑃))
↦ (𝑎 ∈ (𝑘((1st ‘𝑃) Nat (2nd
‘𝑃))𝑙) ↦ (𝑎 ∘ (1st ‘𝐹)))))) |
| 17 | 2, 16 | mpbiri 258 |
. 2
⊢ ((𝑃 ∈ V ∧ 𝐹 ∈ V) → Rel dom
(2nd ‘(𝑃
−∘F 𝐹))) |
| 18 | | rel0 5776 |
. . 3
⊢ Rel
∅ |
| 19 | | reldmprcof 49149 |
. . . . . . . . 9
⊢ Rel dom
−∘F |
| 20 | 19 | ovprc 7438 |
. . . . . . . 8
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) → (𝑃
−∘F 𝐹) = ∅) |
| 21 | 20 | fveq2d 6877 |
. . . . . . 7
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) →
(2nd ‘(𝑃
−∘F 𝐹)) = (2nd
‘∅)) |
| 22 | | 2nd0 7990 |
. . . . . . 7
⊢
(2nd ‘∅) = ∅ |
| 23 | 21, 22 | eqtrdi 2785 |
. . . . . 6
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) →
(2nd ‘(𝑃
−∘F 𝐹)) = ∅) |
| 24 | 23 | dmeqd 5883 |
. . . . 5
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) → dom
(2nd ‘(𝑃
−∘F 𝐹)) = dom ∅) |
| 25 | | dm0 5898 |
. . . . 5
⊢ dom
∅ = ∅ |
| 26 | 24, 25 | eqtrdi 2785 |
. . . 4
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) → dom
(2nd ‘(𝑃
−∘F 𝐹)) = ∅) |
| 27 | 26 | releqd 5755 |
. . 3
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) → (Rel dom
(2nd ‘(𝑃
−∘F 𝐹)) ↔ Rel ∅)) |
| 28 | 18, 27 | mpbiri 258 |
. 2
⊢ (¬
(𝑃 ∈ V ∧ 𝐹 ∈ V) → Rel dom
(2nd ‘(𝑃
−∘F 𝐹))) |
| 29 | 17, 28 | pm2.61i 182 |
1
⊢ Rel dom
(2nd ‘(𝑃
−∘F 𝐹)) |