lean4-htt/tests/lean/run/zetaDeltaTryThisIssue.lean
Marc Huisinga 9d427fdfcf
feat: "try this" messages with support for interactivity (#10524)
This PR adds support for interactivity to the combined "try this"
messages that were introduced in #9966. In doing so, it moves the link
to apply a suggestion to a separate `[apply]` button in front of the
suggestion. Hints with diffs remain unchanged, as they did not
previously support interacting with terms in the diff, either.

<img width="379" height="256" alt="Suggestion with interactive message"
src="https://github.com/user-attachments/assets/7838ebf6-0613-46e7-bc88-468a05acbf51"
/>
2025-10-13 13:39:03 +00:00

29 lines
503 B
Text

opaque f : Nat → Nat
/--
info: Try this:
[apply] simp only [h1, x]
---
warning: declaration uses 'sorry'
-/
#guard_msgs in
example (a : Nat) : True := by
let x := a
have h1 : f x = 2 := sorry
suffices f a = 2 by sorry
let w := a + a
simp? only [h1, w, x]
/--
info: Try this:
[apply] simp only [this, x]
---
warning: declaration uses 'sorry'
-/
#guard_msgs in
example : True := by
let x := 37
let y := 34
have : x = 2 := sorry
suffices 37 = 2 by sorry
simp? only [this, x, y]