lean4-htt/tests/compiler/expr.lean
2020-10-25 09:16:38 -07:00

10 lines
180 B
Text

import Lean
open Lean
def main : IO UInt32 := do
let e := mkAppN (mkConst `f) #[mkConst `a, mkConst `b]
IO.println e
IO.println s!"hash: {e.hash}"
IO.println e.getAppArgs
pure 0