Users' Mathboxes Mathbox for Jeff Madsen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  isdrngo2 Structured version   Visualization version   Unicode version

Theorem isdrngo2 33757
Description: A division ring is a ring in which  1  =/=  0 and every nonzero element is invertible. (Contributed by Jeff Madsen, 8-Jun-2010.)
Hypotheses
Ref Expression
isdivrng1.1  |-  G  =  ( 1st `  R
)
isdivrng1.2  |-  H  =  ( 2nd `  R
)
isdivrng1.3  |-  Z  =  (GId `  G )
isdivrng1.4  |-  X  =  ran  G
isdivrng2.5  |-  U  =  (GId `  H )
Assertion
Ref Expression
isdrngo2  |-  ( R  e.  DivRingOps 
<->  ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) ) )
Distinct variable groups:    x, H, y    x, X, y    x, Z, y    x, R, y   
x, U, y
Allowed substitution hints:    G( x, y)

Proof of Theorem isdrngo2
Dummy variables  u  v  w  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isdivrng1.1 . . 3  |-  G  =  ( 1st `  R
)
2 isdivrng1.2 . . 3  |-  H  =  ( 2nd `  R
)
3 isdivrng1.3 . . 3  |-  Z  =  (GId `  G )
4 isdivrng1.4 . . 3  |-  X  =  ran  G
51, 2, 3, 4isdrngo1 33755 . 2  |-  ( R  e.  DivRingOps 
<->  ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp ) )
6 isdivrng2.5 . . . . . . 7  |-  U  =  (GId `  H )
71, 2, 4, 3, 6dvrunz 33753 . . . . . 6  |-  ( R  e.  DivRingOps  ->  U  =/=  Z
)
85, 7sylbir 225 . . . . 5  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  U  =/= 
Z )
9 grporndm 27364 . . . . . . . . . . . 12  |-  ( ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp  ->  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  =  dom  dom  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) )
109adantl 482 . . . . . . . . . . 11  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ran  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  =  dom  dom  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )
11 difss 3737 . . . . . . . . . . . . . . . . 17  |-  ( X 
\  { Z }
)  C_  X
12 xpss12 5225 . . . . . . . . . . . . . . . . 17  |-  ( ( ( X  \  { Z } )  C_  X  /\  ( X  \  { Z } )  C_  X
)  ->  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) )  C_  ( X  X.  X ) )
1311, 11, 12mp2an 708 . . . . . . . . . . . . . . . 16  |-  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) )  C_  ( X  X.  X )
141, 2, 4rngosm 33699 . . . . . . . . . . . . . . . . 17  |-  ( R  e.  RingOps  ->  H : ( X  X.  X ) --> X )
15 fdm 6051 . . . . . . . . . . . . . . . . 17  |-  ( H : ( X  X.  X ) --> X  ->  dom  H  =  ( X  X.  X ) )
1614, 15syl 17 . . . . . . . . . . . . . . . 16  |-  ( R  e.  RingOps  ->  dom  H  =  ( X  X.  X
) )
1713, 16syl5sseqr 3654 . . . . . . . . . . . . . . 15  |-  ( R  e.  RingOps  ->  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) )  C_  dom  H )
1817adantr 481 . . . . . . . . . . . . . 14  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) )  C_  dom  H )
19 ssdmres 5420 . . . . . . . . . . . . . 14  |-  ( ( ( X  \  { Z } )  X.  ( X  \  { Z }
) )  C_  dom  H  <->  dom  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  =  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )
2018, 19sylib 208 . . . . . . . . . . . . 13  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  dom  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  =  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )
2120dmeqd 5326 . . . . . . . . . . . 12  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  dom  dom  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  =  dom  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )
22 dmxpid 5345 . . . . . . . . . . . 12  |-  dom  (
( X  \  { Z } )  X.  ( X  \  { Z }
) )  =  ( X  \  { Z } )
2321, 22syl6eq 2672 . . . . . . . . . . 11  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  dom  dom  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  =  ( X  \  { Z } ) )
2410, 23eqtrd 2656 . . . . . . . . . 10  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ran  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  =  ( X  \  { Z } ) )
2524eleq2d 2687 . . . . . . . . 9  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ( x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  <-> 
x  e.  ( X 
\  { Z }
) ) )
2625biimpar 502 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  ->  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )
27 eqid 2622 . . . . . . . . . . 11  |-  ran  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  =  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )
28 eqid 2622 . . . . . . . . . . 11  |-  ( inv `  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) )  =  ( inv `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) )
2927, 28grpoinvcl 27378 . . . . . . . . . 10  |-  ( ( ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) )  ->  ( ( inv `  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ) `
 x )  e. 
ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )
3029adantll 750 . . . . . . . . 9  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )  ->  ( ( inv `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ) `  x )  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )
31 eqid 2622 . . . . . . . . . . . 12  |-  (GId `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) )  =  (GId `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) )
3227, 31, 28grpolinv 27380 . . . . . . . . . . 11  |-  ( ( ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) )  ->  ( ( ( inv `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ) `  x ) ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) x )  =  (GId `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ) )
3332adantll 750 . . . . . . . . . 10  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )  ->  ( (
( inv `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) ) `
 x ) ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x )  =  (GId `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ) )
342rngomndo 33734 . . . . . . . . . . . . . 14  |-  ( R  e.  RingOps  ->  H  e. MndOp )
35 mndomgmid 33670 . . . . . . . . . . . . . 14  |-  ( H  e. MndOp  ->  H  e.  (
Magma  i^i  ExId  ) )
3634, 35syl 17 . . . . . . . . . . . . 13  |-  ( R  e.  RingOps  ->  H  e.  (
Magma  i^i  ExId  ) )
3736adantr 481 . . . . . . . . . . . 12  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  H  e.  ( Magma  i^i  ExId  )
)
3811, 4sseqtri 3637 . . . . . . . . . . . . . 14  |-  ( X 
\  { Z }
)  C_  ran  G
392, 1rngorn1eq 33733 . . . . . . . . . . . . . 14  |-  ( R  e.  RingOps  ->  ran  G  =  ran  H )
4038, 39syl5sseq 3653 . . . . . . . . . . . . 13  |-  ( R  e.  RingOps  ->  ( X  \  { Z } )  C_  ran  H )
4140adantr 481 . . . . . . . . . . . 12  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ( X 
\  { Z }
)  C_  ran  H )
421rneqi 5352 . . . . . . . . . . . . . . . 16  |-  ran  G  =  ran  ( 1st `  R
)
434, 42eqtri 2644 . . . . . . . . . . . . . . 15  |-  X  =  ran  ( 1st `  R
)
4443, 2, 6rngo1cl 33738 . . . . . . . . . . . . . 14  |-  ( R  e.  RingOps  ->  U  e.  X
)
4544adantr 481 . . . . . . . . . . . . 13  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  U  e.  X )
46 eldifsn 4317 . . . . . . . . . . . . 13  |-  ( U  e.  ( X  \  { Z } )  <->  ( U  e.  X  /\  U  =/= 
Z ) )
4745, 8, 46sylanbrc 698 . . . . . . . . . . . 12  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  U  e.  ( X  \  { Z } ) )
48 grpomndo 33674 . . . . . . . . . . . . . 14  |-  ( ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp  ->  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  e. MndOp )
49 mndoismgmOLD 33669 . . . . . . . . . . . . . 14  |-  ( ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. MndOp  ->  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
Magma )
5048, 49syl 17 . . . . . . . . . . . . 13  |-  ( ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp  ->  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  e.  Magma )
5150adantl 482 . . . . . . . . . . . 12  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  e.  Magma )
52 eqid 2622 . . . . . . . . . . . . 13  |-  ran  H  =  ran  H
53 eqid 2622 . . . . . . . . . . . . 13  |-  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  =  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )
5452, 6, 53exidresid 33678 . . . . . . . . . . . 12  |-  ( ( ( H  e.  (
Magma  i^i  ExId  )  /\  ( X  \  { Z } )  C_  ran  H  /\  U  e.  ( X  \  { Z } ) )  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
Magma )  ->  (GId `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) )  =  U )
5537, 41, 47, 51, 54syl31anc 1329 . . . . . . . . . . 11  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  (GId `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) )  =  U )
5655adantr 481 . . . . . . . . . 10  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )  ->  (GId `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) )  =  U )
5733, 56eqtrd 2656 . . . . . . . . 9  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )  ->  ( (
( inv `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) ) `
 x ) ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x )  =  U )
58 oveq1 6657 . . . . . . . . . . 11  |-  ( y  =  ( ( inv `  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ) `
 x )  -> 
( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  ( ( ( inv `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) ) `
 x ) ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x ) )
5958eqeq1d 2624 . . . . . . . . . 10  |-  ( y  =  ( ( inv `  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ) `
 x )  -> 
( ( y ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x )  =  U  <->  ( (
( inv `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) ) `
 x ) ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x )  =  U ) )
6059rspcev 3309 . . . . . . . . 9  |-  ( ( ( ( inv `  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) ) ) `
 x )  e. 
ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  /\  ( ( ( inv `  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ) `  x ) ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) x )  =  U )  ->  E. y  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  U )
6130, 57, 60syl2anc 693 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) )  ->  E. y  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  U )
6226, 61syldan 487 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  ->  E. y  e.  ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) ( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  U )
6324adantr 481 . . . . . . . . 9  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  ->  ran  ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  =  ( X  \  { Z } ) )
6463rexeqdv 3145 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  -> 
( E. y  e. 
ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  U  <->  E. y  e.  ( X  \  { Z }
) ( y ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x )  =  U ) )
65 ovres 6800 . . . . . . . . . . . 12  |-  ( ( y  e.  ( X 
\  { Z }
)  /\  x  e.  ( X  \  { Z } ) )  -> 
( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  ( y H x ) )
6665ancoms 469 . . . . . . . . . . 11  |-  ( ( x  e.  ( X 
\  { Z }
)  /\  y  e.  ( X  \  { Z } ) )  -> 
( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  ( y H x ) )
6766eqeq1d 2624 . . . . . . . . . 10  |-  ( ( x  e.  ( X 
\  { Z }
)  /\  y  e.  ( X  \  { Z } ) )  -> 
( ( y ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) x )  =  U  <->  ( y H x )  =  U ) )
6867rexbidva 3049 . . . . . . . . 9  |-  ( x  e.  ( X  \  { Z } )  -> 
( E. y  e.  ( X  \  { Z } ) ( y ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) x )  =  U  <->  E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )
6968adantl 482 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  -> 
( E. y  e.  ( X  \  { Z } ) ( y ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) x )  =  U  <->  E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )
7064, 69bitrd 268 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  -> 
( E. y  e. 
ran  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ( y ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) x )  =  U  <->  E. y  e.  ( X  \  { Z }
) ( y H x )  =  U ) )
7162, 70mpbid 222 . . . . . 6  |-  ( ( ( R  e.  RingOps  /\  ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )  /\  x  e.  ( X  \  { Z } ) )  ->  E. y  e.  ( X  \  { Z }
) ( y H x )  =  U )
7271ralrimiva 2966 . . . . 5  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U )
738, 72jca 554 . . . 4  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  ->  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )
74 fvex 6201 . . . . . . . . 9  |-  ( 1st `  R )  e.  _V
751, 74eqeltri 2697 . . . . . . . 8  |-  G  e. 
_V
7675rnex 7100 . . . . . . 7  |-  ran  G  e.  _V
774, 76eqeltri 2697 . . . . . 6  |-  X  e. 
_V
78 difexg 4808 . . . . . 6  |-  ( X  e.  _V  ->  ( X  \  { Z }
)  e.  _V )
7977, 78mp1i 13 . . . . 5  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  -> 
( X  \  { Z } )  e.  _V )
80 ffn 6045 . . . . . . . . 9  |-  ( H : ( X  X.  X ) --> X  ->  H  Fn  ( X  X.  X ) )
8114, 80syl 17 . . . . . . . 8  |-  ( R  e.  RingOps  ->  H  Fn  ( X  X.  X ) )
8281adantr 481 . . . . . . 7  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  ->  H  Fn  ( X  X.  X ) )
83 fnssres 6004 . . . . . . 7  |-  ( ( H  Fn  ( X  X.  X )  /\  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) )  C_  ( X  X.  X
) )  ->  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  Fn  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )
8482, 13, 83sylancl 694 . . . . . 6  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  -> 
( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  Fn  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )
85 ovres 6800 . . . . . . . . 9  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } ) )  -> 
( u ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) v )  =  ( u H v ) )
8685adantl 482 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) v )  =  ( u H v ) )
87 eldifi 3732 . . . . . . . . . . . 12  |-  ( u  e.  ( X  \  { Z } )  ->  u  e.  X )
88 eldifi 3732 . . . . . . . . . . . 12  |-  ( v  e.  ( X  \  { Z } )  -> 
v  e.  X )
8987, 88anim12i 590 . . . . . . . . . . 11  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } ) )  -> 
( u  e.  X  /\  v  e.  X
) )
901, 2, 4rngocl 33700 . . . . . . . . . . . 12  |-  ( ( R  e.  RingOps  /\  u  e.  X  /\  v  e.  X )  ->  (
u H v )  e.  X )
91903expb 1266 . . . . . . . . . . 11  |-  ( ( R  e.  RingOps  /\  (
u  e.  X  /\  v  e.  X )
)  ->  ( u H v )  e.  X )
9289, 91sylan2 491 . . . . . . . . . 10  |-  ( ( R  e.  RingOps  /\  (
u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  e.  X
)
9392adantlr 751 . . . . . . . . 9  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  e.  X
)
94 oveq2 6658 . . . . . . . . . . . . . . . 16  |-  ( x  =  u  ->  (
y H x )  =  ( y H u ) )
9594eqeq1d 2624 . . . . . . . . . . . . . . 15  |-  ( x  =  u  ->  (
( y H x )  =  U  <->  ( y H u )  =  U ) )
9695rexbidv 3052 . . . . . . . . . . . . . 14  |-  ( x  =  u  ->  ( E. y  e.  ( X  \  { Z }
) ( y H x )  =  U  <->  E. y  e.  ( X  \  { Z }
) ( y H u )  =  U ) )
9796rspcv 3305 . . . . . . . . . . . . 13  |-  ( u  e.  ( X  \  { Z } )  -> 
( A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U  ->  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U ) )
9897imdistanri 727 . . . . . . . . . . . 12  |-  ( ( A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U  /\  u  e.  ( X  \  { Z } ) )  -> 
( E. y  e.  ( X  \  { Z } ) ( y H u )  =  U  /\  u  e.  ( X  \  { Z } ) ) )
99 eldifsn 4317 . . . . . . . . . . . . . . 15  |-  ( v  e.  ( X  \  { Z } )  <->  ( v  e.  X  /\  v  =/=  Z ) )
100 ssrexv 3667 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( X  \  { Z } )  C_  X  ->  ( E. y  e.  ( X  \  { Z } ) ( y H u )  =  U  ->  E. y  e.  X  ( y H u )  =  U ) )
10111, 100ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21  |-  ( E. y  e.  ( X 
\  { Z }
) ( y H u )  =  U  ->  E. y  e.  X  ( y H u )  =  U )
1021, 2, 3, 4, 6zerdivemp1x 33746 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( R  e.  RingOps  /\  u  e.  X  /\  E. y  e.  X  ( y H u )  =  U )  ->  (
v  e.  X  -> 
( ( u H v )  =  Z  ->  v  =  Z ) ) )
103101, 102syl3an3 1361 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( R  e.  RingOps  /\  u  e.  X  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U )  ->  (
v  e.  X  -> 
( ( u H v )  =  Z  ->  v  =  Z ) ) )
10487, 103syl3an2 1360 . . . . . . . . . . . . . . . . . . 19  |-  ( ( R  e.  RingOps  /\  u  e.  ( X  \  { Z } )  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U )  ->  ( v  e.  X  ->  ( (
u H v )  =  Z  ->  v  =  Z ) ) )
1051043expb 1266 . . . . . . . . . . . . . . . . . 18  |-  ( ( R  e.  RingOps  /\  (
u  e.  ( X 
\  { Z }
)  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U ) )  -> 
( v  e.  X  ->  ( ( u H v )  =  Z  ->  v  =  Z ) ) )
106105imp 445 . . . . . . . . . . . . . . . . 17  |-  ( ( ( R  e.  RingOps  /\  ( u  e.  ( X  \  { Z }
)  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U ) )  /\  v  e.  X )  ->  ( ( u H v )  =  Z  ->  v  =  Z ) )
107106necon3d 2815 . . . . . . . . . . . . . . . 16  |-  ( ( ( R  e.  RingOps  /\  ( u  e.  ( X  \  { Z }
)  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U ) )  /\  v  e.  X )  ->  ( v  =/=  Z  ->  ( u H v )  =/=  Z ) )
108107impr 649 . . . . . . . . . . . . . . 15  |-  ( ( ( R  e.  RingOps  /\  ( u  e.  ( X  \  { Z }
)  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U ) )  /\  ( v  e.  X  /\  v  =/=  Z
) )  ->  (
u H v )  =/=  Z )
10999, 108sylan2b 492 . . . . . . . . . . . . . 14  |-  ( ( ( R  e.  RingOps  /\  ( u  e.  ( X  \  { Z }
)  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U ) )  /\  v  e.  ( X  \  { Z } ) )  ->  ( u H v )  =/= 
Z )
110109an32s 846 . . . . . . . . . . . . 13  |-  ( ( ( R  e.  RingOps  /\  v  e.  ( X  \  { Z } ) )  /\  ( u  e.  ( X  \  { Z } )  /\  E. y  e.  ( X 
\  { Z }
) ( y H u )  =  U ) )  ->  (
u H v )  =/=  Z )
111110ancom2s 844 . . . . . . . . . . . 12  |-  ( ( ( R  e.  RingOps  /\  v  e.  ( X  \  { Z } ) )  /\  ( E. y  e.  ( X 
\  { Z }
) ( y H u )  =  U  /\  u  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  =/=  Z
)
11298, 111sylan2 491 . . . . . . . . . . 11  |-  ( ( ( R  e.  RingOps  /\  v  e.  ( X  \  { Z } ) )  /\  ( A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U  /\  u  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  =/=  Z
)
113112an42s 870 . . . . . . . . . 10  |-  ( ( ( R  e.  RingOps  /\  A. x  e.  ( X 
\  { Z }
) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U )  /\  (
u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  =/=  Z
)
114113adantlrl 756 . . . . . . . . 9  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  =/=  Z
)
115 eldifsn 4317 . . . . . . . . 9  |-  ( ( u H v )  e.  ( X  \  { Z } )  <->  ( (
u H v )  e.  X  /\  (
u H v )  =/=  Z ) )
11693, 114, 115sylanbrc 698 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  e.  ( X  \  { Z } ) )
11786, 116eqeltrd 2701 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } ) ) )  ->  ( u ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) v )  e.  ( X 
\  { Z }
) )
118117ralrimivva 2971 . . . . . 6  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  ->  A. u  e.  ( X  \  { Z }
) A. v  e.  ( X  \  { Z } ) ( u ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) v )  e.  ( X 
\  { Z }
) )
119 ffnov 6764 . . . . . 6  |-  ( ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) : ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) --> ( X  \  { Z } )  <->  ( ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  Fn  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) )  /\  A. u  e.  ( X 
\  { Z }
) A. v  e.  ( X  \  { Z } ) ( u ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) v )  e.  ( X 
\  { Z }
) ) )
12084, 118, 119sylanbrc 698 . . . . 5  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  -> 
( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) : ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) --> ( X  \  { Z } ) )
1211163adantr3 1222 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( u H v )  e.  ( X  \  { Z } ) )
122 simpr3 1069 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  w  e.  ( X  \  { Z } ) )
123121, 122ovresd 6801 . . . . . 6  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( ( u H v ) ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) w )  =  ( ( u H v ) H w ) )
124853adant3 1081 . . . . . . . 8  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) )  -> 
( u ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) v )  =  ( u H v ) )
125124adantl 482 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( u ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) v )  =  ( u H v ) )
126125oveq1d 6665 . . . . . 6  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( ( u ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) v ) ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w )  =  ( ( u H v ) ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w ) )
127 ovres 6800 . . . . . . . . . 10  |-  ( ( v  e.  ( X 
\  { Z }
)  /\  w  e.  ( X  \  { Z } ) )  -> 
( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w )  =  ( v H w ) )
1281273adant1 1079 . . . . . . . . 9  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) )  -> 
( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w )  =  ( v H w ) )
129128adantl 482 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( v ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) w )  =  ( v H w ) )
130129oveq2d 6666 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( u H ( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w ) )  =  ( u H ( v H w ) ) )
131 simpr1 1067 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  u  e.  ( X  \  { Z } ) )
132 fovrn 6804 . . . . . . . . . 10  |-  ( ( ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) : ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) --> ( X  \  { Z } )  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) )  -> 
( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w )  e.  ( X  \  { Z } ) )
1331323adant3r1 1274 . . . . . . . . 9  |-  ( ( ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) : ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) --> ( X  \  { Z } )  /\  (
u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( v ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) w )  e.  ( X 
\  { Z }
) )
134120, 133sylan 488 . . . . . . . 8  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( v ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) w )  e.  ( X 
\  { Z }
) )
135131, 134ovresd 6801 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( u ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) ( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w ) )  =  ( u H ( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w ) ) )
136 eldifi 3732 . . . . . . . . . 10  |-  ( w  e.  ( X  \  { Z } )  ->  w  e.  X )
13787, 88, 1363anim123i 1247 . . . . . . . . 9  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) )  -> 
( u  e.  X  /\  v  e.  X  /\  w  e.  X
) )
1381, 2, 4rngoass 33705 . . . . . . . . 9  |-  ( ( R  e.  RingOps  /\  (
u  e.  X  /\  v  e.  X  /\  w  e.  X )
)  ->  ( (
u H v ) H w )  =  ( u H ( v H w ) ) )
139137, 138sylan2 491 . . . . . . . 8  |-  ( ( R  e.  RingOps  /\  (
u  e.  ( X 
\  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( ( u H v ) H w )  =  ( u H ( v H w ) ) )
140139adantlr 751 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( ( u H v ) H w )  =  ( u H ( v H w ) ) )
141130, 135, 1403eqtr4d 2666 . . . . . 6  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( u ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) ( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w ) )  =  ( ( u H v ) H w ) )
142123, 126, 1413eqtr4d 2666 . . . . 5  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  ( u  e.  ( X  \  { Z }
)  /\  v  e.  ( X  \  { Z } )  /\  w  e.  ( X  \  { Z } ) ) )  ->  ( ( u ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) v ) ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w )  =  ( u ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) ( v ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) w ) ) )
14344anim1i 592 . . . . . . 7  |-  ( ( R  e.  RingOps  /\  U  =/=  Z )  ->  ( U  e.  X  /\  U  =/=  Z ) )
144143, 46sylibr 224 . . . . . 6  |-  ( ( R  e.  RingOps  /\  U  =/=  Z )  ->  U  e.  ( X  \  { Z } ) )
145144adantrr 753 . . . . 5  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  ->  U  e.  ( X  \  { Z } ) )
146 ovres 6800 . . . . . . . 8  |-  ( ( U  e.  ( X 
\  { Z }
)  /\  u  e.  ( X  \  { Z } ) )  -> 
( U ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) u )  =  ( U H u ) )
147144, 146sylan 488 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  U  =/=  Z )  /\  u  e.  ( X  \  { Z } ) )  ->  ( U
( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  ( U H u ) )
1482, 43, 6rngolidm 33736 . . . . . . . . 9  |-  ( ( R  e.  RingOps  /\  u  e.  X )  ->  ( U H u )  =  u )
14987, 148sylan2 491 . . . . . . . 8  |-  ( ( R  e.  RingOps  /\  u  e.  ( X  \  { Z } ) )  -> 
( U H u )  =  u )
150149adantlr 751 . . . . . . 7  |-  ( ( ( R  e.  RingOps  /\  U  =/=  Z )  /\  u  e.  ( X  \  { Z } ) )  ->  ( U H u )  =  u )
151147, 150eqtrd 2656 . . . . . 6  |-  ( ( ( R  e.  RingOps  /\  U  =/=  Z )  /\  u  e.  ( X  \  { Z } ) )  ->  ( U
( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  u )
152151adantlrr 757 . . . . 5  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  u  e.  ( X  \  { Z } ) )  ->  ( U
( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  u )
15396rspcva 3307 . . . . . . . . 9  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U )  ->  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U )
154 oveq1 6657 . . . . . . . . . . . 12  |-  ( y  =  z  ->  (
y H u )  =  ( z H u ) )
155154eqeq1d 2624 . . . . . . . . . . 11  |-  ( y  =  z  ->  (
( y H u )  =  U  <->  ( z H u )  =  U ) )
156155cbvrexv 3172 . . . . . . . . . 10  |-  ( E. y  e.  ( X 
\  { Z }
) ( y H u )  =  U  <->  E. z  e.  ( X  \  { Z }
) ( z H u )  =  U )
157 ovres 6800 . . . . . . . . . . . . . 14  |-  ( ( z  e.  ( X 
\  { Z }
)  /\  u  e.  ( X  \  { Z } ) )  -> 
( z ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) ) u )  =  ( z H u ) )
158157eqeq1d 2624 . . . . . . . . . . . . 13  |-  ( ( z  e.  ( X 
\  { Z }
)  /\  u  e.  ( X  \  { Z } ) )  -> 
( ( z ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) u )  =  U  <->  ( z H u )  =  U ) )
159158ancoms 469 . . . . . . . . . . . 12  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  z  e.  ( X  \  { Z } ) )  -> 
( ( z ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) u )  =  U  <->  ( z H u )  =  U ) )
160159rexbidva 3049 . . . . . . . . . . 11  |-  ( u  e.  ( X  \  { Z } )  -> 
( E. z  e.  ( X  \  { Z } ) ( z ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  U  <->  E. z  e.  ( X  \  { Z } ) ( z H u )  =  U ) )
161160biimpar 502 . . . . . . . . . 10  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  E. z  e.  ( X  \  { Z } ) ( z H u )  =  U )  ->  E. z  e.  ( X  \  { Z } ) ( z ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  U )
162156, 161sylan2b 492 . . . . . . . . 9  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  E. y  e.  ( X  \  { Z } ) ( y H u )  =  U )  ->  E. z  e.  ( X  \  { Z } ) ( z ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  U )
163153, 162syldan 487 . . . . . . . 8  |-  ( ( u  e.  ( X 
\  { Z }
)  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U )  ->  E. z  e.  ( X  \  { Z } ) ( z ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  U )
164163ancoms 469 . . . . . . 7  |-  ( ( A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U  /\  u  e.  ( X  \  { Z } ) )  ->  E. z  e.  ( X  \  { Z }
) ( z ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) u )  =  U )
165164adantll 750 . . . . . 6  |-  ( ( ( R  e.  RingOps  /\  A. x  e.  ( X 
\  { Z }
) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U )  /\  u  e.  ( X  \  { Z } ) )  ->  E. z  e.  ( X  \  { Z }
) ( z ( H  |`  ( ( X  \  { Z }
)  X.  ( X 
\  { Z }
) ) ) u )  =  U )
166165adantlrl 756 . . . . 5  |-  ( ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  /\  u  e.  ( X  \  { Z } ) )  ->  E. z  e.  ( X  \  { Z } ) ( z ( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) ) u )  =  U )
16779, 120, 142, 145, 152, 166isgrpda 33754 . . . 4  |-  ( ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) )  -> 
( H  |`  (
( X  \  { Z } )  X.  ( X  \  { Z }
) ) )  e. 
GrpOp )
16873, 167impbida 877 . . 3  |-  ( R  e.  RingOps  ->  ( ( H  |`  ( ( X  \  { Z } )  X.  ( X  \  { Z } ) ) )  e.  GrpOp 
<->  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) ) )
169168pm5.32i 669 . 2  |-  ( ( R  e.  RingOps  /\  ( H  |`  ( ( X 
\  { Z }
)  X.  ( X 
\  { Z }
) ) )  e. 
GrpOp )  <->  ( R  e.  RingOps 
/\  ( U  =/= 
Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) ) )
1705, 169bitri 264 1  |-  ( R  e.  DivRingOps 
<->  ( R  e.  RingOps  /\  ( U  =/=  Z  /\  A. x  e.  ( X  \  { Z } ) E. y  e.  ( X  \  { Z } ) ( y H x )  =  U ) ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 196    /\ wa 384    /\ w3a 1037    = wceq 1483    e. wcel 1990    =/= wne 2794   A.wral 2912   E.wrex 2913   _Vcvv 3200    \ cdif 3571    i^i cin 3573    C_ wss 3574   {csn 4177    X. cxp 5112   dom cdm 5114   ran crn 5115    |` cres 5116    Fn wfn 5883   -->wf 5884   ` cfv 5888  (class class class)co 6650   1stc1st 7166   2ndc2nd 7167   GrpOpcgr 27343  GIdcgi 27344   invcgn 27345    ExId cexid 33643   Magmacmagm 33647  MndOpcmndo 33665   RingOpscrngo 33693   DivRingOpscdrng 33747
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-riota 6611  df-ov 6653  df-om 7066  df-1st 7168  df-2nd 7169  df-1o 7560  df-er 7742  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-grpo 27347  df-gid 27348  df-ginv 27349  df-ablo 27399  df-ass 33642  df-exid 33644  df-mgmOLD 33648  df-sgrOLD 33660  df-mndo 33666  df-rngo 33694  df-drngo 33748
This theorem is referenced by:  isdrngo3  33758  divrngidl  33827
  Copyright terms: Public domain W3C validator