fact: Record is_CMetricField (F : CField) (abs : CSetoid_fun F IR) : Prop := {ax_abs_gt_zero : forall x : F, [0] [<=] abs x; ax_abs_resp_mult : forall x y : F, abs (x[*]y) [=] abs x[*]abs y; ax_abs_triangle : forall x y : F, abs (x[+]y) [<=] abs x[+]abs y}.
imports: CoRN.reals.CReals1