Metamath Proof Explorer


Theorem resspos

Description: The restriction of a Poset is a Poset. (Contributed by Thierry Arnoux, 20-Jan-2018)

Ref Expression
Assertion resspos ⊢ F ∈ Poset ∧ A ∈ V → F ↾ 𝑠 A ∈ Poset

Proof

Step Hyp Ref Expression
1 ovexd ⊢ F ∈ Poset ∧ A ∈ V → F ↾ 𝑠 A ∈ V
2 eqid ⊢ F ↾ 𝑠 A = F ↾ 𝑠 A
3 eqid ⊢ Base F = Base F
4 2 3 ressbas ⊢ A ∈ V → A ∩ Base F = Base F ↾ 𝑠 A
5 inss2 ⊢ A ∩ Base F ⊆ Base F
6 4 5 eqsstrrdi ⊢ A ∈ V → Base F ↾ 𝑠 A ⊆ Base F
7 6 adantl ⊢ F ∈ Poset ∧ A ∈ V → Base F ↾ 𝑠 A ⊆ Base F
8 eqid ⊢ ≤ F = ≤ F
9 3 8 ispos ⊢ F ∈ Poset ↔ F ∈ V ∧ ∀ x ∈ Base F ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
10 9 simprbi ⊢ F ∈ Poset → ∀ x ∈ Base F ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
11 10 adantr ⊢ F ∈ Poset ∧ A ∈ V → ∀ x ∈ Base F ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
12 ssralv ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
13 12 ralimdv ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ y ∈ Base F ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
14 ssralv ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ y ∈ Base F ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
15 13 14 syld ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
16 15 ralimdv ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ x ∈ Base F ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ x ∈ Base F ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
17 ssralv ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ x ∈ Base F ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
18 16 17 syld ⊢ Base F ↾ 𝑠 A ⊆ Base F → ∀ x ∈ Base F ∀ y ∈ Base F ∀ z ∈ Base F x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z → ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
19 7 11 18 sylc ⊢ F ∈ Poset ∧ A ∈ V → ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z
20 2 8 ressle ⊢ A ∈ V → ≤ F = ≤ F ↾ 𝑠 A
21 20 adantl ⊢ F ∈ Poset ∧ A ∈ V → ≤ F = ≤ F ↾ 𝑠 A
22 breq ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F x ↔ x ≤ F ↾ 𝑠 A x
23 breq ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F y ↔ x ≤ F ↾ 𝑠 A y
24 breq ⊢ ≤ F = ≤ F ↾ 𝑠 A → y ≤ F x ↔ y ≤ F ↾ 𝑠 A x
25 23 24 anbi12d ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F y ∧ y ≤ F x ↔ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x
26 25 imbi1d ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F y ∧ y ≤ F x → x = y ↔ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y
27 breq ⊢ ≤ F = ≤ F ↾ 𝑠 A → y ≤ F z ↔ y ≤ F ↾ 𝑠 A z
28 23 27 anbi12d ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F y ∧ y ≤ F z ↔ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z
29 breq ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F z ↔ x ≤ F ↾ 𝑠 A z
30 28 29 imbi12d ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F y ∧ y ≤ F z → x ≤ F z ↔ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
31 22 26 30 3anbi123d ⊢ ≤ F = ≤ F ↾ 𝑠 A → x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z ↔ x ≤ F ↾ 𝑠 A x ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
32 31 ralbidv ⊢ ≤ F = ≤ F ↾ 𝑠 A → ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z ↔ ∀ z ∈ Base F ↾ 𝑠 A x ≤ F ↾ 𝑠 A x ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
33 32 2ralbidv ⊢ ≤ F = ≤ F ↾ 𝑠 A → ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z ↔ ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F ↾ 𝑠 A x ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
34 21 33 syl ⊢ F ∈ Poset ∧ A ∈ V → ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F x ∧ x ≤ F y ∧ y ≤ F x → x = y ∧ x ≤ F y ∧ y ≤ F z → x ≤ F z ↔ ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F ↾ 𝑠 A x ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
35 19 34 mpbid ⊢ F ∈ Poset ∧ A ∈ V → ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F ↾ 𝑠 A x ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
36 eqid ⊢ Base F ↾ 𝑠 A = Base F ↾ 𝑠 A
37 eqid ⊢ ≤ F ↾ 𝑠 A = ≤ F ↾ 𝑠 A
38 36 37 ispos ⊢ F ↾ 𝑠 A ∈ Poset ↔ F ↾ 𝑠 A ∈ V ∧ ∀ x ∈ Base F ↾ 𝑠 A ∀ y ∈ Base F ↾ 𝑠 A ∀ z ∈ Base F ↾ 𝑠 A x ≤ F ↾ 𝑠 A x ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A x → x = y ∧ x ≤ F ↾ 𝑠 A y ∧ y ≤ F ↾ 𝑠 A z → x ≤ F ↾ 𝑠 A z
39 1 35 38 sylanbrc ⊢ F ∈ Poset ∧ A ∈ V → F ↾ 𝑠 A ∈ Poset