Commit 162d4f32 authored by Simon Spies's avatar Simon Spies
Browse files

lt vs gt

parent 89217996
Pipeline #18030 failed with stage
in 0 seconds
......@@ -3349,7 +3349,7 @@ Section seqZ.
Local Open Scope Z.
Lemma seqZ_nil m n: n ≤ 0 → seqZ m n = [].
Proof. by destruct n. Qed.
Lemma seqZ_cons m n: n > 0 → seqZ m n = m :: seqZ (Z.succ m) (Z.pred n).
Lemma seqZ_cons m n: 0 < n → seqZ m n = m :: seqZ (Z.succ m) (Z.pred n).
intros H. unfold seqZ. replace n with (Z.succ (Z.pred n)) at 1 by lia.
rewrite Z2Nat.inj_succ by lia. f_equal/=.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment