diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2017-02-13 09:57:27 +0100 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2017-02-13 09:57:27 +0100 |
| commit | 9ceacf45af6bfe396e36938e2573348ac4d07603 (patch) | |
| tree | bb5200ab8fa1ab24ad547a10e5626585f307c6bf /flocq | |
| parent | 236d8a48288ea5845466408cf9d0be2ccd68f9a8 (diff) | |
| parent | c514b1e62302bb674075cd32a412ed47a57cbb5b (diff) | |
| download | compcert-kvx-9ceacf45af6bfe396e36938e2573348ac4d07603.tar.gz compcert-kvx-9ceacf45af6bfe396e36938e2573348ac4d07603.zip | |
Merge branch 'coq-8.6' of https://github.com/maximedenes/CompCert into maximedenes-coq-8.6
Diffstat (limited to 'flocq')
| -rw-r--r-- | flocq/Appli/Fappli_IEEE.v | 1 | ||||
| -rw-r--r-- | flocq/Core/Fcore_digits.v | 3 |
2 files changed, 2 insertions, 2 deletions
diff --git a/flocq/Appli/Fappli_IEEE.v b/flocq/Appli/Fappli_IEEE.v index 23999a50..a4accfa5 100644 --- a/flocq/Appli/Fappli_IEEE.v +++ b/flocq/Appli/Fappli_IEEE.v @@ -1,3 +1,4 @@ +Unset Bracketing Last Introduction Pattern. (** This file is part of the Flocq formalization of floating-point arithmetic in Coq: http://flocq.gforge.inria.fr/ diff --git a/flocq/Core/Fcore_digits.v b/flocq/Core/Fcore_digits.v index d40c1a09..7d1d490a 100644 --- a/flocq/Core/Fcore_digits.v +++ b/flocq/Core/Fcore_digits.v @@ -853,8 +853,7 @@ Proof. intros n Zn. rewrite <- (Zdigits_abs n). assert (Hn: (0 < Zabs n)%Z). -destruct n ; try easy. -now elim Zn. +destruct n ; now easy. destruct (Zabs n) as [|p|p] ; try easy ; clear. simpl. generalize 1%Z (radix_val beta) (refl_equal Lt : (0 < 1)%Z). |