Proof of Theorem sbthlem8
| Step | Hyp | Ref
| Expression |
| 1 | | funun 2700 |
. . 3
⊢ (((Fun ◡(f
↾ ∪D)
∧ Fun ◡(◡g
↾ (A ∖ ∪D))) ∧ (dom ◡(f
↾ ∪D)
∩ dom ◡(◡g
↾ (A ∖ ∪D))) = ∅)
→ Fun (◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D)))) |
| 2 | | funres11 2709 |
. . . 4
⊢ (Fun ◡f →
Fun ◡(f ↾ ∪D)) |
| 3 | | funcnvcnv 2701 |
. . . . . . 7
⊢ (Fun g
→ Fun ◡◡g) |
| 4 | | funres11 2709 |
. . . . . . 7
⊢ (Fun ◡◡g →
Fun ◡(◡g
↾ (A ∖ ∪D))) |
| 5 | 3, 4 | syl 12 |
. . . . . 6
⊢ (Fun g
→ Fun ◡(◡g
↾ (A ∖ ∪D))) |
| 6 | 5 | adantr 306 |
. . . . 5
⊢ ((Fun g ∧ dom g =
B) → Fun ◡(◡g
↾ (A ∖ ∪D))) |
| 7 | 6 | ad2antll 320 |
. . . 4
⊢ ((((Fun g ∧ dom g =
B) ∧ ran g ⊆ A)
∧ Fun ◡g) → Fun ◡(◡g
↾ (A ∖ ∪D))) |
| 8 | 2, 7 | anim12i 268 |
. . 3
⊢ ((Fun ◡f ∧
(((Fun g ∧ dom g = B) ∧ ran
g ⊆ A) ∧ Fun ◡g))
→ (Fun ◡(f ↾ ∪D) ∧ Fun ◡(◡g
↾ (A ∖ ∪D)))) |
| 9 | | sbthlem.1 |
. . . . . . . . . 10
⊢ A
∈ V |
| 10 | | sbthlem.2 |
. . . . . . . . . 10
⊢ D =
{x∣(x ⊆ A
∧ (g “ (B ∖ (f
“ x))) ⊆ (A ∖ x))} |
| 11 | 9, 10 | sbthlem4 3352 |
. . . . . . . . 9
⊢ (((dom g = B ∧ ran
g ⊆ A) ∧ Fun ◡g)
→ (◡g “ (A
∖ ∪D)) =
(B ∖ (f “ ∪D))) |
| 12 | | df-ima 2431 |
. . . . . . . . . 10
⊢ (◡g
“ (A ∖ ∪D)) = ran (◡g
↾ (A ∖ ∪D)) |
| 13 | | df-rn 2429 |
. . . . . . . . . 10
⊢ ran (◡g
↾ (A ∖ ∪D)) = dom ◡(◡g
↾ (A ∖ ∪D)) |
| 14 | 12, 13 | eqtr 1119 |
. . . . . . . . 9
⊢ (◡g
“ (A ∖ ∪D)) = dom ◡(◡g
↾ (A ∖ ∪D)) |
| 15 | 11, 14 | syl5eqr 1138 |
. . . . . . . 8
⊢ (((dom g = B ∧ ran
g ⊆ A) ∧ Fun ◡g)
→ dom ◡(◡g
↾ (A ∖ ∪D)) = (B ∖ (f
“ ∪D))) |
| 16 | | df-ima 2431 |
. . . . . . . . 9
⊢ (f
“ ∪D) =
ran (f ↾ ∪D) |
| 17 | | df-rn 2429 |
. . . . . . . . 9
⊢ ran (f
↾ ∪D) =
dom ◡(f ↾ ∪D) |
| 18 | 16, 17 | eqtr2 1120 |
. . . . . . . 8
⊢ dom ◡(f
↾ ∪D) =
(f “ ∪D) |
| 19 | 15, 18 | jctil 240 |
. . . . . . 7
⊢ (((dom g = B ∧ ran
g ⊆ A) ∧ Fun ◡g)
→ (dom ◡(f ↾ ∪D) = (f “
∪D) ∧ dom
◡(◡g
↾ (A ∖ ∪D)) = (B ∖ (f
“ ∪D)))) |
| 20 | | ineq12 1640 |
. . . . . . 7
⊢ ((dom ◡(f
↾ ∪D) =
(f “ ∪D) ∧ dom ◡(◡g
↾ (A ∖ ∪D)) = (B ∖ (f
“ ∪D)))
→ (dom ◡(f ↾ ∪D) ∩ dom ◡(◡g
↾ (A ∖ ∪D))) = ((f “ ∪D) ∩ (B
∖ (f “ ∪D)))) |
| 21 | 19, 20 | syl 12 |
. . . . . 6
⊢ (((dom g = B ∧ ran
g ⊆ A) ∧ Fun ◡g)
→ (dom ◡(f ↾ ∪D) ∩ dom ◡(◡g
↾ (A ∖ ∪D))) = ((f “ ∪D) ∩ (B
∖ (f “ ∪D)))) |
| 22 | | difdisj 1758 |
. . . . . 6
⊢ ((f
“ ∪D)
∩ (B ∖ (f “ ∪D))) = ∅ |
| 23 | 21, 22 | syl6eq 1140 |
. . . . 5
⊢ (((dom g = B ∧ ran
g ⊆ A) ∧ Fun ◡g)
→ (dom ◡(f ↾ ∪D) ∩ dom ◡(◡g
↾ (A ∖ ∪D))) =
∅) |
| 24 | 23 | adantlll 313 |
. . . 4
⊢ ((((Fun g ∧ dom g =
B) ∧ ran g ⊆ A)
∧ Fun ◡g) → (dom ◡(f
↾ ∪D)
∩ dom ◡(◡g
↾ (A ∖ ∪D))) =
∅) |
| 25 | 24 | adantl 305 |
. . 3
⊢ ((Fun ◡f ∧
(((Fun g ∧ dom g = B) ∧ ran
g ⊆ A) ∧ Fun ◡g))
→ (dom ◡(f ↾ ∪D) ∩ dom ◡(◡g
↾ (A ∖ ∪D))) =
∅) |
| 26 | 1, 8, 25 | sylanc 361 |
. 2
⊢ ((Fun ◡f ∧
(((Fun g ∧ dom g = B) ∧ ran
g ⊆ A) ∧ Fun ◡g))
→ Fun (◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D)))) |
| 27 | | sbthlem.3 |
. . . . 5
⊢ H =
((f ↾ ∪D) ∪ (◡g
↾ (A ∖ ∪D))) |
| 28 | | cnveq 2513 |
. . . . 5
⊢ (H =
((f ↾ ∪D) ∪ (◡g
↾ (A ∖ ∪D))) → ◡H =
◡((f ↾ ∪D) ∪ (◡g
↾ (A ∖ ∪D)))) |
| 29 | 27, 28 | ax-mp 6 |
. . . 4
⊢ ◡H =
◡((f ↾ ∪D) ∪ (◡g
↾ (A ∖ ∪D))) |
| 30 | | cnvun 2642 |
. . . 4
⊢ ◡((f
↾ ∪D)
∪ (◡g ↾ (A
∖ ∪D))) =
(◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D))) |
| 31 | 29, 30 | eqtr 1119 |
. . 3
⊢ ◡H =
(◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D))) |
| 32 | | funeq 2683 |
. . 3
⊢ (◡H =
(◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D))) → (Fun
◡H
↔ Fun (◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D))))) |
| 33 | 31, 32 | ax-mp 6 |
. 2
⊢ (Fun ◡H ↔
Fun (◡(f ↾ ∪D) ∪ ◡(◡g
↾ (A ∖ ∪D)))) |
| 34 | 26, 33 | sylibr 175 |
1
⊢ ((Fun ◡f ∧
(((Fun g ∧ dom g = B) ∧ ran
g ⊆ A) ∧ Fun ◡g))
→ Fun ◡H) |