Skip to content

Commit 1a6e7c7

Browse files
committed
fix the fix
1 parent 73dcb81 commit 1a6e7c7

File tree

1 file changed

+4
-5
lines changed

1 file changed

+4
-5
lines changed

Mathlib/Tactic/Linarith/Frontend.lean

Lines changed: 4 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -516,15 +516,14 @@ elab_rules : tactic
516516
commitIfNoEx do liftMetaFinishingTactic <| Linarith.linarith o.isSome args.toList cfg
517517

518518
private meta partial def minimize (cfg : Linarith.LinarithConfig) (st : Tactic.SavedState)
519-
(hs : List Expr) (i : Nat) : TacticM (List Expr) := do
520-
let g ← getMainGoal
519+
(g : MVarId) (hs : List Expr) (i : Nat) : TacticM (List Expr) := do
521520
if _h : i < hs.length then
522521
let rest := hs.eraseIdx i
523522
st.restore
524523
try
525524
let _ ← Linarith.linarith true rest cfg g
526-
minimize cfg st rest i
527-
catch _ => minimize cfg st hs (i+1)
525+
minimize cfg st g rest i
526+
catch _ => minimize cfg st g hs (i+1)
528527
else
529528
return hs
530529

@@ -543,7 +542,7 @@ elab_rules : tactic
543542
throwError "linarith? currently only supports named hypothesis, not terms"
544543
let used ←
545544
if cfg.minimize then
546-
minimize cfg st used₀ 0
545+
minimize cfg st g used₀ 0
547546
else
548547
pure used₀
549548
st.restore

0 commit comments

Comments
 (0)