lean4-htt/tests/lean/lambdaLiftCache.lean
2022-10-11 21:28:03 -07:00

10 lines
209 B
Text

def map (f : Nat → Nat) (xs : List Nat) :=
xs.map f
set_option trace.Compiler.saveMono true
def foo (x : Nat) (xs : List Nat) :=
map (· + x) xs
def boo (x : Nat) (xs : List Nat) :=
map (· + x) xs