proposition: Lemma round_mode_choice_mode : forall md x m l, inbetween_int m (Rabs x) l -> round_mode md x = cond_Zopp (Rlt_bool x 0) (choice_mode md (Rlt_bool x 0) m l).
proof: Proof. destruct md. - exact inbetween_int_NE_sign. - exact inbetween_int_ZR_sign. - exact inbetween_int_DN_sign. - exact inbetween_int_UP_sign. - exact inbetween_int_NA_sign. Qed.
imports: Coq(ZArith Reals Psatz SpecFloat) Core Round Bracket Operations Div Sqrt Relative