lean4-htt/tests/lean/run/1143.lean
Leonardo de Moura ab31f9ad5d fix: fixes #1143
2022-05-07 15:27:34 -07:00

8 lines
135 B
Text

inductive Foo
| foo | bar
def baz (b : Bool) (x : Foo := .foo) : Foo := Id.run <| do
let mut y := x
if b then
y := .bar
y