diff options
Diffstat (limited to 'theories/Numbers/Integer')
| -rw-r--r-- | theories/Numbers/Integer/BigZ/ZMake.v | 4 | ||||
| -rw-r--r-- | theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/theories/Numbers/Integer/BigZ/ZMake.v b/theories/Numbers/Integer/BigZ/ZMake.v index 0bcf22e328..cb16e1291e 100644 --- a/theories/Numbers/Integer/BigZ/ZMake.v +++ b/theories/Numbers/Integer/BigZ/ZMake.v @@ -368,12 +368,12 @@ Module Make (N:NType) <: ZType. | Neg nx => zero end. - Theorem spec_log2: forall x, to_Z (log2 x) = Zlog2 (to_Z x). + Theorem spec_log2: forall x, to_Z (log2 x) = Z.log2 (to_Z x). Proof. intros. destruct x as [p|p]; simpl. apply N.spec_log2. rewrite N.spec_0. destruct (Z_le_lt_eq_dec _ _ (N.spec_pos p)) as [LT|EQ]. - rewrite Zlog2_nonpos; auto with zarith. + rewrite Z.log2_nonpos; auto with zarith. now rewrite <- EQ. Qed. diff --git a/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v b/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v index dd83b65da1..f409285669 100644 --- a/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v +++ b/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v @@ -324,12 +324,12 @@ Qed. Lemma log2_spec : forall n, 0<n -> 2^(log2 n) <= n /\ n < 2^(succ (log2 n)). Proof. - intros n. zify. apply Zlog2_spec. + intros n. zify. apply Z.log2_spec. Qed. Lemma log2_nonpos : forall n, n<=0 -> log2 n == 0. Proof. - intros n. zify. apply Zlog2_nonpos. + intros n. zify. apply Z.log2_nonpos. Qed. (** Even / Odd *) |
