lean2/tests/lean/893.hlean
2015-12-10 10:11:55 -08:00

5 lines
138 B
Text

example {A : Type} (f : A → A) (a : A) (H : f a = a) : unit :=
begin
induction H, -- this should raise an error
exact unit.star
end