Metamath Proof Explorer


Theorem ax5seglem8

Description: Lemma for ax5seg . Use the weak deduction theorem to eliminate the hypotheses from ax5seglem7 . (Contributed by Scott Fenton, 11-Jun-2013)

Ref Expression
Assertion ax5seglem8 ATCDTCD2=1TA+TC-D2+1TTAC2AD2

Proof

Step Hyp Ref Expression
1 oveq2 A=ifAA01TA=1TifAA0
2 1 oveq1d A=ifAA01TA+TC=1TifAA0+TC
3 2 oveq1d A=ifAA01TA+TC-D=1TifAA0+TC-D
4 3 oveq1d A=ifAA01TA+TC-D2=1TifAA0+TC-D2
5 oveq1 A=ifAA0AC=ifAA0C
6 5 oveq1d A=ifAA0AC2=ifAA0C2
7 6 oveq2d A=ifAA0TAC2=TifAA0C2
8 oveq1 A=ifAA0AD=ifAA0D
9 8 oveq1d A=ifAA0AD2=ifAA0D2
10 7 9 oveq12d A=ifAA0TAC2AD2=TifAA0C2ifAA0D2
11 10 oveq2d A=ifAA01TTAC2AD2=1TTifAA0C2ifAA0D2
12 4 11 oveq12d A=ifAA01TA+TC-D2+1TTAC2AD2=1TifAA0+TC-D2+1TTifAA0C2ifAA0D2
13 12 eqeq2d A=ifAA0TCD2=1TA+TC-D2+1TTAC2AD2TCD2=1TifAA0+TC-D2+1TTifAA0C2ifAA0D2
14 oveq1 T=ifTT0TCD2=ifTT0CD2
15 oveq2 T=ifTT01T=1ifTT0
16 15 oveq1d T=ifTT01TifAA0=1ifTT0ifAA0
17 oveq1 T=ifTT0TC=ifTT0C
18 16 17 oveq12d T=ifTT01TifAA0+TC=1ifTT0ifAA0+ifTT0C
19 18 oveq1d T=ifTT01TifAA0+TC-D=1ifTT0ifAA0+ifTT0C-D
20 19 oveq1d T=ifTT01TifAA0+TC-D2=1ifTT0ifAA0+ifTT0C-D2
21 oveq1 T=ifTT0TifAA0C2=ifTT0ifAA0C2
22 21 oveq1d T=ifTT0TifAA0C2ifAA0D2=ifTT0ifAA0C2ifAA0D2
23 15 22 oveq12d T=ifTT01TTifAA0C2ifAA0D2=1ifTT0ifTT0ifAA0C2ifAA0D2
24 20 23 oveq12d T=ifTT01TifAA0+TC-D2+1TTifAA0C2ifAA0D2=1ifTT0ifAA0+ifTT0C-D2+1ifTT0ifTT0ifAA0C2ifAA0D2
25 14 24 eqeq12d T=ifTT0TCD2=1TifAA0+TC-D2+1TTifAA0C2ifAA0D2ifTT0CD2=1ifTT0ifAA0+ifTT0C-D2+1ifTT0ifTT0ifAA0C2ifAA0D2
26 oveq1 C=ifCC0CD=ifCC0D
27 26 oveq1d C=ifCC0CD2=ifCC0D2
28 27 oveq2d C=ifCC0ifTT0CD2=ifTT0ifCC0D2
29 oveq2 C=ifCC0ifTT0C=ifTT0ifCC0
30 29 oveq2d C=ifCC01ifTT0ifAA0+ifTT0C=1ifTT0ifAA0+ifTT0ifCC0
31 30 oveq1d C=ifCC01ifTT0ifAA0+ifTT0C-D=1ifTT0ifAA0+ifTT0ifCC0-D
32 31 oveq1d C=ifCC01ifTT0ifAA0+ifTT0C-D2=1ifTT0ifAA0+ifTT0ifCC0-D2
33 oveq2 C=ifCC0ifAA0C=ifAA0ifCC0
34 33 oveq1d C=ifCC0ifAA0C2=ifAA0ifCC02
35 34 oveq2d C=ifCC0ifTT0ifAA0C2=ifTT0ifAA0ifCC02
36 35 oveq1d C=ifCC0ifTT0ifAA0C2ifAA0D2=ifTT0ifAA0ifCC02ifAA0D2
37 36 oveq2d C=ifCC01ifTT0ifTT0ifAA0C2ifAA0D2=1ifTT0ifTT0ifAA0ifCC02ifAA0D2
38 32 37 oveq12d C=ifCC01ifTT0ifAA0+ifTT0C-D2+1ifTT0ifTT0ifAA0C2ifAA0D2=1ifTT0ifAA0+ifTT0ifCC0-D2+1ifTT0ifTT0ifAA0ifCC02ifAA0D2
39 28 38 eqeq12d C=ifCC0ifTT0CD2=1ifTT0ifAA0+ifTT0C-D2+1ifTT0ifTT0ifAA0C2ifAA0D2ifTT0ifCC0D2=1ifTT0ifAA0+ifTT0ifCC0-D2+1ifTT0ifTT0ifAA0ifCC02ifAA0D2
40 oveq2 D=ifDD0ifCC0D=ifCC0ifDD0
41 40 oveq1d D=ifDD0ifCC0D2=ifCC0ifDD02
42 41 oveq2d D=ifDD0ifTT0ifCC0D2=ifTT0ifCC0ifDD02
43 oveq2 D=ifDD01ifTT0ifAA0+ifTT0ifCC0-D=1ifTT0ifAA0+ifTT0ifCC0-ifDD0
44 43 oveq1d D=ifDD01ifTT0ifAA0+ifTT0ifCC0-D2=1ifTT0ifAA0+ifTT0ifCC0-ifDD02
45 oveq2 D=ifDD0ifAA0D=ifAA0ifDD0
46 45 oveq1d D=ifDD0ifAA0D2=ifAA0ifDD02
47 46 oveq2d D=ifDD0ifTT0ifAA0ifCC02ifAA0D2=ifTT0ifAA0ifCC02ifAA0ifDD02
48 47 oveq2d D=ifDD01ifTT0ifTT0ifAA0ifCC02ifAA0D2=1ifTT0ifTT0ifAA0ifCC02ifAA0ifDD02
49 44 48 oveq12d D=ifDD01ifTT0ifAA0+ifTT0ifCC0-D2+1ifTT0ifTT0ifAA0ifCC02ifAA0D2=1ifTT0ifAA0+ifTT0ifCC0-ifDD02+1ifTT0ifTT0ifAA0ifCC02ifAA0ifDD02
50 42 49 eqeq12d D=ifDD0ifTT0ifCC0D2=1ifTT0ifAA0+ifTT0ifCC0-D2+1ifTT0ifTT0ifAA0ifCC02ifAA0D2ifTT0ifCC0ifDD02=1ifTT0ifAA0+ifTT0ifCC0-ifDD02+1ifTT0ifTT0ifAA0ifCC02ifAA0ifDD02
51 0cn 0
52 51 elimel ifAA0
53 51 elimel ifTT0
54 51 elimel ifCC0
55 51 elimel ifDD0
56 52 53 54 55 ax5seglem7 ifTT0ifCC0ifDD02=1ifTT0ifAA0+ifTT0ifCC0-ifDD02+1ifTT0ifTT0ifAA0ifCC02ifAA0ifDD02
57 13 25 39 50 56 dedth4h ATCDTCD2=1TA+TC-D2+1TTAC2AD2