fact: Definition Fdiv_aux {beta} prec (x y : float beta) : ufloat beta := match x, y with | Fnan, _ => Unan | _, Fnan => Unan | _, Fzero => Unan | Fzero, _ => Uzero | Float sx mx ex, Float sy my ey => match Fdiv_aux2 beta (Zpos prec) (Zpos mx) ex (Zpos my) ey with | (Zpos m, e, l) => Ufloat (xorb sx sy) m e (convert_location l) | _ => Unan end end.
imports: Coq(Reals Bool ZArith) Flocq(Zaux Raux Div Sqrt) Xreal Basic