2014-09-04 01:37:01 +00:00
|
|
|
import data.nat
|
|
|
|
|
|
2014-10-02 23:20:52 +00:00
|
|
|
constants a b : nat
|
2014-09-04 01:37:01 +00:00
|
|
|
|
|
|
|
|
namespace boo
|
2014-09-04 22:03:59 +00:00
|
|
|
export nat (rec add)
|
2014-09-04 01:37:01 +00:00
|
|
|
check a + b
|
|
|
|
|
check nat.add
|
|
|
|
|
check boo.add
|
|
|
|
|
check add
|
|
|
|
|
end boo
|
|
|
|
|
|
2014-09-04 22:03:59 +00:00
|
|
|
check boo.rec
|
2014-09-04 01:37:01 +00:00
|
|
|
|
|
|
|
|
open boo
|
|
|
|
|
check a + b
|
2014-09-04 22:03:59 +00:00
|
|
|
check boo.rec
|
|
|
|
|
check nat.rec
|
