14 lines
202 B
Text
14 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
|