fact: Definition PIOpToFunction OP := match OP with | ADD => PrimInt63.add | SUB => PrimInt63.sub | MUL => PrimInt63.mul | DIV => PrimInt63.divs end.
imports: Coq(PrimInt63 Sint63 Floats PArray) Coq(Bool List Reals Lia Lra) Flocq(Core PrimFloat BinarySingleNaN Operations)