Metamath Proof Explorer


Theorem sn-it0e0

Description: Proof of it0e0 without ax-mulcom . Informally, a real number times 0 is 0, and E. r e. RR r = _i x. s by ax-cnre and renegid2 . (Contributed by SN, 30-Apr-2024)

Ref Expression
Assertion sn-it0e0 i0=0

Proof

Step Hyp Ref Expression
1 0cn 0
2 cnre 0ab0=a+ib
3 oveq2 0=a+ib0-a+0=0-a+a+ib
4 ax-icn i
5 4 a1i bi
6 recn bb
7 0cnd b0
8 5 6 7 mulassd bib0=ib0
9 remul01 bb0=0
10 9 oveq2d bib0=i0
11 8 10 eqtrd bib0=i0
12 11 ad2antlr ab0-a+0=0-a+a+ibib0=i0
13 rernegcl a0-a
14 13 recnd a0-a
15 14 adantr ab0-a
16 recn aa
17 16 adantr aba
18 5 6 mulcld bib
19 18 adantl abib
20 15 17 19 addassd ab0-a+a+ib=0-a+a+ib
21 renegid2 a0-a+a=0
22 21 oveq1d a0-a+a+ib=0+ib
23 sn-addlid ib0+ib=ib
24 18 23 syl b0+ib=ib
25 22 24 sylan9eq ab0-a+a+ib=ib
26 20 25 eqtr3d ab0-a+a+ib=ib
27 26 eqeq2d ab0-a+0=0-a+a+ib0-a+0=ib
28 27 biimpa ab0-a+0=0-a+a+ib0-a+0=ib
29 28 oveq1d ab0-a+0=0-a+a+ib0-a+00=ib0
30 elre0re a0
31 13 30 readdcld a0-a+0
32 31 ad2antrr ab0-a+0=0-a+a+ib0-a+0
33 remul01 0-a+00-a+00=0
34 32 33 syl ab0-a+0=0-a+a+ib0-a+00=0
35 29 34 eqtr3d ab0-a+0=0-a+a+ibib0=0
36 12 35 eqtr3d ab0-a+0=0-a+a+ibi0=0
37 36 ex ab0-a+0=0-a+a+ibi0=0
38 3 37 syl5 ab0=a+ibi0=0
39 38 rexlimivv ab0=a+ibi0=0
40 1 2 39 mp2b i0=0