lean2/tests/lean/run/366.lean

9 lines
156 B
Text
Raw Normal View History

import hott.path
open path
definition foo (A : Type) : Type := Π (a : A), a ≈ a
definition thm : Π (A : Type), foo A :=
begin
intros,
apply idp
end