15 lines
202 B
Text
15 lines
202 B
Text
|
variables {a : Type}
|
||
|
|
|
||
|
|
definition foo (A : Type) : A → A :=
|
||
|
|
begin
|
||
|
|
intro a, assumption
|
||
|
|
end
|
||
|
|
|
||
|
|
(*
|
||
|
|
local d = get_env():find("foo")
|
||
|
|
assert(#d:univ_params() == 1)
|
||
|
|
*)
|
||
|
|
|
||
|
|
set_option pp.universes true
|
||
|
|
check foo
|