#[global]
Hint Resolve log_good_step : core.

(* Specifications: *)
Theorem log_init : forall n, n < 2 -> log n == 0.
Theorem log_step : forall n, 2 <= n -> log n == S (log (half n)).
Theorem pow2_log : forall n, 0 < n -> half n < 2^^(log n) <= n.
End NdefOpsProp.