End equation.
(* This is property 3.23 *)

(* Specifications: *)
Theorem alpha_nat_divides_k_ge_1 m : alpha_nat b k │ alpha_nat b m <-> k │ m.
End divisibility_1.
Theorem alpha_nat_divisibility_1 b k m : 2 <= b -> alpha_nat b k │ alpha_nat b m <-> k │ m.
Check alpha_nat_divisibility_1.