search

lean-ja / lean-by-example

コード例で学ぶ Lean 言語
https://lean-ja.github.io/lean-by-example/
MIT License
15 stars 5 forks source link

Expr を Stx から作る例 #393

Open Seasawher opened 5 days ago

Seasawher commented 5 days ago 
import Lean

open Lean Elab Term

#eval show TermElabM _ from do
  let stx : Syntax ← `(∀ (a : Prop) (b : Prop), a ∨ b → b → a ∧ a)
  let expr ← elabTermAndSynthesize stx none
  logInfo expr