lean4-htt/tests/lean/wfrecUnusedLet.lean.expected.out
2021-12-15 11:42:38 +00:00

6 lines
155 B
Text

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