Metamath Proof Explorer


Theorem hosubeq0i

Description: If the difference between two operators is zero, they are equal. (Contributed by NM, 27-Jul-2006) (New usage is discouraged.)

Ref Expression
Hypotheses hosd1.2 ⊢ T : ℋ ⟶ ℋ
hosd1.3 ⊢ U : ℋ ⟶ ℋ
Assertion hosubeq0i ⊢ T - op U = 0 hop ↔ T = U

Proof

Step Hyp Ref Expression
1 hosd1.2 ⊢ T : ℋ ⟶ ℋ
2 hosd1.3 ⊢ U : ℋ ⟶ ℋ
3 1 2 honegsubi ⊢ T + op -1 · op U = T - op U
4 3 eqeq1i ⊢ T + op -1 · op U = 0 hop ↔ T - op U = 0 hop
5 oveq1 ⊢ T + op -1 · op U = 0 hop → T + op -1 · op U + op U = 0 hop + op U
6 4 5 sylbir ⊢ T - op U = 0 hop → T + op -1 · op U + op U = 0 hop + op U
7 neg1cn ⊢ − 1 ∈ ℂ
8 homulcl ⊢ − 1 ∈ ℂ ∧ U : ℋ ⟶ ℋ → -1 · op U : ℋ ⟶ ℋ
9 7 2 8 mp2an ⊢ -1 · op U : ℋ ⟶ ℋ
10 1 9 2 hoadd32i ⊢ T + op -1 · op U + op U = T + op U + op -1 · op U
11 1 2 9 hoaddassi ⊢ T + op U + op -1 · op U = T + op U + op -1 · op U
12 2 2 honegsubi ⊢ U + op -1 · op U = U - op U
13 2 hodidi ⊢ U - op U = 0 hop
14 12 13 eqtri ⊢ U + op -1 · op U = 0 hop
15 14 oveq2i ⊢ T + op U + op -1 · op U = T + op 0 hop
16 1 hoaddridi ⊢ T + op 0 hop = T
17 15 16 eqtri ⊢ T + op U + op -1 · op U = T
18 11 17 eqtri ⊢ T + op U + op -1 · op U = T
19 10 18 eqtri ⊢ T + op -1 · op U + op U = T
20 ho0f ⊢ 0 hop : ℋ ⟶ ℋ
21 20 2 hoaddcomi ⊢ 0 hop + op U = U + op 0 hop
22 2 hoaddridi ⊢ U + op 0 hop = U
23 21 22 eqtri ⊢ 0 hop + op U = U
24 6 19 23 3eqtr3g ⊢ T - op U = 0 hop → T = U
25 oveq1 ⊢ T = U → T - op U = U - op U
26 25 13 eqtrdi ⊢ T = U → T - op U = 0 hop
27 24 26 impbii ⊢ T - op U = 0 hop ↔ T = U