Build_RingHomomorphism' (A B : Ring) (map : GroupHomomorphism A B) {H : IsMonoidPreserving (Aop:=ring_mult) (Bop:=ring_mult) (Aunit:=one) (Bunit:=one) map} : RingHomomorphism A B := Build_RingHomomorphism map (Build_IsSemiRingPreserving _ (ismonoidpreserving_grp_homo map) H).
Require Import WildCat. Require Import Spaces.Nat.Core Spaces.Nat.Arithmetic. Require Import Classes.interfaces.abstract_algebra. Require Import Algebra.Groups.Group Algebra.Groups.Subgroup. Require Import Modalities.ReflectiveSubuniverse.