proposition: Lemma lognat_ge_monotonic_mt : forall (a b : nat)(pfa : a <> 0)(pfb : b <> 0), (lognat pfa) < (lognat pfb) -> a < b.
proof: Proof. intros. specialize (lognat_ge_monotonic pfa pfb). intros. specialize (mt H0). intros. apply ge_not. lia. Qed.
imports: ZArith micromega.Lia