fact: Definition fromF (f : Basic.float radix) := match f with | Basic.Fnan => Fnan | Basic.Fzero => Float mantissa_zero exponent_zero | Basic.Float false m e => Float (ZtoM (Zpos m)) (ZtoE e) | Basic.Float true m e => Float (ZtoM (Zneg m)) (ZtoE e) end.
imports: Coq(ZArith Reals Lia Bool Psatz) Flocq(Zaux Raux Digits Bracket) mathcomp.ssreflect(ssrbool) Xreal Basic Generic Generic_proof Sig Specific_sig