We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent c751675 commit ddadf48Copy full SHA for ddadf48
HumanEvalLean/HumanEval5.lean
@@ -4,7 +4,7 @@ example : [2, 2, 2].intersperse 2 = [2, 2, 2, 2, 2] := rfl
4
5
namespace List
6
7
-theorem intersperse_length (l : List α) : (l.intersperse sep).length = 2 * l.length - 1 := by
+theorem length_intersperse (l : List α) : (l.intersperse sep).length = 2 * l.length - 1 := by
8
fun_induction intersperse <;> simp only [intersperse, length_cons, length_nil] at * <;> try omega
9
next h _ => have := length_pos_iff.mpr h; omega
10
0 commit comments