diff options
Diffstat (limited to 'flocq/Appli/Fappli_IEEE.v')
-rw-r--r-- | flocq/Appli/Fappli_IEEE.v | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/flocq/Appli/Fappli_IEEE.v b/flocq/Appli/Fappli_IEEE.v index 23999a50..6400304b 100644 --- a/flocq/Appli/Fappli_IEEE.v +++ b/flocq/Appli/Fappli_IEEE.v @@ -415,8 +415,7 @@ Theorem is_finite_Bopp : forall opp_nan x, is_finite (Bopp opp_nan x) = is_finite x. Proof. -intros opp_nan [| | |] ; try easy. -intros s pl. +intros opp_nan [| |s pl|] ; try easy. simpl. now case opp_nan. Qed. @@ -445,8 +444,7 @@ Theorem is_finite_Babs : forall abs_nan x, is_finite (Babs abs_nan x) = is_finite x. Proof. - intros abs_nan [| | |] ; try easy. - intros s pl. + intros abs_nan [| |s pl|] ; try easy. simpl. now case abs_nan. Qed. |