Motivation: avoid overload when we use `open nat`. Unfortunately, we currently do not allow users to mark inductive datatype declarations as protected.
11 lines
271 B
Text
11 lines
271 B
Text
namespace nat
|
|
check induction_on -- ERROR
|
|
check rec_on -- ERROR
|
|
check nat.induction_on
|
|
check less_than.rec_on -- OK
|
|
check nat.less_than.rec_on
|
|
namespace le
|
|
check rec_on -- ERROR
|
|
check less_than.rec_on
|
|
end le
|
|
end nat
|