lean4-htt/tests/lean/choice_expl.lean
2016-09-20 08:32:37 -07:00

15 lines
247 B
Text

universe variables u
namespace N1
definition pr {A : Type u} (a b : A) := a
end N1
namespace N2
definition pr {A : Type u} (a b : A) := b
end N2
open N1 N2
constant N : Type.{1}
constants a b : N
check @N1.pr
check @N2.pr N a b
check pr a b