lean4-htt/tests/lean/partialIssue.lean

12 lines
252 B
Text

import Lean.CoreM
#eval Lean.addDecl <| .mutualDefnDecl [{
name := `False_intro
levelParams := []
type := .const ``False []
value := .const `False_intro []
hints := .opaque
safety := .partial
}]
theorem False.intro : False := False_intro