Metamath Proof Explorer


Theorem sn-addid2

Description: addid2 without ax-mulcom . (Contributed by SN, 23-Jan-2024)

Ref Expression
Assertion sn-addid2 A 0 + A = A

Proof

Step Hyp Ref Expression
1 cnre A x y A = x + i y
2 0cnd A x y A = x + i y 0
3 simp2l A x y A = x + i y x
4 3 recnd A x y A = x + i y x
5 ax-icn i
6 5 a1i A x y A = x + i y i
7 simp2r A x y A = x + i y y
8 7 recnd A x y A = x + i y y
9 6 8 mulcld A x y A = x + i y i y
10 2 4 9 addassd A x y A = x + i y 0 + x + i y = 0 + x + i y
11 readdid2 x 0 + x = x
12 11 adantr x y 0 + x = x
13 12 3ad2ant2 A x y A = x + i y 0 + x = x
14 13 oveq1d A x y A = x + i y 0 + x + i y = x + i y
15 10 14 eqtr3d A x y A = x + i y 0 + x + i y = x + i y
16 simp3 A x y A = x + i y A = x + i y
17 16 oveq2d A x y A = x + i y 0 + A = 0 + x + i y
18 15 17 16 3eqtr4d A x y A = x + i y 0 + A = A
19 18 3exp A x y A = x + i y 0 + A = A
20 19 rexlimdvv A x y A = x + i y 0 + A = A
21 1 20 mpd A 0 + A = A