| Step |
Hyp |
Ref |
Expression |
| 1 |
|
simp1 |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> A e. CC ) |
| 2 |
|
simp3 |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> C e. CC ) |
| 3 |
|
subcl |
|- ( ( B e. CC /\ C e. CC ) -> ( B - C ) e. CC ) |
| 4 |
3
|
3adant1 |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( B - C ) e. CC ) |
| 5 |
1 2 4
|
adddid |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( A x. ( C + ( B - C ) ) ) = ( ( A x. C ) + ( A x. ( B - C ) ) ) ) |
| 6 |
|
pncan3 |
|- ( ( C e. CC /\ B e. CC ) -> ( C + ( B - C ) ) = B ) |
| 7 |
6
|
ancoms |
|- ( ( B e. CC /\ C e. CC ) -> ( C + ( B - C ) ) = B ) |
| 8 |
7
|
3adant1 |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( C + ( B - C ) ) = B ) |
| 9 |
8
|
oveq2d |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( A x. ( C + ( B - C ) ) ) = ( A x. B ) ) |
| 10 |
5 9
|
eqtr3d |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( ( A x. C ) + ( A x. ( B - C ) ) ) = ( A x. B ) ) |
| 11 |
|
mulcl |
|- ( ( A e. CC /\ B e. CC ) -> ( A x. B ) e. CC ) |
| 12 |
11
|
3adant3 |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( A x. B ) e. CC ) |
| 13 |
|
mulcl |
|- ( ( A e. CC /\ C e. CC ) -> ( A x. C ) e. CC ) |
| 14 |
13
|
3adant2 |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( A x. C ) e. CC ) |
| 15 |
|
mulcl |
|- ( ( A e. CC /\ ( B - C ) e. CC ) -> ( A x. ( B - C ) ) e. CC ) |
| 16 |
3 15
|
sylan2 |
|- ( ( A e. CC /\ ( B e. CC /\ C e. CC ) ) -> ( A x. ( B - C ) ) e. CC ) |
| 17 |
16
|
3impb |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( A x. ( B - C ) ) e. CC ) |
| 18 |
12 14 17
|
subaddd |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( ( ( A x. B ) - ( A x. C ) ) = ( A x. ( B - C ) ) <-> ( ( A x. C ) + ( A x. ( B - C ) ) ) = ( A x. B ) ) ) |
| 19 |
10 18
|
mpbird |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( ( A x. B ) - ( A x. C ) ) = ( A x. ( B - C ) ) ) |
| 20 |
19
|
eqcomd |
|- ( ( A e. CC /\ B e. CC /\ C e. CC ) -> ( A x. ( B - C ) ) = ( ( A x. B ) - ( A x. C ) ) ) |