Skip to content

Commit 5f90f91

Browse files
authored
Splitting coq-stdlib out introduces a mysterious problem with `Zeq_bool`. This PR is a work around.
1 parent 1eb3496 commit 5f90f91

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

lib/IEEE754_extra.v

+2
Original file line numberDiff line numberDiff line change
@@ -992,6 +992,8 @@ Remark bounded_Bexact_inverse:
992992
emin <= e <= emax - prec <-> bounded prec emax Bexact_inverse_mantissa e = true.
993993
Proof.
994994
intros. unfold bounded, canonical_mantissa. rewrite andb_true_iff.
995+
rewrite ?Z.eqb_compare.
996+
fold (Zeq_bool (fexp (Z.pos (digits2_pos Bexact_inverse_mantissa) + e)) e).
995997
rewrite <- Zeq_is_eq_bool. rewrite <- Zle_is_le_bool.
996998
rewrite Bexact_inverse_mantissa_digits2_pos.
997999
unfold fexp, FLT_exp, emin. lia.

0 commit comments

Comments
 (0)