(** Aliases with extra dummy hypothesis, to fulfil the interface *)

(* needed to implement Stdlib.Numbers.NatInt.NZBitsSpec *)
Definition testbit_odd_succ a n (_:0<=n) := testbit_odd_succ' a n.(* needed to implement Stdlib.Numbers.NatInt.NZBitsSpec *)
Definition testbit_even_succ a n (_:0<=n) := testbit_even_succ' a n.

(* Specifications: *)
Lemma testbit_neg_r a n (H:n<0) : testbit a n = false.