summaryrefslogtreecommitdiff
path: root/lib/Floats.v
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Floats.v')
-rw-r--r--lib/Floats.v1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Floats.v b/lib/Floats.v
index 63375ff..eb86027 100644
--- a/lib/Floats.v
+++ b/lib/Floats.v
@@ -854,6 +854,7 @@ Theorem floatofint_from_words:
sub (from_words ox4330_0000 (Int.add x ox8000_0000))
(from_words ox4330_0000 ox8000_0000).
Proof.
+Local Transparent Int.repr Int64.repr.
intros; destruct (Int.eq_dec x Int.zero); [subst; vm_compute; reflexivity|].
assert (Int.signed x <> 0).
intro; destruct n; rewrite <- (Int.repr_signed x), H; reflexivity.