blob: a8bcc50b281951f88d28818d35dc580b232222c1 [file] [edit]
def test2 : (Function.comp id id) = λ x : Nat => x := by
conv in (Function.comp _) =>
trace_state
simp (config := { unfoldPartialApp := true }) [Function.comp, id]
trace_state