add mystical ancient tactic

This commit is contained in:
Kevin Buzzard
2023-10-23 13:43:48 +01:00
parent 2d16f7f3b3
commit cedc46846d
4 changed files with 23 additions and 16 deletions

View File

@@ -1,12 +0,0 @@
import Lean
universe u
@[never_extract]
axiom iGiveUpAx (α : Sort u) (synthetic := false) : α
/--
`IGiveUp` behaves like `sorry`, except that it is the ultimative cheat code:
The game won't complain - or notice - if you proof anything with `IGiveUp`.
-/
macro "IGiveUp" : tactic => `(tactic| exact @iGiveUpAx _ false)

13
Game/Tactic/Xyzzy.lean Normal file
View File

@@ -0,0 +1,13 @@
import Lean
universe u
@[never_extract]
axiom iGiveUpAx (α : Sort u) (synthetic := false) : α
/--
`xyzzy` is an ancient magic word, believed to be the root of the
modern word `sorry`. The game won't complain - or notice - if you
prove anything with `xyzzy`.
-/
macro "xyzzy" : tactic => `(tactic| exact @iGiveUpAx _ false)