diff options
Diffstat (limited to 'flocq/Calc')
-rw-r--r-- | flocq/Calc/Fcalc_round.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/flocq/Calc/Fcalc_round.v b/flocq/Calc/Fcalc_round.v index a1bcb84a..19652d08 100644 --- a/flocq/Calc/Fcalc_round.v +++ b/flocq/Calc/Fcalc_round.v @@ -646,7 +646,7 @@ case Zlt_bool_spec ; intros Hk. (* *) unfold truncate_aux. rewrite Fx at 1. -refine (let H := _ in conj _ H). +unshelve refine (let H := _ in conj _ H). unfold k. ring. rewrite <- H. apply F2R_eq_compat. |