MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mplbas2 Unicode version

Theorem mplbas2 16494
Description: An alternative expression for the set of polynomials, as the smallest subalgebra of the set of power series that contains all the variable generators. (Contributed by Mario Carneiro, 10-Jan-2015.)
Hypotheses
Ref Expression
mplbas2.p  |-  P  =  ( I mPoly  R )
mplbas2.s  |-  S  =  ( I mPwSer  R )
mplbas2.v  |-  V  =  ( I mVar  R )
mplbas2.a  |-  A  =  (AlgSpan `  S )
mplbas2.i  |-  ( ph  ->  I  e.  W )
mplbas2.r  |-  ( ph  ->  R  e.  CRing )
Assertion
Ref Expression
mplbas2  |-  ( ph  ->  ( A `  ran  V )  =  ( Base `  P ) )

Proof of Theorem mplbas2
Dummy variables  u  k  v  x  z 
y  f are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mplbas2.s . . . . 5  |-  S  =  ( I mPwSer  R )
2 mplbas2.i . . . . 5  |-  ( ph  ->  I  e.  W )
3 mplbas2.r . . . . 5  |-  ( ph  ->  R  e.  CRing )
41, 2, 3psrassa 16440 . . . 4  |-  ( ph  ->  S  e. AssAlg )
5 mplbas2.p . . . . . 6  |-  P  =  ( I mPoly  R )
6 eqid 2412 . . . . . 6  |-  ( Base `  P )  =  (
Base `  P )
7 eqid 2412 . . . . . 6  |-  ( Base `  S )  =  (
Base `  S )
85, 1, 6, 7mplbasss 16459 . . . . 5  |-  ( Base `  P )  C_  ( Base `  S )
98a1i 11 . . . 4  |-  ( ph  ->  ( Base `  P
)  C_  ( Base `  S ) )
10 mplbas2.v . . . . . . . 8  |-  V  =  ( I mVar  R )
11 crngrng 15637 . . . . . . . . 9  |-  ( R  e.  CRing  ->  R  e.  Ring )
123, 11syl 16 . . . . . . . 8  |-  ( ph  ->  R  e.  Ring )
131, 10, 7, 2, 12mvrf 16451 . . . . . . 7  |-  ( ph  ->  V : I --> ( Base `  S ) )
14 ffn 5558 . . . . . . 7  |-  ( V : I --> ( Base `  S )  ->  V  Fn  I )
1513, 14syl 16 . . . . . 6  |-  ( ph  ->  V  Fn  I )
162adantr 452 . . . . . . . 8  |-  ( (
ph  /\  x  e.  I )  ->  I  e.  W )
1712adantr 452 . . . . . . . 8  |-  ( (
ph  /\  x  e.  I )  ->  R  e.  Ring )
18 simpr 448 . . . . . . . 8  |-  ( (
ph  /\  x  e.  I )  ->  x  e.  I )
195, 10, 6, 16, 17, 18mvrcl 16475 . . . . . . 7  |-  ( (
ph  /\  x  e.  I )  ->  ( V `  x )  e.  ( Base `  P
) )
2019ralrimiva 2757 . . . . . 6  |-  ( ph  ->  A. x  e.  I 
( V `  x
)  e.  ( Base `  P ) )
21 ffnfv 5861 . . . . . 6  |-  ( V : I --> ( Base `  P )  <->  ( V  Fn  I  /\  A. x  e.  I  ( V `  x )  e.  (
Base `  P )
) )
2215, 20, 21sylanbrc 646 . . . . 5  |-  ( ph  ->  V : I --> ( Base `  P ) )
23 frn 5564 . . . . 5  |-  ( V : I --> ( Base `  P )  ->  ran  V 
C_  ( Base `  P
) )
2422, 23syl 16 . . . 4  |-  ( ph  ->  ran  V  C_  ( Base `  P ) )
25 mplbas2.a . . . . 5  |-  A  =  (AlgSpan `  S )
2625, 7aspss 16354 . . . 4  |-  ( ( S  e. AssAlg  /\  ( Base `  P )  C_  ( Base `  S )  /\  ran  V  C_  ( Base `  P ) )  ->  ( A `  ran  V )  C_  ( A `  ( Base `  P ) ) )
274, 9, 24, 26syl3anc 1184 . . 3  |-  ( ph  ->  ( A `  ran  V )  C_  ( A `  ( Base `  P
) ) )
281, 5, 6, 2, 12mplsubrg 16466 . . . 4  |-  ( ph  ->  ( Base `  P
)  e.  (SubRing `  S
) )
291, 5, 6, 2, 12mpllss 16464 . . . 4  |-  ( ph  ->  ( Base `  P
)  e.  ( LSubSp `  S ) )
30 eqid 2412 . . . . 5  |-  ( LSubSp `  S )  =  (
LSubSp `  S )
3125, 7, 30aspid 16352 . . . 4  |-  ( ( S  e. AssAlg  /\  ( Base `  P )  e.  (SubRing `  S )  /\  ( Base `  P
)  e.  ( LSubSp `  S ) )  -> 
( A `  ( Base `  P ) )  =  ( Base `  P
) )
324, 28, 29, 31syl3anc 1184 . . 3  |-  ( ph  ->  ( A `  ( Base `  P ) )  =  ( Base `  P
) )
3327, 32sseqtrd 3352 . 2  |-  ( ph  ->  ( A `  ran  V )  C_  ( Base `  P ) )
34 eqid 2412 . . . . . 6  |-  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  =  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }
35 eqid 2412 . . . . . 6  |-  ( 0g
`  R )  =  ( 0g `  R
)
36 eqid 2412 . . . . . 6  |-  ( 1r
`  R )  =  ( 1r `  R
)
372adantr 452 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  I  e.  W )
38 eqid 2412 . . . . . 6  |-  ( .s
`  P )  =  ( .s `  P
)
3912adantr 452 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  R  e.  Ring )
40 simpr 448 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  x  e.  ( Base `  P )
)
415, 34, 35, 36, 37, 6, 38, 39, 40mplcoe1 16491 . . . . 5  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  x  =  ( P  gsumg  ( k  e.  {
f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } 
|->  ( ( x `  k ) ( .s
`  P ) ( y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) ) ) ) )
42 eqid 2412 . . . . . 6  |-  ( 0g
`  P )  =  ( 0g `  P
)
435mplrng 16478 . . . . . . . . 9  |-  ( ( I  e.  W  /\  R  e.  Ring )  ->  P  e.  Ring )
442, 12, 43syl2anc 643 . . . . . . . 8  |-  ( ph  ->  P  e.  Ring )
45 rngabl 15656 . . . . . . . 8  |-  ( P  e.  Ring  ->  P  e. 
Abel )
4644, 45syl 16 . . . . . . 7  |-  ( ph  ->  P  e.  Abel )
4746adantr 452 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  P  e.  Abel )
48 ovex 6073 . . . . . . . 8  |-  ( NN0 
^m  I )  e. 
_V
4948rabex 4322 . . . . . . 7  |-  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  e.  _V
5049a1i 11 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  e.  _V )
5124, 8syl6ss 3328 . . . . . . . . . 10  |-  ( ph  ->  ran  V  C_  ( Base `  S ) )
5225, 7aspsubrg 16353 . . . . . . . . . 10  |-  ( ( S  e. AssAlg  /\  ran  V  C_  ( Base `  S
) )  ->  ( A `  ran  V )  e.  (SubRing `  S
) )
534, 51, 52syl2anc 643 . . . . . . . . 9  |-  ( ph  ->  ( A `  ran  V )  e.  (SubRing `  S
) )
545, 1, 6mplval2 16458 . . . . . . . . . . 11  |-  P  =  ( Ss  ( Base `  P
) )
5554subsubrg 15857 . . . . . . . . . 10  |-  ( (
Base `  P )  e.  (SubRing `  S )  ->  ( ( A `  ran  V )  e.  (SubRing `  P )  <->  ( ( A `  ran  V )  e.  (SubRing `  S
)  /\  ( A `  ran  V )  C_  ( Base `  P )
) ) )
5628, 55syl 16 . . . . . . . . 9  |-  ( ph  ->  ( ( A `  ran  V )  e.  (SubRing `  P )  <->  ( ( A `  ran  V )  e.  (SubRing `  S
)  /\  ( A `  ran  V )  C_  ( Base `  P )
) ) )
5753, 33, 56mpbir2and 889 . . . . . . . 8  |-  ( ph  ->  ( A `  ran  V )  e.  (SubRing `  P
) )
58 subrgsubg 15837 . . . . . . . 8  |-  ( ( A `  ran  V
)  e.  (SubRing `  P
)  ->  ( A `  ran  V )  e.  (SubGrp `  P )
)
5957, 58syl 16 . . . . . . 7  |-  ( ph  ->  ( A `  ran  V )  e.  (SubGrp `  P ) )
6059adantr 452 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( A `  ran  V )  e.  (SubGrp `  P )
)
615mpllmod 16477 . . . . . . . . . 10  |-  ( ( I  e.  W  /\  R  e.  Ring )  ->  P  e.  LMod )
622, 12, 61syl2anc 643 . . . . . . . . 9  |-  ( ph  ->  P  e.  LMod )
6362ad2antrr 707 . . . . . . . 8  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  P  e.  LMod )
6425, 7, 30asplss 16351 . . . . . . . . . . 11  |-  ( ( S  e. AssAlg  /\  ran  V  C_  ( Base `  S
) )  ->  ( A `  ran  V )  e.  ( LSubSp `  S
) )
654, 51, 64syl2anc 643 . . . . . . . . . 10  |-  ( ph  ->  ( A `  ran  V )  e.  ( LSubSp `  S ) )
661, 2, 12psrlmod 16428 . . . . . . . . . . 11  |-  ( ph  ->  S  e.  LMod )
67 eqid 2412 . . . . . . . . . . . 12  |-  ( LSubSp `  P )  =  (
LSubSp `  P )
6854, 30, 67lsslss 16000 . . . . . . . . . . 11  |-  ( ( S  e.  LMod  /\  ( Base `  P )  e.  ( LSubSp `  S )
)  ->  ( ( A `  ran  V )  e.  ( LSubSp `  P
)  <->  ( ( A `
 ran  V )  e.  ( LSubSp `  S )  /\  ( A `  ran  V )  C_  ( Base `  P ) ) ) )
6966, 29, 68syl2anc 643 . . . . . . . . . 10  |-  ( ph  ->  ( ( A `  ran  V )  e.  (
LSubSp `  P )  <->  ( ( A `  ran  V )  e.  ( LSubSp `  S
)  /\  ( A `  ran  V )  C_  ( Base `  P )
) ) )
7065, 33, 69mpbir2and 889 . . . . . . . . 9  |-  ( ph  ->  ( A `  ran  V )  e.  ( LSubSp `  P ) )
7170ad2antrr 707 . . . . . . . 8  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( A `  ran  V )  e.  ( LSubSp `  P
) )
72 eqid 2412 . . . . . . . . . . 11  |-  ( Base `  R )  =  (
Base `  R )
735, 72, 6, 34, 40mplelf 16460 . . . . . . . . . 10  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  x : { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } --> ( Base `  R
) )
7473ffvelrnda 5837 . . . . . . . . 9  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
x `  k )  e.  ( Base `  R
) )
755, 37, 39mplsca 16471 . . . . . . . . . . 11  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  R  =  (Scalar `  P ) )
7675adantr 452 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  R  =  (Scalar `  P )
)
7776fveq2d 5699 . . . . . . . . 9  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( Base `  R )  =  ( Base `  (Scalar `  P ) ) )
7874, 77eleqtrd 2488 . . . . . . . 8  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
x `  k )  e.  ( Base `  (Scalar `  P ) ) )
7937adantr 452 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  I  e.  W )
80 eqid 2412 . . . . . . . . . 10  |-  (mulGrp `  P )  =  (mulGrp `  P )
81 eqid 2412 . . . . . . . . . 10  |-  (.g `  (mulGrp `  P ) )  =  (.g `  (mulGrp `  P
) )
823adantr 452 . . . . . . . . . . 11  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  R  e.  CRing
)
8382adantr 452 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  R  e.  CRing )
84 simpr 448 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )
855, 34, 35, 36, 79, 80, 81, 10, 83, 84mplcoe2 16493 . . . . . . . . 9  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) )  =  ( (mulGrp `  P )  gsumg  ( z  e.  I  |->  ( ( k `  z
) (.g `  (mulGrp `  P
) ) ( V `
 z ) ) ) ) )
86 eqid 2412 . . . . . . . . . . 11  |-  ( 1r
`  P )  =  ( 1r `  P
)
8780, 86rngidval 15629 . . . . . . . . . 10  |-  ( 1r
`  P )  =  ( 0g `  (mulGrp `  P ) )
885mplcrng 16479 . . . . . . . . . . . . 13  |-  ( ( I  e.  W  /\  R  e.  CRing )  ->  P  e.  CRing )
892, 3, 88syl2anc 643 . . . . . . . . . . . 12  |-  ( ph  ->  P  e.  CRing )
9080crngmgp 15635 . . . . . . . . . . . 12  |-  ( P  e.  CRing  ->  (mulGrp `  P
)  e. CMnd )
9189, 90syl 16 . . . . . . . . . . 11  |-  ( ph  ->  (mulGrp `  P )  e. CMnd )
9291ad2antrr 707 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (mulGrp `  P )  e. CMnd )
9357ad2antrr 707 . . . . . . . . . . 11  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( A `  ran  V )  e.  (SubRing `  P
) )
9480subrgsubm 15844 . . . . . . . . . . 11  |-  ( ( A `  ran  V
)  e.  (SubRing `  P
)  ->  ( A `  ran  V )  e.  (SubMnd `  (mulGrp `  P
) ) )
9593, 94syl 16 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( A `  ran  V )  e.  (SubMnd `  (mulGrp `  P ) ) )
96 simplll 735 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  I
)  ->  ph )
9734psrbag 16394 . . . . . . . . . . . . . . . 16  |-  ( I  e.  W  ->  (
k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  <->  ( k : I --> NN0  /\  ( `' k " NN )  e.  Fin )
) )
9837, 97syl 16 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  <->  ( k : I --> NN0  /\  ( `' k " NN )  e.  Fin )
) )
9998biimpa 471 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
k : I --> NN0  /\  ( `' k " NN )  e.  Fin )
)
10099simpld 446 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  k : I --> NN0 )
101100ffvelrnda 5837 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  I
)  ->  ( k `  z )  e.  NN0 )
10225, 7aspssid 16355 . . . . . . . . . . . . . . 15  |-  ( ( S  e. AssAlg  /\  ran  V  C_  ( Base `  S
) )  ->  ran  V 
C_  ( A `  ran  V ) )
1034, 51, 102syl2anc 643 . . . . . . . . . . . . . 14  |-  ( ph  ->  ran  V  C_  ( A `  ran  V ) )
104103ad3antrrr 711 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  I
)  ->  ran  V  C_  ( A `  ran  V
) )
10515ad2antrr 707 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  V  Fn  I )
106 fnfvelrn 5834 . . . . . . . . . . . . . 14  |-  ( ( V  Fn  I  /\  z  e.  I )  ->  ( V `  z
)  e.  ran  V
)
107105, 106sylan 458 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  I
)  ->  ( V `  z )  e.  ran  V )
108104, 107sseldd 3317 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  I
)  ->  ( V `  z )  e.  ( A `  ran  V
) )
10980, 6mgpbas 15617 . . . . . . . . . . . . 13  |-  ( Base `  P )  =  (
Base `  (mulGrp `  P
) )
110 eqid 2412 . . . . . . . . . . . . . 14  |-  ( .r
`  P )  =  ( .r `  P
)
11180, 110mgpplusg 15615 . . . . . . . . . . . . 13  |-  ( .r
`  P )  =  ( +g  `  (mulGrp `  P ) )
112110subrgmcl 15843 . . . . . . . . . . . . . 14  |-  ( ( ( A `  ran  V )  e.  (SubRing `  P
)  /\  u  e.  ( A `  ran  V
)  /\  v  e.  ( A `  ran  V
) )  ->  (
u ( .r `  P ) v )  e.  ( A `  ran  V ) )
11357, 112syl3an1 1217 . . . . . . . . . . . . 13  |-  ( (
ph  /\  u  e.  ( A `  ran  V
)  /\  v  e.  ( A `  ran  V
) )  ->  (
u ( .r `  P ) v )  e.  ( A `  ran  V ) )
11486subrg1cl 15839 . . . . . . . . . . . . . 14  |-  ( ( A `  ran  V
)  e.  (SubRing `  P
)  ->  ( 1r `  P )  e.  ( A `  ran  V
) )
11557, 114syl 16 . . . . . . . . . . . . 13  |-  ( ph  ->  ( 1r `  P
)  e.  ( A `
 ran  V )
)
116109, 81, 111, 91, 33, 113, 87, 115mulgnn0subcl 14866 . . . . . . . . . . . 12  |-  ( (
ph  /\  ( k `  z )  e.  NN0  /\  ( V `  z
)  e.  ( A `
 ran  V )
)  ->  ( (
k `  z )
(.g `  (mulGrp `  P
) ) ( V `
 z ) )  e.  ( A `  ran  V ) )
11796, 101, 108, 116syl3anc 1184 . . . . . . . . . . 11  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  I
)  ->  ( (
k `  z )
(.g `  (mulGrp `  P
) ) ( V `
 z ) )  e.  ( A `  ran  V ) )
118 eqid 2412 . . . . . . . . . . 11  |-  ( z  e.  I  |->  ( ( k `  z ) (.g `  (mulGrp `  P
) ) ( V `
 z ) ) )  =  ( z  e.  I  |->  ( ( k `  z ) (.g `  (mulGrp `  P
) ) ( V `
 z ) ) )
119117, 118fmptd 5860 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
z  e.  I  |->  ( ( k `  z
) (.g `  (mulGrp `  P
) ) ( V `
 z ) ) ) : I --> ( A `
 ran  V )
)
12099simprd 450 . . . . . . . . . . 11  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( `' k " NN )  e.  Fin )
121 nn0supp 10237 . . . . . . . . . . . . . . . 16  |-  ( k : I --> NN0  ->  ( `' k " ( _V  \  { 0 } ) )  =  ( `' k " NN ) )
122 eqimss 3368 . . . . . . . . . . . . . . . 16  |-  ( ( `' k " ( _V  \  { 0 } ) )  =  ( `' k " NN )  ->  ( `' k
" ( _V  \  { 0 } ) )  C_  ( `' k " NN ) )
123100, 121, 1223syl 19 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( `' k " ( _V  \  { 0 } ) )  C_  ( `' k " NN ) )
124100, 123suppssr 5831 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  (
k `  z )  =  0 )
125124oveq1d 6063 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  (
( k `  z
) (.g `  (mulGrp `  P
) ) ( V `
 z ) )  =  ( 0 (.g `  (mulGrp `  P )
) ( V `  z ) ) )
12679adantr 452 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  I  e.  W )
12739adantr 452 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  R  e.  Ring )
128127adantr 452 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  R  e.  Ring )
129 eldifi 3437 . . . . . . . . . . . . . . . 16  |-  ( z  e.  ( I  \ 
( `' k " NN ) )  ->  z  e.  I )
130129adantl 453 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  z  e.  I )
1315, 10, 6, 126, 128, 130mvrcl 16475 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  ( V `  z )  e.  ( Base `  P
) )
132109, 87, 81mulg0 14858 . . . . . . . . . . . . . 14  |-  ( ( V `  z )  e.  ( Base `  P
)  ->  ( 0 (.g `  (mulGrp `  P
) ) ( V `
 z ) )  =  ( 1r `  P ) )
133131, 132syl 16 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  (
0 (.g `  (mulGrp `  P
) ) ( V `
 z ) )  =  ( 1r `  P ) )
134125, 133eqtrd 2444 . . . . . . . . . . . 12  |-  ( ( ( ( ph  /\  x  e.  ( Base `  P ) )  /\  k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin } )  /\  z  e.  ( I  \  ( `' k " NN ) ) )  ->  (
( k `  z
) (.g `  (mulGrp `  P
) ) ( V `
 z ) )  =  ( 1r `  P ) )
135134suppss2 6267 . . . . . . . . . . 11  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( `' ( z  e.  I  |->  ( ( k `
 z ) (.g `  (mulGrp `  P )
) ( V `  z ) ) )
" ( _V  \  { ( 1r `  P ) } ) )  C_  ( `' k " NN ) )
136 ssfi 7296 . . . . . . . . . . 11  |-  ( ( ( `' k " NN )  e.  Fin  /\  ( `' ( z  e.  I  |->  ( ( k `  z ) (.g `  (mulGrp `  P
) ) ( V `
 z ) ) ) " ( _V 
\  { ( 1r
`  P ) } ) )  C_  ( `' k " NN ) )  ->  ( `' ( z  e.  I  |->  ( ( k `
 z ) (.g `  (mulGrp `  P )
) ( V `  z ) ) )
" ( _V  \  { ( 1r `  P ) } ) )  e.  Fin )
137120, 135, 136syl2anc 643 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  ( `' ( z  e.  I  |->  ( ( k `
 z ) (.g `  (mulGrp `  P )
) ( V `  z ) ) )
" ( _V  \  { ( 1r `  P ) } ) )  e.  Fin )
13887, 92, 79, 95, 119, 137gsumsubmcl 15487 . . . . . . . . 9  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
(mulGrp `  P )  gsumg  ( z  e.  I  |->  ( ( k `  z
) (.g `  (mulGrp `  P
) ) ( V `
 z ) ) ) )  e.  ( A `  ran  V
) )
13985, 138eqeltrd 2486 . . . . . . . 8  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) )  e.  ( A `  ran  V
) )
140 eqid 2412 . . . . . . . . 9  |-  (Scalar `  P )  =  (Scalar `  P )
141 eqid 2412 . . . . . . . . 9  |-  ( Base `  (Scalar `  P )
)  =  ( Base `  (Scalar `  P )
)
142140, 38, 141, 67lssvscl 15994 . . . . . . . 8  |-  ( ( ( P  e.  LMod  /\  ( A `  ran  V )  e.  ( LSubSp `  P ) )  /\  ( ( x `  k )  e.  (
Base `  (Scalar `  P
) )  /\  (
y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) )  e.  ( A `  ran  V
) ) )  -> 
( ( x `  k ) ( .s
`  P ) ( y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) )  e.  ( A `  ran  V ) )
14363, 71, 78, 139, 142syl22anc 1185 . . . . . . 7  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
( x `  k
) ( .s `  P ) ( y  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) )  e.  ( A `  ran  V ) )
144 eqid 2412 . . . . . . 7  |-  ( k  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  |->  ( ( x `  k
) ( .s `  P ) ( y  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) ) )  =  ( k  e. 
{ f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  ( ( x `  k ) ( .s `  P
) ( y  e. 
{ f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  if ( y  =  k ,  ( 1r `  R
) ,  ( 0g
`  R ) ) ) ) )
145143, 144fmptd 5860 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  ( ( x `  k ) ( .s `  P
) ( y  e. 
{ f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  if ( y  =  k ,  ( 1r `  R
) ,  ( 0g
`  R ) ) ) ) ) : { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } --> ( A `  ran  V ) )
1465, 1, 7, 35, 6mplelbas 16457 . . . . . . . . 9  |-  ( x  e.  ( Base `  P
)  <->  ( x  e.  ( Base `  S
)  /\  ( `' x " ( _V  \  { ( 0g `  R ) } ) )  e.  Fin )
)
147146simprbi 451 . . . . . . . 8  |-  ( x  e.  ( Base `  P
)  ->  ( `' x " ( _V  \  { ( 0g `  R ) } ) )  e.  Fin )
148147adantl 453 . . . . . . 7  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( `' x " ( _V  \  { ( 0g `  R ) } ) )  e.  Fin )
149 ssid 3335 . . . . . . . . . . . . 13  |-  ( `' x " ( _V 
\  { ( 0g
`  R ) } ) )  C_  ( `' x " ( _V 
\  { ( 0g
`  R ) } ) )
150149a1i 11 . . . . . . . . . . . 12  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( `' x " ( _V  \  { ( 0g `  R ) } ) )  C_  ( `' x " ( _V  \  { ( 0g `  R ) } ) ) )
15173, 150suppssr 5831 . . . . . . . . . . 11  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  ( { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) ) )  ->  (
x `  k )  =  ( 0g `  R ) )
15275fveq2d 5699 . . . . . . . . . . . 12  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( 0g `  R )  =  ( 0g `  (Scalar `  P ) ) )
153152adantr 452 . . . . . . . . . . 11  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  ( { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) ) )  ->  ( 0g `  R )  =  ( 0g `  (Scalar `  P ) ) )
154151, 153eqtrd 2444 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  ( { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) ) )  ->  (
x `  k )  =  ( 0g `  (Scalar `  P ) ) )
155154oveq1d 6063 . . . . . . . . 9  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  ( { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) ) )  ->  (
( x `  k
) ( .s `  P ) ( y  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) )  =  ( ( 0g `  (Scalar `  P ) ) ( .s `  P
) ( y  e. 
{ f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  if ( y  =  k ,  ( 1r `  R
) ,  ( 0g
`  R ) ) ) ) )
156 eldifi 3437 . . . . . . . . . 10  |-  ( k  e.  ( { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) )  ->  k  e.  { f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } )
1575, 6, 35, 36, 34, 79, 127, 84mplmon 16489 . . . . . . . . . . 11  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) )  e.  (
Base `  P )
)
158 eqid 2412 . . . . . . . . . . . 12  |-  ( 0g
`  (Scalar `  P )
)  =  ( 0g
`  (Scalar `  P )
)
1596, 140, 38, 158, 42lmod0vs 15946 . . . . . . . . . . 11  |-  ( ( P  e.  LMod  /\  (
y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) )  e.  (
Base `  P )
)  ->  ( ( 0g `  (Scalar `  P
) ) ( .s
`  P ) ( y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) )  =  ( 0g `  P
) )
16063, 157, 159syl2anc 643 . . . . . . . . . 10  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin } )  ->  (
( 0g `  (Scalar `  P ) ) ( .s `  P ) ( y  e.  {
f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } 
|->  if ( y  =  k ,  ( 1r
`  R ) ,  ( 0g `  R
) ) ) )  =  ( 0g `  P ) )
161156, 160sylan2 461 . . . . . . . . 9  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  ( { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) ) )  ->  (
( 0g `  (Scalar `  P ) ) ( .s `  P ) ( y  e.  {
f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } 
|->  if ( y  =  k ,  ( 1r
`  R ) ,  ( 0g `  R
) ) ) )  =  ( 0g `  P ) )
162155, 161eqtrd 2444 . . . . . . . 8  |-  ( ( ( ph  /\  x  e.  ( Base `  P
) )  /\  k  e.  ( { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  \ 
( `' x "
( _V  \  {
( 0g `  R
) } ) ) ) )  ->  (
( x `  k
) ( .s `  P ) ( y  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) )  =  ( 0g `  P
) )
163162suppss2 6267 . . . . . . 7  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( `' ( k  e.  {
f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } 
|->  ( ( x `  k ) ( .s
`  P ) ( y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) ) )
" ( _V  \  { ( 0g `  P ) } ) )  C_  ( `' x " ( _V  \  { ( 0g `  R ) } ) ) )
164 ssfi 7296 . . . . . . 7  |-  ( ( ( `' x "
( _V  \  {
( 0g `  R
) } ) )  e.  Fin  /\  ( `' ( k  e. 
{ f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  ( ( x `  k ) ( .s `  P
) ( y  e. 
{ f  e.  ( NN0  ^m  I )  |  ( `' f
" NN )  e. 
Fin }  |->  if ( y  =  k ,  ( 1r `  R
) ,  ( 0g
`  R ) ) ) ) ) "
( _V  \  {
( 0g `  P
) } ) ) 
C_  ( `' x " ( _V  \  {
( 0g `  R
) } ) ) )  ->  ( `' ( k  e.  {
f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } 
|->  ( ( x `  k ) ( .s
`  P ) ( y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) ) )
" ( _V  \  { ( 0g `  P ) } ) )  e.  Fin )
165148, 163, 164syl2anc 643 . . . . . 6  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( `' ( k  e.  {
f  e.  ( NN0 
^m  I )  |  ( `' f " NN )  e.  Fin } 
|->  ( ( x `  k ) ( .s
`  P ) ( y  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) ) )
" ( _V  \  { ( 0g `  P ) } ) )  e.  Fin )
16642, 47, 50, 60, 145, 165gsumsubgcl 15488 . . . . 5  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  ( P  gsumg  ( k  e.  { f  e.  ( NN0  ^m  I )  |  ( `' f " NN )  e.  Fin }  |->  ( ( x `  k
) ( .s `  P ) ( y  e.  { f  e.  ( NN0  ^m  I
)  |  ( `' f " NN )  e.  Fin }  |->  if ( y  =  k ,  ( 1r `  R ) ,  ( 0g `  R ) ) ) ) ) )  e.  ( A `
 ran  V )
)
16741, 166eqeltrd 2486 . . . 4  |-  ( (
ph  /\  x  e.  ( Base `  P )
)  ->  x  e.  ( A `  ran  V
) )
168167ex 424 . . 3  |-  ( ph  ->  ( x  e.  (
Base `  P )  ->  x  e.  ( A `
 ran  V )
) )
169168ssrdv 3322 . 2  |-  ( ph  ->  ( Base `  P
)  C_  ( A `  ran  V ) )
17033, 169eqssd 3333 1  |-  ( ph  ->  ( A `  ran  V )  =  ( Base `  P ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 177    /\ wa 359    = wceq 1649    e. wcel 1721   A.wral 2674   {crab 2678   _Vcvv 2924    \ cdif 3285    C_ wss 3288   ifcif 3707   {csn 3782    e. cmpt 4234   `'ccnv 4844   ran crn 4846   "cima 4848    Fn wfn 5416   -->wf 5417   ` cfv 5421  (class class class)co 6048    ^m cmap 6985   Fincfn 7076   0cc0 8954   NNcn 9964   NN0cn0 10185   Basecbs 13432   .rcmulr 13493  Scalarcsca 13495   .scvsca 13496   0gc0g 13686    gsumg cgsu 13687  .gcmg 14652  SubMndcsubmnd 14700  SubGrpcsubg 14901  CMndccmn 15375   Abelcabel 15376  mulGrpcmgp 15611   Ringcrg 15623   CRingccrg 15624   1rcur 15625  SubRingcsubrg 15827   LModclmod 15913   LSubSpclss 15971  AssAlgcasa 16332  AlgSpancasp 16333   mPwSer cmps 16369   mVar cmvr 16370   mPoly cmpl 16371
This theorem is referenced by:  mplind  16525  evlseu  19898
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1662  ax-8 1683  ax-13 1723  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2393  ax-rep 4288  ax-sep 4298  ax-nul 4306  ax-pow 4345  ax-pr 4371  ax-un 4668  ax-inf2 7560  ax-cnex 9010  ax-resscn 9011  ax-1cn 9012  ax-icn 9013  ax-addcl 9014  ax-addrcl 9015  ax-mulcl 9016  ax-mulrcl 9017  ax-mulcom 9018  ax-addass 9019  ax-mulass 9020  ax-distr 9021  ax-i2m1 9022  ax-1ne0 9023  ax-1rid 9024  ax-rnegex 9025  ax-rrecex 9026  ax-cnre 9027  ax-pre-lttri 9028  ax-pre-lttrn 9029  ax-pre-ltadd 9030  ax-pre-mulgt0 9031
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2266  df-mo 2267  df-clab 2399  df-cleq 2405  df-clel 2408  df-nfc 2537  df-ne 2577  df-nel 2578  df-ral 2679  df-rex 2680  df-reu 2681  df-rmo 2682  df-rab 2683  df-v 2926  df-sbc 3130  df-csb 3220  df-dif 3291  df-un 3293  df-in 3295  df-ss 3302  df-pss 3304  df-nul 3597  df-if 3708  df-pw 3769  df-sn 3788  df-pr 3789  df-tp 3790  df-op 3791  df-uni 3984  df-int 4019  df-iun 4063  df-iin 4064  df-br 4181  df-opab 4235  df-mpt 4236  df-tr 4271  df-eprel 4462  df-id 4466  df-po 4471  df-so 4472  df-fr 4509  df-se 4510  df-we 4511  df-ord 4552  df-on 4553  df-lim 4554  df-suc 4555  df-om 4813  df-xp 4851  df-rel 4852  df-cnv 4853  df-co 4854  df-dm 4855  df-rn 4856  df-res 4857  df-ima 4858  df-iota 5385  df-fun 5423  df-fn 5424  df-f 5425  df-f1 5426  df-fo 5427  df-f1o 5428  df-fv 5429  df-isom 5430  df-ov 6051  df-oprab 6052  df-mpt2 6053  df-of 6272  df-ofr 6273  df-1st 6316  df-2nd 6317  df-riota 6516  df-recs 6600  df-rdg 6635  df-1o 6691  df-2o 6692  df-oadd 6695  df-er 6872  df-map 6987  df-pm 6988  df-ixp 7031  df-en 7077  df-dom 7078  df-sdom 7079  df-fin 7080  df-oi 7443  df-card 7790  df-pnf 9086  df-mnf 9087  df-xr 9088  df-ltxr 9089  df-le 9090  df-sub 9257  df-neg 9258  df-nn 9965  df-2 10022  df-3 10023  df-4 10024  df-5 10025  df-6 10026  df-7 10027  df-8 10028  df-9 10029  df-n0 10186  df-z 10247  df-uz 10453  df-fz 11008  df-fzo 11099  df-seq 11287  df-hash 11582  df-struct 13434  df-ndx 13435  df-slot 13436  df-base 13437  df-sets 13438  df-ress 13439  df-plusg 13505  df-mulr 13506  df-sca 13508  df-vsca 13509  df-tset 13511  df-0g 13690  df-gsum 13691  df-mre 13774  df-mrc 13775  df-acs 13777  df-mnd 14653  df-mhm 14701  df-submnd 14702  df-grp 14775  df-minusg 14776  df-sbg 14777  df-mulg 14778  df-subg 14904  df-ghm 14967  df-cntz 15079  df-cmn 15377  df-abl 15378  df-mgp 15612  df-rng 15626  df-cring 15627  df-ur 15628  df-subrg 15829  df-lmod 15915  df-lss 15972  df-assa 16335  df-asp 16336  df-psr 16380  df-mvr 16381  df-mpl 16382
  Copyright terms: Public domain W3C validator