lean4-htt/tests/lean/wfrecUnusedLet.lean.expected.out
2022-06-07 17:54:10 -07:00

6 lines
155 B
Text

def f : Nat → Nat :=
WellFounded.fix f.proof_1 fun n a =>
if h : n = 0 then 1
else
let y := 42;
2 * a (n - 1) (_ : (measure id).1 (n - 1) n)