Metamath Proof Explorer

Theorem isrimOLD

Description: Obsolete version of isrim as of 12-Jan-2025. (Contributed by AV, 22-Oct-2019) (Proof modification is discouraged.) (New usage is discouraged.)

Ref Expression
Hypotheses rhmf1o.b 
|- B = ( Base ` R )
rhmf1o.c 
|- C = ( Base ` S )
Assertion isrimOLD 
|- ( ( R e. V /\ S e. W ) -> ( F e. ( R RingIso S ) <-> ( F e. ( R RingHom S ) /\ F : B -1-1-onto-> C ) ) )

Proof

Step Hyp Ref Expression
1 rhmf1o.b 
 |-  B = ( Base ` R )
2 rhmf1o.c 
 |-  C = ( Base ` S )
3 isrim0OLD 
 |-  ( ( R e. V /\ S e. W ) -> ( F e. ( R RingIso S ) <-> ( F e. ( R RingHom S ) /\ `' F e. ( S RingHom R ) ) ) )
4 1 2 rhmf1o 
 |-  ( F e. ( R RingHom S ) -> ( F : B -1-1-onto-> C <-> `' F e. ( S RingHom R ) ) )
5 4 bicomd 
 |-  ( F e. ( R RingHom S ) -> ( `' F e. ( S RingHom R ) <-> F : B -1-1-onto-> C ) )
6 5 a1i 
 |-  ( ( R e. V /\ S e. W ) -> ( F e. ( R RingHom S ) -> ( `' F e. ( S RingHom R ) <-> F : B -1-1-onto-> C ) ) )
7 6 pm5.32d 
 |-  ( ( R e. V /\ S e. W ) -> ( ( F e. ( R RingHom S ) /\ `' F e. ( S RingHom R ) ) <-> ( F e. ( R RingHom S ) /\ F : B -1-1-onto-> C ) ) )
8 3 7 bitrd 
 |-  ( ( R e. V /\ S e. W ) -> ( F e. ( R RingIso S ) <-> ( F e. ( R RingHom S ) /\ F : B -1-1-onto-> C ) ) )