fact: Record Homomorphism : Type := {map :> R1 -> R2; map_strext : fun_strext map; map_pres_less : fun_pres_relation map (cof_less (c:=R1)) (cof_less (c:=R2)); map_pres_plus : fun_pres_bin_fun map (csg_op (c:=R1)) (csg_op (c:=R2)); map_pres_mult : fun_pres_bin_fun map (cr_mult (c:=R1)) (cr_mult (c:=R2)); map_pres_Lim : fun_pres_Lim map}.
imports: CoRN.reals.CReals