aboutsummaryrefslogtreecommitdiffstats
path: root/flocq/Core/Fcore_float_prop.v
diff options
context:
space:
mode:
authorGuillaume Melquiond <guillaume.melquiond@inria.fr>2017-03-08 08:35:29 +0100
committerGuillaume Melquiond <guillaume.melquiond@inria.fr>2017-03-08 08:35:29 +0100
commit177c8fbc523a171e8c8470fa675f9a69ef7f99de (patch)
treef54d8315891bec2f741545991f420dd4407bccc0 /flocq/Core/Fcore_float_prop.v
parent44b63eb13151ca5c3e83ee6a9e7eb6c0049c3758 (diff)
downloadcompcert-kvx-177c8fbc523a171e8c8470fa675f9a69ef7f99de.tar.gz
compcert-kvx-177c8fbc523a171e8c8470fa675f9a69ef7f99de.zip
Adapt proofs to future handling of literal constants in Coq.
This commit is mainly a squash of the relevant compatibility commits from Flocq's master. Most of the changes are meant to make the proofs oblivious to the way constants such as 0, 1, 2, and -1 are represented.
Diffstat (limited to 'flocq/Core/Fcore_float_prop.v')
-rw-r--r--flocq/Core/Fcore_float_prop.v4
1 files changed, 2 insertions, 2 deletions
diff --git a/flocq/Core/Fcore_float_prop.v b/flocq/Core/Fcore_float_prop.v
index 8199ede6..a183bf0a 100644
--- a/flocq/Core/Fcore_float_prop.v
+++ b/flocq/Core/Fcore_float_prop.v
@@ -136,7 +136,7 @@ Qed.
(** Sign facts *)
Theorem F2R_0 :
forall e : Z,
- F2R (Float beta 0 e) = R0.
+ F2R (Float beta 0 e) = 0%R.
Proof.
intros e.
unfold F2R. simpl.
@@ -145,7 +145,7 @@ Qed.
Theorem F2R_eq_0_reg :
forall m e : Z,
- F2R (Float beta m e) = R0 ->
+ F2R (Float beta m e) = 0%R ->
m = Z0.
Proof.
intros m e H.