Skip to content

Commit e568743

Browse files
chore(GroupTheory/FreeGroup): golf proof using autogenerated lemma (leanprover-community#40902)
I forgot to add this in leanprover-community#40657 apparently. It seems like we don't need this lemma anyways; but thats beyond the scope of this PR. Co-authored-by: Batixx <s59fpern@uni-bonn.de>
1 parent 85304dd commit e568743

1 file changed

Lines changed: 1 addition & 3 deletions

File tree

Mathlib/GroupTheory/FreeGroup/Basic.lean

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -332,15 +332,13 @@ protected theorem sublist : Red L₁ L₂ → L₂ <+ L₁ :=
332332
theorem length_le (h : Red L₁ L₂) : L₂.length ≤ L₁.length :=
333333
h.sublist.length_le
334334

335-
set_option linter.auxLemma false in
336335
@[to_additive (attr := deprecated "Should not be needed." (since := "2026-04-10"))]
337336
theorem sizeof_of_step : ∀ {L₁ L₂ : List (α × Bool)},
338337
Step L₁ L₂ → sizeOf L₂ < sizeOf L₁
339338
| _, _, @Step.not _ L1 L2 x b => by
340339
induction L1 with
341340
| nil =>
342-
-- This was just `dsimp` prior to https://github.com/leanprover/lean4/pull/13320
343-
dsimp [sizeOf, _sizeOf_1]
341+
rw [nil_append, nil_append, cons.sizeOf_spec, cons.sizeOf_spec]
344342
lia
345343
| cons hd tl ih =>
346344
dsimp

0 commit comments

Comments
 (0)