fact: Definition convert_mode (m : Mode) : R -> Z := match m with | mRndZR => Ztrunc | mRndDN => Zfloor | mRndUP => Zceil | mRndNE => rndNE | mRndNA => rndNA end.
imports: Coq(ZArith Reals List Lia) Flocq(Core) Gappa_library