Metamath Proof Explorer


Theorem stj

Description: The value of a state on a join. (Contributed by NM, 23-Oct-1999) (New usage is discouraged.)

Ref Expression
Assertion stj ⊢ S ∈ States → A ∈ C ℋ ∧ B ∈ C ℋ ∧ A ⊆ ⊥ ⁡ B → S ⁡ A ∨ ℋ B = S ⁡ A + S ⁡ B

Proof

Step Hyp Ref Expression
1 isst ⊢ S ∈ States ↔ S : C ℋ ⟶ 0 1 ∧ S ⁡ ℋ = 1 ∧ ∀ x ∈ C ℋ ∀ y ∈ C ℋ x ⊆ ⊥ ⁡ y → S ⁡ x ∨ ℋ y = S ⁡ x + S ⁡ y
2 1 simp3bi ⊢ S ∈ States → ∀ x ∈ C ℋ ∀ y ∈ C ℋ x ⊆ ⊥ ⁡ y → S ⁡ x ∨ ℋ y = S ⁡ x + S ⁡ y
3 sseq1 ⊢ x = A → x ⊆ ⊥ ⁡ y ↔ A ⊆ ⊥ ⁡ y
4 fvoveq1 ⊢ x = A → S ⁡ x ∨ ℋ y = S ⁡ A ∨ ℋ y
5 fveq2 ⊢ x = A → S ⁡ x = S ⁡ A
6 5 oveq1d ⊢ x = A → S ⁡ x + S ⁡ y = S ⁡ A + S ⁡ y
7 4 6 eqeq12d ⊢ x = A → S ⁡ x ∨ ℋ y = S ⁡ x + S ⁡ y ↔ S ⁡ A ∨ ℋ y = S ⁡ A + S ⁡ y
8 3 7 imbi12d ⊢ x = A → x ⊆ ⊥ ⁡ y → S ⁡ x ∨ ℋ y = S ⁡ x + S ⁡ y ↔ A ⊆ ⊥ ⁡ y → S ⁡ A ∨ ℋ y = S ⁡ A + S ⁡ y
9 fveq2 ⊢ y = B → ⊥ ⁡ y = ⊥ ⁡ B
10 9 sseq2d ⊢ y = B → A ⊆ ⊥ ⁡ y ↔ A ⊆ ⊥ ⁡ B
11 oveq2 ⊢ y = B → A ∨ ℋ y = A ∨ ℋ B
12 11 fveq2d ⊢ y = B → S ⁡ A ∨ ℋ y = S ⁡ A ∨ ℋ B
13 fveq2 ⊢ y = B → S ⁡ y = S ⁡ B
14 13 oveq2d ⊢ y = B → S ⁡ A + S ⁡ y = S ⁡ A + S ⁡ B
15 12 14 eqeq12d ⊢ y = B → S ⁡ A ∨ ℋ y = S ⁡ A + S ⁡ y ↔ S ⁡ A ∨ ℋ B = S ⁡ A + S ⁡ B
16 10 15 imbi12d ⊢ y = B → A ⊆ ⊥ ⁡ y → S ⁡ A ∨ ℋ y = S ⁡ A + S ⁡ y ↔ A ⊆ ⊥ ⁡ B → S ⁡ A ∨ ℋ B = S ⁡ A + S ⁡ B
17 8 16 rspc2v ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ∀ x ∈ C ℋ ∀ y ∈ C ℋ x ⊆ ⊥ ⁡ y → S ⁡ x ∨ ℋ y = S ⁡ x + S ⁡ y → A ⊆ ⊥ ⁡ B → S ⁡ A ∨ ℋ B = S ⁡ A + S ⁡ B
18 2 17 syl5com ⊢ S ∈ States → A ∈ C ℋ ∧ B ∈ C ℋ → A ⊆ ⊥ ⁡ B → S ⁡ A ∨ ℋ B = S ⁡ A + S ⁡ B
19 18 impd ⊢ S ∈ States → A ∈ C ℋ ∧ B ∈ C ℋ ∧ A ⊆ ⊥ ⁡ B → S ⁡ A ∨ ℋ B = S ⁡ A + S ⁡ B