Metamath Proof Explorer


Theorem rhmimasubrnglem

Description: Lemma for rhmimasubrng : Modified part of mhmima . (Contributed by Mario Carneiro, 10-Mar-2015) (Revised by AV, 16-Feb-2025)

Ref Expression
Hypothesis rhmimasubrnglem.b M = mulGrp R
Assertion rhmimasubrnglem Could not format assertion : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> A. x e. ( F " X ) A. y e. ( F " X ) ( x ( +g ` N ) y ) e. ( F " X ) ) with typecode |-

Proof

Step Hyp Ref Expression
1 rhmimasubrnglem.b M = mulGrp R
2 simpll Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> F e. ( M MndHom N ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> F e. ( M MndHom N ) ) with typecode |-
3 eqid Base R = Base R
4 3 subrngss Could not format ( X e. ( SubRng ` R ) -> X C_ ( Base ` R ) ) : No typesetting found for |- ( X e. ( SubRng ` R ) -> X C_ ( Base ` R ) ) with typecode |-
5 1 3 mgpbas Base R = Base M
6 4 5 sseqtrdi Could not format ( X e. ( SubRng ` R ) -> X C_ ( Base ` M ) ) : No typesetting found for |- ( X e. ( SubRng ` R ) -> X C_ ( Base ` M ) ) with typecode |-
7 6 adantl Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> X C_ ( Base ` M ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> X C_ ( Base ` M ) ) with typecode |-
8 7 adantr Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> X C_ ( Base ` M ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> X C_ ( Base ` M ) ) with typecode |-
9 simprl Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> z e. X ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> z e. X ) with typecode |-
10 8 9 sseldd Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> z e. ( Base ` M ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> z e. ( Base ` M ) ) with typecode |-
11 simprr Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> x e. X ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> x e. X ) with typecode |-
12 8 11 sseldd Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> x e. ( Base ` M ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> x e. ( Base ` M ) ) with typecode |-
13 eqid Base M = Base M
14 eqid + M = + M
15 eqid + N = + N
16 13 14 15 mhmlin F M MndHom N z Base M x Base M F z + M x = F z + N F x
17 2 10 12 16 syl3anc Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( F ` ( z ( +g ` M ) x ) ) = ( ( F ` z ) ( +g ` N ) ( F ` x ) ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( F ` ( z ( +g ` M ) x ) ) = ( ( F ` z ) ( +g ` N ) ( F ` x ) ) ) with typecode |-
18 eqid Base N = Base N
19 13 18 mhmf F M MndHom N F : Base M Base N
20 19 adantr Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> F : ( Base ` M ) --> ( Base ` N ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> F : ( Base ` M ) --> ( Base ` N ) ) with typecode |-
21 20 ffnd Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> F Fn ( Base ` M ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> F Fn ( Base ` M ) ) with typecode |-
22 21 adantr Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> F Fn ( Base ` M ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> F Fn ( Base ` M ) ) with typecode |-
23 eqid R = R
24 1 23 mgpplusg R = + M
25 24 eqcomi + M = R
26 25 subrngmcl Could not format ( ( X e. ( SubRng ` R ) /\ z e. X /\ x e. X ) -> ( z ( +g ` M ) x ) e. X ) : No typesetting found for |- ( ( X e. ( SubRng ` R ) /\ z e. X /\ x e. X ) -> ( z ( +g ` M ) x ) e. X ) with typecode |-
27 26 3expb Could not format ( ( X e. ( SubRng ` R ) /\ ( z e. X /\ x e. X ) ) -> ( z ( +g ` M ) x ) e. X ) : No typesetting found for |- ( ( X e. ( SubRng ` R ) /\ ( z e. X /\ x e. X ) ) -> ( z ( +g ` M ) x ) e. X ) with typecode |-
28 27 adantll Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( z ( +g ` M ) x ) e. X ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( z ( +g ` M ) x ) e. X ) with typecode |-
29 fnfvima F Fn Base M X Base M z + M x X F z + M x F X
30 22 8 28 29 syl3anc Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( F ` ( z ( +g ` M ) x ) ) e. ( F " X ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( F ` ( z ( +g ` M ) x ) ) e. ( F " X ) ) with typecode |-
31 17 30 eqeltrrd Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ ( z e. X /\ x e. X ) ) -> ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) with typecode |-
32 31 anassrs Could not format ( ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) /\ x e. X ) -> ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) : No typesetting found for |- ( ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) /\ x e. X ) -> ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) with typecode |-
33 32 ralrimiva Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) -> A. x e. X ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) -> A. x e. X ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) with typecode |-
34 oveq2 y = F x F z + N y = F z + N F x
35 34 eleq1d y = F x F z + N y F X F z + N F x F X
36 35 ralima F Fn Base M X Base M y F X F z + N y F X x X F z + N F x F X
37 21 7 36 syl2anc Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> ( A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) <-> A. x e. X ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> ( A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) <-> A. x e. X ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) ) with typecode |-
38 37 adantr Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) -> ( A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) <-> A. x e. X ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) -> ( A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) <-> A. x e. X ( ( F ` z ) ( +g ` N ) ( F ` x ) ) e. ( F " X ) ) ) with typecode |-
39 33 38 mpbird Could not format ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) -> A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) ) : No typesetting found for |- ( ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) /\ z e. X ) -> A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) ) with typecode |-
40 39 ralrimiva Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> A. z e. X A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> A. z e. X A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) ) with typecode |-
41 oveq1 x = F z x + N y = F z + N y
42 41 eleq1d x = F z x + N y F X F z + N y F X
43 42 ralbidv x = F z y F X x + N y F X y F X F z + N y F X
44 43 ralima F Fn Base M X Base M x F X y F X x + N y F X z X y F X F z + N y F X
45 21 7 44 syl2anc Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> ( A. x e. ( F " X ) A. y e. ( F " X ) ( x ( +g ` N ) y ) e. ( F " X ) <-> A. z e. X A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> ( A. x e. ( F " X ) A. y e. ( F " X ) ( x ( +g ` N ) y ) e. ( F " X ) <-> A. z e. X A. y e. ( F " X ) ( ( F ` z ) ( +g ` N ) y ) e. ( F " X ) ) ) with typecode |-
46 40 45 mpbird Could not format ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> A. x e. ( F " X ) A. y e. ( F " X ) ( x ( +g ` N ) y ) e. ( F " X ) ) : No typesetting found for |- ( ( F e. ( M MndHom N ) /\ X e. ( SubRng ` R ) ) -> A. x e. ( F " X ) A. y e. ( F " X ) ( x ( +g ` N ) y ) e. ( F " X ) ) with typecode |-