fact: Definition hrndG_aux mx x := match inbetween_loc (IZR mx) (IZR mx + 1) x with | loc_Exact => (false, false) | loc_Inexact Lt => (false, true) | loc_Inexact Eq => (true, false) | loc_Inexact Gt => (true, true) end.
imports: Coq(Decidable Bool ZArith Reals Lia) Flocq(Core Bracket Digits) Gappa_definitions Gappa_dyadic Gappa_round_def Gappa_round_aux