blob: ca4572c86b391282eed3c0eba2e9721c79360684 [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
rfl