12 lines
243 B
Text
12 lines
243 B
Text
def f (n : Nat) : Nat :=
|
|
if h : n = 0 then
|
|
1
|
|
else
|
|
let y := 42
|
|
2 * f (n-1)
|
|
termination_by' measure id
|
|
decreasing_by
|
|
simp [measure, id, invImage, InvImage, Nat.lt_wfRel, WellFoundedRelation.rel]
|
|
apply Nat.pred_lt h
|
|
|
|
#print f
|