15 lines
250 B
Text
15 lines
250 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
|