Metamath Proof Explorer


Theorem sumdmdlem2

Description: Lemma for sumdmdi . (Contributed by NM, 23-Dec-2004) (New usage is discouraged.)

Ref Expression
Hypotheses sumdmdi.1 A C
sumdmdi.2 B C
Assertion sumdmdlem2 x HAtoms x B A B x B A B A + B = A B

Proof

Step Hyp Ref Expression
1 sumdmdi.1 A C
2 sumdmdi.2 B C
3 1 2 chjcli A B C
4 3 cheli y A B y
5 spansnsh y span y S
6 2 chshii B S
7 shsub2 span y S B S span y B + span y
8 5 6 7 sylancl y span y B + span y
9 spansnid y y span y
10 8 9 sseldd y y B + span y
11 10 ad2antrl x HAtoms x B A B x B A B y ¬ y A + B y B + span y
12 elin y B + span y A B y B + span y y A B
13 df-ne y 0 ¬ y = 0
14 spansna y y 0 span y HAtoms
15 13 14 sylan2br y ¬ y = 0 span y HAtoms
16 oveq1 x = span y x B = span y B
17 16 ineq1d x = span y x B A B = span y B A B
18 16 ineq1d x = span y x B A = span y B A
19 18 oveq1d x = span y x B A B = span y B A B
20 17 19 sseq12d x = span y x B A B x B A B span y B A B span y B A B
21 20 rspcv span y HAtoms x HAtoms x B A B x B A B span y B A B span y B A B
22 15 21 syl y ¬ y = 0 x HAtoms x B A B x B A B span y B A B span y B A B
23 spansnj B C y B + span y = B span y
24 spansnch y span y C
25 chjcom B C span y C B span y = span y B
26 24 25 sylan2 B C y B span y = span y B
27 23 26 eqtrd B C y B + span y = span y B
28 2 27 mpan y B + span y = span y B
29 28 ineq1d y B + span y A B = span y B A B
30 28 ineq1d y B + span y A = span y B A
31 30 oveq1d y B + span y A B = span y B A B
32 29 31 sseq12d y B + span y A B B + span y A B span y B A B span y B A B
33 32 adantr y ¬ y = 0 B + span y A B B + span y A B span y B A B span y B A B
34 22 33 sylibrd y ¬ y = 0 x HAtoms x B A B x B A B B + span y A B B + span y A B
35 34 com12 x HAtoms x B A B x B A B y ¬ y = 0 B + span y A B B + span y A B
36 35 expdimp x HAtoms x B A B x B A B y ¬ y = 0 B + span y A B B + span y A B
37 ssid B B
38 sneq y = 0 y = 0
39 38 fveq2d y = 0 span y = span 0
40 spansn0 span 0 = 0
41 39 40 eqtrdi y = 0 span y = 0
42 41 oveq2d y = 0 B + span y = B + 0
43 6 shs0i B + 0 = B
44 42 43 eqtrdi y = 0 B + span y = B
45 44 ineq1d y = 0 B + span y A B = B A B
46 inss1 B A B B
47 2 1 chub2i B A B
48 37 47 ssini B B A B
49 46 48 eqssi B A B = B
50 45 49 eqtrdi y = 0 B + span y A B = B
51 44 ineq1d y = 0 B + span y A = B A
52 51 oveq1d y = 0 B + span y A B = B A B
53 2 1 chincli B A C
54 53 2 chjcomi B A B = B B A
55 2 1 chabs1i B B A = B
56 54 55 eqtri B A B = B
57 52 56 eqtrdi y = 0 B + span y A B = B
58 50 57 sseq12d y = 0 B + span y A B B + span y A B B B
59 37 58 mpbiri y = 0 B + span y A B B + span y A B
60 36 59 pm2.61d2 x HAtoms x B A B x B A B y B + span y A B B + span y A B
61 60 adantrr x HAtoms x B A B x B A B y ¬ y A + B B + span y A B B + span y A B
62 1 2 sumdmdlem y ¬ y A + B B + span y A = B A
63 62 oveq1d y ¬ y A + B B + span y A B = B A B
64 63 56 eqtrdi y ¬ y A + B B + span y A B = B
65 1 chshii A S
66 6 65 shsub2i B A + B
67 64 66 eqsstrdi y ¬ y A + B B + span y A B A + B
68 67 adantl x HAtoms x B A B x B A B y ¬ y A + B B + span y A B A + B
69 61 68 sstrd x HAtoms x B A B x B A B y ¬ y A + B B + span y A B A + B
70 69 sseld x HAtoms x B A B x B A B y ¬ y A + B y B + span y A B y A + B
71 12 70 syl5bir x HAtoms x B A B x B A B y ¬ y A + B y B + span y y A B y A + B
72 11 71 mpand x HAtoms x B A B x B A B y ¬ y A + B y A B y A + B
73 72 exp32 x HAtoms x B A B x B A B y ¬ y A + B y A B y A + B
74 73 com34 x HAtoms x B A B x B A B y y A B ¬ y A + B y A + B
75 pm2.18 ¬ y A + B y A + B y A + B
76 74 75 syl8 x HAtoms x B A B x B A B y y A B y A + B
77 4 76 syl5 x HAtoms x B A B x B A B y A B y A B y A + B
78 77 pm2.43d x HAtoms x B A B x B A B y A B y A + B
79 78 ssrdv x HAtoms x B A B x B A B A B A + B
80 1 2 chsleji A + B A B
81 79 80 jctil x HAtoms x B A B x B A B A + B A B A B A + B
82 eqss A + B = A B A + B A B A B A + B
83 81 82 sylibr x HAtoms x B A B x B A B A + B = A B