8 lines
195 B
Text
8 lines
195 B
Text
import init.lean.expr
|
|
open Lean
|
|
|
|
def main : IO UInt32 :=
|
|
let e := Expr.app (Expr.const `f []) (Expr.const `a []) in
|
|
IO.println e.dbgToString *>
|
|
IO.println ("hash: " ++ toString e.hash) *>
|
|
pure 0
|