Step | Hyp | Ref
| Expression |
1 | | ishst 28457 |
. . . 4
⊢ (𝑆 ∈ CHStates ↔ (𝑆:
Cℋ ⟶ ℋ ∧
(normℎ‘(𝑆‘ ℋ)) = 1 ∧ ∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)))))) |
2 | 1 | simp3bi 1071 |
. . 3
⊢ (𝑆 ∈ CHStates →
∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦))))) |
3 | 2 | ad2antrr 758 |
. 2
⊢ (((𝑆 ∈ CHStates ∧ 𝐴 ∈
Cℋ ) ∧ (𝐵 ∈ Cℋ
∧ 𝐴 ⊆
(⊥‘𝐵))) →
∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦))))) |
4 | | sseq1 3589 |
. . . . . . 7
⊢ (𝑥 = 𝐴 → (𝑥 ⊆ (⊥‘𝑦) ↔ 𝐴 ⊆ (⊥‘𝑦))) |
5 | | fveq2 6103 |
. . . . . . . . . 10
⊢ (𝑥 = 𝐴 → (𝑆‘𝑥) = (𝑆‘𝐴)) |
6 | 5 | oveq1d 6564 |
. . . . . . . . 9
⊢ (𝑥 = 𝐴 → ((𝑆‘𝑥) ·ih (𝑆‘𝑦)) = ((𝑆‘𝐴) ·ih (𝑆‘𝑦))) |
7 | 6 | eqeq1d 2612 |
. . . . . . . 8
⊢ (𝑥 = 𝐴 → (((𝑆‘𝑥) ·ih (𝑆‘𝑦)) = 0 ↔ ((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = 0)) |
8 | | oveq1 6556 |
. . . . . . . . . 10
⊢ (𝑥 = 𝐴 → (𝑥 ∨ℋ 𝑦) = (𝐴 ∨ℋ 𝑦)) |
9 | 8 | fveq2d 6107 |
. . . . . . . . 9
⊢ (𝑥 = 𝐴 → (𝑆‘(𝑥 ∨ℋ 𝑦)) = (𝑆‘(𝐴 ∨ℋ 𝑦))) |
10 | 5 | oveq1d 6564 |
. . . . . . . . 9
⊢ (𝑥 = 𝐴 → ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦))) |
11 | 9, 10 | eqeq12d 2625 |
. . . . . . . 8
⊢ (𝑥 = 𝐴 → ((𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)) ↔ (𝑆‘(𝐴 ∨ℋ 𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦)))) |
12 | 7, 11 | anbi12d 743 |
. . . . . . 7
⊢ (𝑥 = 𝐴 → ((((𝑆‘𝑥) ·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦))) ↔ (((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦))))) |
13 | 4, 12 | imbi12d 333 |
. . . . . 6
⊢ (𝑥 = 𝐴 → ((𝑥 ⊆ (⊥‘𝑦) → (((𝑆‘𝑥) ·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)))) ↔ (𝐴 ⊆ (⊥‘𝑦) → (((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦)))))) |
14 | | fveq2 6103 |
. . . . . . . 8
⊢ (𝑦 = 𝐵 → (⊥‘𝑦) = (⊥‘𝐵)) |
15 | 14 | sseq2d 3596 |
. . . . . . 7
⊢ (𝑦 = 𝐵 → (𝐴 ⊆ (⊥‘𝑦) ↔ 𝐴 ⊆ (⊥‘𝐵))) |
16 | | fveq2 6103 |
. . . . . . . . . 10
⊢ (𝑦 = 𝐵 → (𝑆‘𝑦) = (𝑆‘𝐵)) |
17 | 16 | oveq2d 6565 |
. . . . . . . . 9
⊢ (𝑦 = 𝐵 → ((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = ((𝑆‘𝐴) ·ih (𝑆‘𝐵))) |
18 | 17 | eqeq1d 2612 |
. . . . . . . 8
⊢ (𝑦 = 𝐵 → (((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = 0 ↔ ((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0)) |
19 | | oveq2 6557 |
. . . . . . . . . 10
⊢ (𝑦 = 𝐵 → (𝐴 ∨ℋ 𝑦) = (𝐴 ∨ℋ 𝐵)) |
20 | 19 | fveq2d 6107 |
. . . . . . . . 9
⊢ (𝑦 = 𝐵 → (𝑆‘(𝐴 ∨ℋ 𝑦)) = (𝑆‘(𝐴 ∨ℋ 𝐵))) |
21 | 16 | oveq2d 6565 |
. . . . . . . . 9
⊢ (𝑦 = 𝐵 → ((𝑆‘𝐴) +ℎ (𝑆‘𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵))) |
22 | 20, 21 | eqeq12d 2625 |
. . . . . . . 8
⊢ (𝑦 = 𝐵 → ((𝑆‘(𝐴 ∨ℋ 𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦)) ↔ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵)))) |
23 | 18, 22 | anbi12d 743 |
. . . . . . 7
⊢ (𝑦 = 𝐵 → ((((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦))) ↔ (((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵))))) |
24 | 15, 23 | imbi12d 333 |
. . . . . 6
⊢ (𝑦 = 𝐵 → ((𝐴 ⊆ (⊥‘𝑦) → (((𝑆‘𝐴) ·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝑦)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝑦)))) ↔ (𝐴 ⊆ (⊥‘𝐵) → (((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵)))))) |
25 | 13, 24 | rspc2v 3293 |
. . . . 5
⊢ ((𝐴 ∈
Cℋ ∧ 𝐵 ∈ Cℋ )
→ (∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)))) → (𝐴 ⊆ (⊥‘𝐵) → (((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵)))))) |
26 | 25 | com23 84 |
. . . 4
⊢ ((𝐴 ∈
Cℋ ∧ 𝐵 ∈ Cℋ )
→ (𝐴 ⊆
(⊥‘𝐵) →
(∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)))) → (((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵)))))) |
27 | 26 | impr 647 |
. . 3
⊢ ((𝐴 ∈
Cℋ ∧ (𝐵 ∈ Cℋ
∧ 𝐴 ⊆
(⊥‘𝐵))) →
(∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)))) → (((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵))))) |
28 | 27 | adantll 746 |
. 2
⊢ (((𝑆 ∈ CHStates ∧ 𝐴 ∈
Cℋ ) ∧ (𝐵 ∈ Cℋ
∧ 𝐴 ⊆
(⊥‘𝐵))) →
(∀𝑥 ∈
Cℋ ∀𝑦 ∈ Cℋ
(𝑥 ⊆
(⊥‘𝑦) →
(((𝑆‘𝑥)
·ih (𝑆‘𝑦)) = 0 ∧ (𝑆‘(𝑥 ∨ℋ 𝑦)) = ((𝑆‘𝑥) +ℎ (𝑆‘𝑦)))) → (((𝑆‘𝐴) ·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵))))) |
29 | 3, 28 | mpd 15 |
1
⊢ (((𝑆 ∈ CHStates ∧ 𝐴 ∈
Cℋ ) ∧ (𝐵 ∈ Cℋ
∧ 𝐴 ⊆
(⊥‘𝐵))) →
(((𝑆‘𝐴)
·ih (𝑆‘𝐵)) = 0 ∧ (𝑆‘(𝐴 ∨ℋ 𝐵)) = ((𝑆‘𝐴) +ℎ (𝑆‘𝐵)))) |