lean4-htt/tests/lean/letFun.lean.expected.out
Kyle Miller a2226a43ac
feat: encode let_fun using a letFun function (#2973)
Switches from encoding `let_fun` using an annotated `(fun x : t => b) v`
expression to a function application `letFun v (fun x : t => b)`.

---------

Co-authored-by: Sebastian Ullrich <sebasti@nullri.ch>
2023-12-18 09:01:42 +00:00

26 lines
396 B
Text

let_fun f := fun x => x * 2;
let_fun x := 1;
let_fun y := x + 1;
f (y + x) : Nat
a b : Nat
h1 : a = 0
h2 : b = 0
⊢ (let_fun x := 1;
x + x) >
b
(let_fun this := id;
this)
1 : Nat
a b : Nat
h : a > b
⊢ a > b
let_fun n := 5;
{ val := [], property := (_ : 0 ≤ n) } : { as // List.length as ≤ 5 }
rfl : (let_fun n := 5;
n) =
let_fun n := 5;
n
rfl : 2 = 2
5
let_fun n := 5;
n