Proof of Theorem funpsstri
Step | Hyp | Ref
| Expression |
1 | | funssres 6478 |
. . . . . 6
⊢ ((Fun
𝐻 ∧ 𝐹 ⊆ 𝐻) → (𝐻 ↾ dom 𝐹) = 𝐹) |
2 | 1 | ex 413 |
. . . . 5
⊢ (Fun
𝐻 → (𝐹 ⊆ 𝐻 → (𝐻 ↾ dom 𝐹) = 𝐹)) |
3 | | funssres 6478 |
. . . . . 6
⊢ ((Fun
𝐻 ∧ 𝐺 ⊆ 𝐻) → (𝐻 ↾ dom 𝐺) = 𝐺) |
4 | 3 | ex 413 |
. . . . 5
⊢ (Fun
𝐻 → (𝐺 ⊆ 𝐻 → (𝐻 ↾ dom 𝐺) = 𝐺)) |
5 | 2, 4 | anim12d 609 |
. . . 4
⊢ (Fun
𝐻 → ((𝐹 ⊆ 𝐻 ∧ 𝐺 ⊆ 𝐻) → ((𝐻 ↾ dom 𝐹) = 𝐹 ∧ (𝐻 ↾ dom 𝐺) = 𝐺))) |
6 | | ssres2 5919 |
. . . . . 6
⊢ (dom
𝐹 ⊆ dom 𝐺 → (𝐻 ↾ dom 𝐹) ⊆ (𝐻 ↾ dom 𝐺)) |
7 | | ssres2 5919 |
. . . . . 6
⊢ (dom
𝐺 ⊆ dom 𝐹 → (𝐻 ↾ dom 𝐺) ⊆ (𝐻 ↾ dom 𝐹)) |
8 | 6, 7 | orim12i 906 |
. . . . 5
⊢ ((dom
𝐹 ⊆ dom 𝐺 ∨ dom 𝐺 ⊆ dom 𝐹) → ((𝐻 ↾ dom 𝐹) ⊆ (𝐻 ↾ dom 𝐺) ∨ (𝐻 ↾ dom 𝐺) ⊆ (𝐻 ↾ dom 𝐹))) |
9 | | sseq12 3948 |
. . . . . 6
⊢ (((𝐻 ↾ dom 𝐹) = 𝐹 ∧ (𝐻 ↾ dom 𝐺) = 𝐺) → ((𝐻 ↾ dom 𝐹) ⊆ (𝐻 ↾ dom 𝐺) ↔ 𝐹 ⊆ 𝐺)) |
10 | | sseq12 3948 |
. . . . . . 7
⊢ (((𝐻 ↾ dom 𝐺) = 𝐺 ∧ (𝐻 ↾ dom 𝐹) = 𝐹) → ((𝐻 ↾ dom 𝐺) ⊆ (𝐻 ↾ dom 𝐹) ↔ 𝐺 ⊆ 𝐹)) |
11 | 10 | ancoms 459 |
. . . . . 6
⊢ (((𝐻 ↾ dom 𝐹) = 𝐹 ∧ (𝐻 ↾ dom 𝐺) = 𝐺) → ((𝐻 ↾ dom 𝐺) ⊆ (𝐻 ↾ dom 𝐹) ↔ 𝐺 ⊆ 𝐹)) |
12 | 9, 11 | orbi12d 916 |
. . . . 5
⊢ (((𝐻 ↾ dom 𝐹) = 𝐹 ∧ (𝐻 ↾ dom 𝐺) = 𝐺) → (((𝐻 ↾ dom 𝐹) ⊆ (𝐻 ↾ dom 𝐺) ∨ (𝐻 ↾ dom 𝐺) ⊆ (𝐻 ↾ dom 𝐹)) ↔ (𝐹 ⊆ 𝐺 ∨ 𝐺 ⊆ 𝐹))) |
13 | 8, 12 | syl5ib 243 |
. . . 4
⊢ (((𝐻 ↾ dom 𝐹) = 𝐹 ∧ (𝐻 ↾ dom 𝐺) = 𝐺) → ((dom 𝐹 ⊆ dom 𝐺 ∨ dom 𝐺 ⊆ dom 𝐹) → (𝐹 ⊆ 𝐺 ∨ 𝐺 ⊆ 𝐹))) |
14 | 5, 13 | syl6 35 |
. . 3
⊢ (Fun
𝐻 → ((𝐹 ⊆ 𝐻 ∧ 𝐺 ⊆ 𝐻) → ((dom 𝐹 ⊆ dom 𝐺 ∨ dom 𝐺 ⊆ dom 𝐹) → (𝐹 ⊆ 𝐺 ∨ 𝐺 ⊆ 𝐹)))) |
15 | 14 | 3imp 1110 |
. 2
⊢ ((Fun
𝐻 ∧ (𝐹 ⊆ 𝐻 ∧ 𝐺 ⊆ 𝐻) ∧ (dom 𝐹 ⊆ dom 𝐺 ∨ dom 𝐺 ⊆ dom 𝐹)) → (𝐹 ⊆ 𝐺 ∨ 𝐺 ⊆ 𝐹)) |
16 | | sspsstri 4037 |
. 2
⊢ ((𝐹 ⊆ 𝐺 ∨ 𝐺 ⊆ 𝐹) ↔ (𝐹 ⊊ 𝐺 ∨ 𝐹 = 𝐺 ∨ 𝐺 ⊊ 𝐹)) |
17 | 15, 16 | sylib 217 |
1
⊢ ((Fun
𝐻 ∧ (𝐹 ⊆ 𝐻 ∧ 𝐺 ⊆ 𝐻) ∧ (dom 𝐹 ⊆ dom 𝐺 ∨ dom 𝐺 ⊆ dom 𝐹)) → (𝐹 ⊊ 𝐺 ∨ 𝐹 = 𝐺 ∨ 𝐺 ⊊ 𝐹)) |