9 lines
156 B
Text
9 lines
156 B
Text
|
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
|