ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  mulext1 Unicode version

Theorem mulext1 7677
Description: Left extensionality for complex multiplication. (Contributed by Jim Kingdon, 22-Feb-2020.)
Assertion
Ref Expression
mulext1  |-  ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) )

Proof of Theorem mulext1
Dummy variables  u  v  w  x  y  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cnre 7081 . . 3  |-  ( C  e.  CC  ->  E. u  e.  RR  E. v  e.  RR  C  =  ( u  +  ( _i  x.  v ) ) )
213ad2ant3 938 . 2  |-  ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  ->  E. u  e.  RR  E. v  e.  RR  C  =  ( u  +  ( _i  x.  v ) ) )
3 cnre 7081 . . . . . . 7  |-  ( B  e.  CC  ->  E. z  e.  RR  E. w  e.  RR  B  =  ( z  +  ( _i  x.  w ) ) )
433ad2ant2 937 . . . . . 6  |-  ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  ->  E. z  e.  RR  E. w  e.  RR  B  =  ( z  +  ( _i  x.  w ) ) )
54ad2antrr 465 . . . . 5  |-  ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  ->  E. z  e.  RR  E. w  e.  RR  B  =  ( z  +  ( _i  x.  w ) ) )
6 cnre 7081 . . . . . . . . . . 11  |-  ( A  e.  CC  ->  E. x  e.  RR  E. y  e.  RR  A  =  ( x  +  ( _i  x.  y ) ) )
763ad2ant1 936 . . . . . . . . . 10  |-  ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  ->  E. x  e.  RR  E. y  e.  RR  A  =  ( x  +  ( _i  x.  y ) ) )
87adantr 265 . . . . . . . . 9  |-  ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  ( u  e.  RR  /\  v  e.  RR ) )  ->  E. x  e.  RR  E. y  e.  RR  A  =  ( x  +  ( _i  x.  y ) ) )
98ad3antrrr 469 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  ->  E. x  e.  RR  E. y  e.  RR  A  =  ( x  +  ( _i  x.  y ) ) )
10 simplrl 495 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  x  e.  RR )
1110recnd 7113 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  x  e.  CC )
12 simprl 491 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  ( u  e.  RR  /\  v  e.  RR ) )  ->  u  e.  RR )
1312ad2antrr 465 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  ->  u  e.  RR )
1413ad3antrrr 469 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  u  e.  RR )
1514recnd 7113 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  u  e.  CC )
1611, 15mulcld 7105 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
x  x.  u )  e.  CC )
17 simplrr 496 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  y  e.  RR )
1817recnd 7113 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  y  e.  CC )
19 simprr 492 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  ( u  e.  RR  /\  v  e.  RR ) )  ->  v  e.  RR )
2019ad2antrr 465 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  ->  v  e.  RR )
2120ad3antrrr 469 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  v  e.  RR )
2221recnd 7113 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  v  e.  CC )
2318, 22mulcld 7105 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
y  x.  v )  e.  CC )
2423negcld 7372 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  -u (
y  x.  v )  e.  CC )
25 simprl 491 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  ->  z  e.  RR )
2625ad3antrrr 469 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  z  e.  RR )
2726recnd 7113 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  z  e.  CC )
2827, 15mulcld 7105 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
z  x.  u )  e.  CC )
29 simprr 492 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  ->  w  e.  RR )
3029ad3antrrr 469 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  w  e.  RR )
3130recnd 7113 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  w  e.  CC )
3231, 22mulcld 7105 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
w  x.  v )  e.  CC )
3332negcld 7372 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  -u (
w  x.  v )  e.  CC )
34 addext 7675 . . . . . . . . . . . . . . 15  |-  ( ( ( ( x  x.  u )  e.  CC  /\  -u ( y  x.  v
)  e.  CC )  /\  ( ( z  x.  u )  e.  CC  /\  -u (
w  x.  v )  e.  CC ) )  ->  ( ( ( x  x.  u )  +  -u ( y  x.  v ) ) #  ( ( z  x.  u
)  +  -u (
w  x.  v ) )  ->  ( (
x  x.  u ) #  ( z  x.  u
)  \/  -u (
y  x.  v ) #  -u ( w  x.  v
) ) ) )
3516, 24, 28, 33, 34syl22anc 1147 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( x  x.  u )  +  -u ( y  x.  v
) ) #  ( ( z  x.  u )  +  -u ( w  x.  v ) )  -> 
( ( x  x.  u ) #  ( z  x.  u )  \/  -u ( y  x.  v
) #  -u ( w  x.  v ) ) ) )
36 remulext1 7664 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  RR  /\  z  e.  RR  /\  u  e.  RR )  ->  (
( x  x.  u
) #  ( z  x.  u )  ->  x #  z ) )
3710, 26, 14, 36syl3anc 1146 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( x  x.  u
) #  ( z  x.  u )  ->  x #  z ) )
38 apneg 7676 . . . . . . . . . . . . . . . . 17  |-  ( ( ( y  x.  v
)  e.  CC  /\  ( w  x.  v
)  e.  CC )  ->  ( ( y  x.  v ) #  ( w  x.  v )  <->  -u ( y  x.  v
) #  -u ( w  x.  v ) ) )
3923, 32, 38syl2anc 397 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( y  x.  v
) #  ( w  x.  v )  <->  -u ( y  x.  v ) #  -u ( w  x.  v
) ) )
40 remulext1 7664 . . . . . . . . . . . . . . . . 17  |-  ( ( y  e.  RR  /\  w  e.  RR  /\  v  e.  RR )  ->  (
( y  x.  v
) #  ( w  x.  v )  ->  y #  w ) )
4117, 30, 21, 40syl3anc 1146 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( y  x.  v
) #  ( w  x.  v )  ->  y #  w ) )
4239, 41sylbird 163 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  ( -u ( y  x.  v
) #  -u ( w  x.  v )  ->  y #  w ) )
4337, 42orim12d 710 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( x  x.  u ) #  ( z  x.  u )  \/  -u ( y  x.  v
) #  -u ( w  x.  v ) )  -> 
( x #  z  \/  y #  w ) ) )
4435, 43syld 44 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( x  x.  u )  +  -u ( y  x.  v
) ) #  ( ( z  x.  u )  +  -u ( w  x.  v ) )  -> 
( x #  z  \/  y #  w ) ) )
4515, 18mulcld 7105 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
u  x.  y )  e.  CC )
4622, 11mulcld 7105 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
v  x.  x )  e.  CC )
4715, 31mulcld 7105 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
u  x.  w )  e.  CC )
4822, 27mulcld 7105 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
v  x.  z )  e.  CC )
49 addext 7675 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( u  x.  y )  e.  CC  /\  ( v  x.  x
)  e.  CC )  /\  ( ( u  x.  w )  e.  CC  /\  ( v  x.  z )  e.  CC ) )  -> 
( ( ( u  x.  y )  +  ( v  x.  x
) ) #  ( ( u  x.  w )  +  ( v  x.  z ) )  -> 
( ( u  x.  y ) #  ( u  x.  w )  \/  ( v  x.  x
) #  ( v  x.  z ) ) ) )
5045, 46, 47, 48, 49syl22anc 1147 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w )  +  ( v  x.  z
) )  ->  (
( u  x.  y
) #  ( u  x.  w )  \/  (
v  x.  x ) #  ( v  x.  z
) ) ) )
51 remulext2 7665 . . . . . . . . . . . . . . . . 17  |-  ( ( y  e.  RR  /\  w  e.  RR  /\  u  e.  RR )  ->  (
( u  x.  y
) #  ( u  x.  w )  ->  y #  w ) )
5217, 30, 14, 51syl3anc 1146 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( u  x.  y
) #  ( u  x.  w )  ->  y #  w ) )
53 remulext2 7665 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  RR  /\  z  e.  RR  /\  v  e.  RR )  ->  (
( v  x.  x
) #  ( v  x.  z )  ->  x #  z ) )
5410, 26, 21, 53syl3anc 1146 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( v  x.  x
) #  ( v  x.  z )  ->  x #  z ) )
5552, 54orim12d 710 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( u  x.  y ) #  ( u  x.  w )  \/  ( v  x.  x
) #  ( v  x.  z ) )  -> 
( y #  w  \/  x #  z ) ) )
5650, 55syld 44 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w )  +  ( v  x.  z
) )  ->  (
y #  w  \/  x #  z ) ) )
57 orcom 657 . . . . . . . . . . . . . 14  |-  ( ( y #  w  \/  x #  z )  <->  ( x #  z  \/  y #  w
) )
5856, 57syl6ib 154 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w )  +  ( v  x.  z
) )  ->  (
x #  z  \/  y #  w ) ) )
5944, 58jaod 647 . . . . . . . . . . . 12  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( ( x  x.  u )  + 
-u ( y  x.  v ) ) #  ( ( z  x.  u
)  +  -u (
w  x.  v ) )  \/  ( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w
)  +  ( v  x.  z ) ) )  ->  ( x #  z  \/  y #  w
) ) )
60 simpr 107 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  A  =  ( x  +  ( _i  x.  y
) ) )
61 simplr 490 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  ->  C  =  ( u  +  (
_i  x.  v )
) )
6261ad3antrrr 469 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  C  =  ( u  +  ( _i  x.  v
) ) )
6360, 62oveq12d 5558 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  ( A  x.  C )  =  ( ( x  +  ( _i  x.  y ) )  x.  ( u  +  ( _i  x.  v ) ) ) )
64 simpllr 494 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  B  =  ( z  +  ( _i  x.  w
) ) )
6564, 62oveq12d 5558 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  ( B  x.  C )  =  ( ( z  +  ( _i  x.  w ) )  x.  ( u  +  ( _i  x.  v ) ) ) )
6663, 65breq12d 3805 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  <->  ( (
x  +  ( _i  x.  y ) )  x.  ( u  +  ( _i  x.  v
) ) ) #  ( ( z  +  ( _i  x.  w ) )  x.  ( u  +  ( _i  x.  v ) ) ) ) )
67 mulreim 7669 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  RR  /\  y  e.  RR )  /\  ( u  e.  RR  /\  v  e.  RR ) )  -> 
( ( x  +  ( _i  x.  y
) )  x.  (
u  +  ( _i  x.  v ) ) )  =  ( ( ( x  x.  u
)  +  -u (
y  x.  v ) )  +  ( _i  x.  ( ( u  x.  y )  +  ( v  x.  x
) ) ) ) )
6810, 17, 14, 21, 67syl22anc 1147 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( x  +  ( _i  x.  y ) )  x.  ( u  +  ( _i  x.  v ) ) )  =  ( ( ( x  x.  u )  +  -u ( y  x.  v ) )  +  ( _i  x.  (
( u  x.  y
)  +  ( v  x.  x ) ) ) ) )
69 mulreim 7669 . . . . . . . . . . . . . . 15  |-  ( ( ( z  e.  RR  /\  w  e.  RR )  /\  ( u  e.  RR  /\  v  e.  RR ) )  -> 
( ( z  +  ( _i  x.  w
) )  x.  (
u  +  ( _i  x.  v ) ) )  =  ( ( ( z  x.  u
)  +  -u (
w  x.  v ) )  +  ( _i  x.  ( ( u  x.  w )  +  ( v  x.  z
) ) ) ) )
7026, 30, 14, 21, 69syl22anc 1147 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( z  +  ( _i  x.  w ) )  x.  ( u  +  ( _i  x.  v ) ) )  =  ( ( ( z  x.  u )  +  -u ( w  x.  v ) )  +  ( _i  x.  (
( u  x.  w
)  +  ( v  x.  z ) ) ) ) )
7168, 70breq12d 3805 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( x  +  ( _i  x.  y
) )  x.  (
u  +  ( _i  x.  v ) ) ) #  ( ( z  +  ( _i  x.  w ) )  x.  ( u  +  ( _i  x.  v ) ) )  <->  ( (
( x  x.  u
)  +  -u (
y  x.  v ) )  +  ( _i  x.  ( ( u  x.  y )  +  ( v  x.  x
) ) ) ) #  ( ( ( z  x.  u )  + 
-u ( w  x.  v ) )  +  ( _i  x.  (
( u  x.  w
)  +  ( v  x.  z ) ) ) ) ) )
7210, 14remulcld 7115 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
x  x.  u )  e.  RR )
7317, 21remulcld 7115 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
y  x.  v )  e.  RR )
7473renegcld 7450 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  -u (
y  x.  v )  e.  RR )
7572, 74readdcld 7114 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( x  x.  u
)  +  -u (
y  x.  v ) )  e.  RR )
7614, 17remulcld 7115 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
u  x.  y )  e.  RR )
7721, 10remulcld 7115 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
v  x.  x )  e.  RR )
7876, 77readdcld 7114 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( u  x.  y
)  +  ( v  x.  x ) )  e.  RR )
7926, 14remulcld 7115 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
z  x.  u )  e.  RR )
8030, 21remulcld 7115 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
w  x.  v )  e.  RR )
8180renegcld 7450 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  -u (
w  x.  v )  e.  RR )
8279, 81readdcld 7114 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( z  x.  u
)  +  -u (
w  x.  v ) )  e.  RR )
8314, 30remulcld 7115 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
u  x.  w )  e.  RR )
8421, 26remulcld 7115 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
v  x.  z )  e.  RR )
8583, 84readdcld 7114 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( u  x.  w
)  +  ( v  x.  z ) )  e.  RR )
86 apreim 7668 . . . . . . . . . . . . . 14  |-  ( ( ( ( ( x  x.  u )  + 
-u ( y  x.  v ) )  e.  RR  /\  ( ( u  x.  y )  +  ( v  x.  x ) )  e.  RR )  /\  (
( ( z  x.  u )  +  -u ( w  x.  v
) )  e.  RR  /\  ( ( u  x.  w )  +  ( v  x.  z ) )  e.  RR ) )  ->  ( (
( ( x  x.  u )  +  -u ( y  x.  v
) )  +  ( _i  x.  ( ( u  x.  y )  +  ( v  x.  x ) ) ) ) #  ( ( ( z  x.  u )  +  -u ( w  x.  v ) )  +  ( _i  x.  (
( u  x.  w
)  +  ( v  x.  z ) ) ) )  <->  ( (
( x  x.  u
)  +  -u (
y  x.  v ) ) #  ( ( z  x.  u )  + 
-u ( w  x.  v ) )  \/  ( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w )  +  ( v  x.  z
) ) ) ) )
8775, 78, 82, 85, 86syl22anc 1147 . . . . . . . . . . . . 13  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( ( ( x  x.  u )  + 
-u ( y  x.  v ) )  +  ( _i  x.  (
( u  x.  y
)  +  ( v  x.  x ) ) ) ) #  ( ( ( z  x.  u
)  +  -u (
w  x.  v ) )  +  ( _i  x.  ( ( u  x.  w )  +  ( v  x.  z
) ) ) )  <-> 
( ( ( x  x.  u )  + 
-u ( y  x.  v ) ) #  ( ( z  x.  u
)  +  -u (
w  x.  v ) )  \/  ( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w
)  +  ( v  x.  z ) ) ) ) )
8866, 71, 873bitrd 207 . . . . . . . . . . . 12  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  <->  ( (
( x  x.  u
)  +  -u (
y  x.  v ) ) #  ( ( z  x.  u )  + 
-u ( w  x.  v ) )  \/  ( ( u  x.  y )  +  ( v  x.  x ) ) #  ( ( u  x.  w )  +  ( v  x.  z
) ) ) ) )
89 apreim 7668 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  RR  /\  y  e.  RR )  /\  ( z  e.  RR  /\  w  e.  RR ) )  -> 
( ( x  +  ( _i  x.  y
) ) #  ( z  +  ( _i  x.  w ) )  <->  ( x #  z  \/  y #  w
) ) )
9010, 17, 26, 30, 89syl22anc 1147 . . . . . . . . . . . 12  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( x  +  ( _i  x.  y ) ) #  ( z  +  ( _i  x.  w
) )  <->  ( x #  z  \/  y #  w
) ) )
9159, 88, 903imtr4d 196 . . . . . . . . . . 11  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  (
x  +  ( _i  x.  y ) ) #  ( z  +  ( _i  x.  w ) ) ) )
9260, 64breq12d 3805 . . . . . . . . . . 11  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  ( A #  B  <->  ( x  +  ( _i  x.  y
) ) #  ( z  +  ( _i  x.  w ) ) ) )
9391, 92sylibrd 162 . . . . . . . . . 10  |-  ( ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  /\  A  =  ( x  +  (
_i  x.  y )
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) )
9493ex 112 . . . . . . . . 9  |-  ( ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  ( u  e.  RR  /\  v  e.  RR ) )  /\  C  =  ( u  +  ( _i  x.  v ) ) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  /\  (
x  e.  RR  /\  y  e.  RR )
)  ->  ( A  =  ( x  +  ( _i  x.  y
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) ) )
9594rexlimdvva 2457 . . . . . . . 8  |-  ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  ->  ( E. x  e.  RR  E. y  e.  RR  A  =  ( x  +  ( _i  x.  y
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) ) )
969, 95mpd 13 . . . . . . 7  |-  ( ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  /\  B  =  ( z  +  ( _i  x.  w ) ) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) )
9796ex 112 . . . . . 6  |-  ( ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  /\  (
z  e.  RR  /\  w  e.  RR )
)  ->  ( B  =  ( z  +  ( _i  x.  w
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) ) )
9897rexlimdvva 2457 . . . . 5  |-  ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  ->  ( E. z  e.  RR  E. w  e.  RR  B  =  ( z  +  ( _i  x.  w
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) ) )
995, 98mpd 13 . . . 4  |-  ( ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  (
u  e.  RR  /\  v  e.  RR )
)  /\  C  =  ( u  +  (
_i  x.  v )
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) )
10099ex 112 . . 3  |-  ( ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  /\  ( u  e.  RR  /\  v  e.  RR ) )  ->  ( C  =  ( u  +  ( _i  x.  v
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) ) )
101100rexlimdvva 2457 . 2  |-  ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  ->  ( E. u  e.  RR  E. v  e.  RR  C  =  ( u  +  ( _i  x.  v
) )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) ) )
1022, 101mpd 13 1  |-  ( ( A  e.  CC  /\  B  e.  CC  /\  C  e.  CC )  ->  (
( A  x.  C
) #  ( B  x.  C )  ->  A #  B ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 101    <-> wb 102    \/ wo 639    /\ w3a 896    = wceq 1259    e. wcel 1409   E.wrex 2324   class class class wbr 3792  (class class class)co 5540   CCcc 6945   RRcr 6946   _ici 6949    + caddc 6950    x. cmul 6952   -ucneg 7246   # cap 7646
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 103  ax-ia2 104  ax-ia3 105  ax-in1 554  ax-in2 555  ax-io 640  ax-5 1352  ax-7 1353  ax-gen 1354  ax-ie1 1398  ax-ie2 1399  ax-8 1411  ax-10 1412  ax-11 1413  ax-i12 1414  ax-bndl 1415  ax-4 1416  ax-13 1420  ax-14 1421  ax-17 1435  ax-i9 1439  ax-ial 1443  ax-i5r 1444  ax-ext 2038  ax-coll 3900  ax-sep 3903  ax-nul 3911  ax-pow 3955  ax-pr 3972  ax-un 4198  ax-setind 4290  ax-iinf 4339  ax-cnex 7033  ax-resscn 7034  ax-1cn 7035  ax-1re 7036  ax-icn 7037  ax-addcl 7038  ax-addrcl 7039  ax-mulcl 7040  ax-mulrcl 7041  ax-addcom 7042  ax-mulcom 7043  ax-addass 7044  ax-mulass 7045  ax-distr 7046  ax-i2m1 7047  ax-1rid 7049  ax-0id 7050  ax-rnegex 7051  ax-precex 7052  ax-cnre 7053  ax-pre-ltirr 7054  ax-pre-ltwlin 7055  ax-pre-lttrn 7056  ax-pre-apti 7057  ax-pre-ltadd 7058  ax-pre-mulgt0 7059  ax-pre-mulext 7060
This theorem depends on definitions:  df-bi 114  df-dc 754  df-3or 897  df-3an 898  df-tru 1262  df-fal 1265  df-nf 1366  df-sb 1662  df-eu 1919  df-mo 1920  df-clab 2043  df-cleq 2049  df-clel 2052  df-nfc 2183  df-ne 2221  df-nel 2315  df-ral 2328  df-rex 2329  df-reu 2330  df-rab 2332  df-v 2576  df-sbc 2788  df-csb 2881  df-dif 2948  df-un 2950  df-in 2952  df-ss 2959  df-nul 3253  df-pw 3389  df-sn 3409  df-pr 3410  df-op 3412  df-uni 3609  df-int 3644  df-iun 3687  df-br 3793  df-opab 3847  df-mpt 3848  df-tr 3883  df-eprel 4054  df-id 4058  df-po 4061  df-iso 4062  df-iord 4131  df-on 4133  df-suc 4136  df-iom 4342  df-xp 4379  df-rel 4380  df-cnv 4381  df-co 4382  df-dm 4383  df-rn 4384  df-res 4385  df-ima 4386  df-iota 4895  df-fun 4932  df-fn 4933  df-f 4934  df-f1 4935  df-fo 4936  df-f1o 4937  df-fv 4938  df-riota 5496  df-ov 5543  df-oprab 5544  df-mpt2 5545  df-1st 5795  df-2nd 5796  df-recs 5951  df-irdg 5988  df-1o 6032  df-2o 6033  df-oadd 6036  df-omul 6037  df-er 6137  df-ec 6139  df-qs 6143  df-ni 6460  df-pli 6461  df-mi 6462  df-lti 6463  df-plpq 6500  df-mpq 6501  df-enq 6503  df-nqqs 6504  df-plqqs 6505  df-mqqs 6506  df-1nqqs 6507  df-rq 6508  df-ltnqqs 6509  df-enq0 6580  df-nq0 6581  df-0nq0 6582  df-plq0 6583  df-mq0 6584  df-inp 6622  df-i1p 6623  df-iplp 6624  df-iltp 6626  df-enr 6869  df-nr 6870  df-ltr 6873  df-0r 6874  df-1r 6875  df-0 6954  df-1 6955  df-r 6957  df-lt 6960  df-pnf 7121  df-mnf 7122  df-ltxr 7124  df-sub 7247  df-neg 7248  df-reap 7640  df-ap 7647
This theorem is referenced by:  mulext2  7678  mulext  7679  mulap0  7709  apmul1  7839
  Copyright terms: Public domain W3C validator