proposition: Theorem Babs_idempotent : forall abs_nan (x: binary_float), is_nan x = false -> Babs abs_nan (Babs abs_nan x) = Babs abs_nan x.
proof: Proof. now intros abs_nan [sx|sx|sx plx|sx mx ex Hx]. Qed.
imports: Coq(ZArith Reals Psatz SpecFloat) Core Round Bracket Operations Div Sqrt Relative BinarySingleNaN