Commit 7b301bb5 authored by Guillaume Melquiond's avatar Guillaume Melquiond

Added rounding extensionality.

parent c74e88d4
......@@ -552,6 +552,17 @@ Qed.
End Fcore_generic_rounding_pos.
Theorem rounding_ext :
forall rnd1 rnd2,
( forall x e, Zrnd rnd1 x e = Zrnd rnd2 x e ) ->
forall x,
rounding rnd1 x = rounding rnd2 x.
Proof.
intros rnd1 rnd2 Hext x.
unfold rounding.
now rewrite Hext.
Qed.
Section Zrounding_opp.
Variable rnd : Zrounding.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment