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

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