Metamath Proof Explorer


Theorem issubrng

Description: The subring of non-unital ring predicate. (Contributed by AV, 14-Feb-2025)

Ref Expression
Hypothesis issubrng.b B=BaseR
Assertion issubrng Could not format assertion : No typesetting found for |- ( A e. ( SubRng ` R ) <-> ( R e. Rng /\ ( R |`s A ) e. Rng /\ A C_ B ) ) with typecode |-

Proof

Step Hyp Ref Expression
1 issubrng.b B=BaseR
2 df-subrng Could not format SubRng = ( w e. Rng |-> { s e. ~P ( Base ` w ) | ( w |`s s ) e. Rng } ) : No typesetting found for |- SubRng = ( w e. Rng |-> { s e. ~P ( Base ` w ) | ( w |`s s ) e. Rng } ) with typecode |-
3 2 mptrcl Could not format ( A e. ( SubRng ` R ) -> R e. Rng ) : No typesetting found for |- ( A e. ( SubRng ` R ) -> R e. Rng ) with typecode |-
4 simp1 RRngR𝑠ARngABRRng
5 fveq2 r=RBaser=BaseR
6 5 pweqd r=R𝒫Baser=𝒫BaseR
7 oveq1 r=Rr𝑠s=R𝑠s
8 7 eleq1d r=Rr𝑠sRngR𝑠sRng
9 6 8 rabeqbidv r=Rs𝒫Baser|r𝑠sRng=s𝒫BaseR|R𝑠sRng
10 df-subrng Could not format SubRng = ( r e. Rng |-> { s e. ~P ( Base ` r ) | ( r |`s s ) e. Rng } ) : No typesetting found for |- SubRng = ( r e. Rng |-> { s e. ~P ( Base ` r ) | ( r |`s s ) e. Rng } ) with typecode |-
11 fvex BaseRV
12 11 pwex 𝒫BaseRV
13 12 rabex s𝒫BaseR|R𝑠sRngV
14 9 10 13 fvmpt Could not format ( R e. Rng -> ( SubRng ` R ) = { s e. ~P ( Base ` R ) | ( R |`s s ) e. Rng } ) : No typesetting found for |- ( R e. Rng -> ( SubRng ` R ) = { s e. ~P ( Base ` R ) | ( R |`s s ) e. Rng } ) with typecode |-
15 14 eleq2d Could not format ( R e. Rng -> ( A e. ( SubRng ` R ) <-> A e. { s e. ~P ( Base ` R ) | ( R |`s s ) e. Rng } ) ) : No typesetting found for |- ( R e. Rng -> ( A e. ( SubRng ` R ) <-> A e. { s e. ~P ( Base ` R ) | ( R |`s s ) e. Rng } ) ) with typecode |-
16 oveq2 s=AR𝑠s=R𝑠A
17 16 eleq1d s=AR𝑠sRngR𝑠ARng
18 17 elrab As𝒫BaseR|R𝑠sRngA𝒫BaseRR𝑠ARng
19 1 eqcomi BaseR=B
20 19 sseq2i ABaseRAB
21 20 anbi2i R𝑠ARngABaseRR𝑠ARngAB
22 ibar RRngR𝑠ARngABRRngR𝑠ARngAB
23 21 22 bitrid RRngR𝑠ARngABaseRRRngR𝑠ARngAB
24 11 elpw2 A𝒫BaseRABaseR
25 24 anbi2ci A𝒫BaseRR𝑠ARngR𝑠ARngABaseR
26 3anass RRngR𝑠ARngABRRngR𝑠ARngAB
27 23 25 26 3bitr4g RRngA𝒫BaseRR𝑠ARngRRngR𝑠ARngAB
28 18 27 bitrid RRngAs𝒫BaseR|R𝑠sRngRRngR𝑠ARngAB
29 15 28 bitrd Could not format ( R e. Rng -> ( A e. ( SubRng ` R ) <-> ( R e. Rng /\ ( R |`s A ) e. Rng /\ A C_ B ) ) ) : No typesetting found for |- ( R e. Rng -> ( A e. ( SubRng ` R ) <-> ( R e. Rng /\ ( R |`s A ) e. Rng /\ A C_ B ) ) ) with typecode |-
30 3 4 29 pm5.21nii Could not format ( A e. ( SubRng ` R ) <-> ( R e. Rng /\ ( R |`s A ) e. Rng /\ A C_ B ) ) : No typesetting found for |- ( A e. ( SubRng ` R ) <-> ( R e. Rng /\ ( R |`s A ) e. Rng /\ A C_ B ) ) with typecode |-