8 lines
219 B
Text
8 lines
219 B
Text
import init.lean.expr
|
|
open lean
|
|
|
|
def main (xs : list string) : io uint32 :=
|
|
let e := expr.app (expr.const `f []) (expr.const `a []) in
|
|
io.println' e.dbg_to_string *>
|
|
io.println' ("hash: " ++ to_string e.hash) *>
|
|
pure 0
|