File tree Expand file tree Collapse file tree
MathlibTest/Tactic/Convert Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -130,7 +130,7 @@ structure Congr!.Config where
130130 This can be used to control which side's definitions are expanded when applying the
131131 congruence lemma (if `preferLHS = true` then the RHS can be expanded). -/
132132 preferLHS : Bool := true
133- /-- Allow both sides to be partial applications.
133+ /-- Allow both sides to be partial applications, and allow overapplications .
134134 When false, given an equality `f a b = g x y z` this means we never consider
135135 proving `f a = g x y`.
136136
Original file line number Diff line number Diff line change @@ -77,7 +77,6 @@ between `Convert.CheapConfig` and `Convert.ExpensiveConfig` based on other flags
7777-/
7878structure Convert.CheapConfig extends Congr!.Config where
7979 postTransparency := .reducible
80- partialApp := false
8180 sameFun := true
8281
8382/-- Internal elaborator for `Convert.CheapConfig`: use `Convert.elabConfig` instead. -/
Original file line number Diff line number Diff line change 22import Mathlib.Tactic.Convert
33import Mathlib.Algebra.Group.Basic
44import Mathlib.Data.Set.Image
5+ import Mathlib.Algebra.Notation.Pi.Defs
56
67private axiom test_sorry : ∀ {α}, α
78set_option autoImplicit true
@@ -153,4 +154,10 @@ example (P : ℕ → Prop) {a b : ℕ} (hab : b = a) (h : P a) : P (semireducibl
153154example (P : ℕ → Prop ) {a b : ℕ} (hab : b = a) (h : P (semireducibleId a)) : P b := by
154155 convert! h
155156
157+ -- Test that overapplications are supported
158+ example (f g h k : Nat → Nat) (H : (f + g) 1 = 0 ) : (h + k) 1 = 0 := by
159+ convert H
160+ guard_target =ₛ h = f
161+ all_goals exact test_sorry
162+
156163end Tests
You can’t perform that action at this time.
0 commit comments