2014-08-29 16:58:11 +00:00
|
|
|
import data.num
|
2014-09-04 23:36:06 +00:00
|
|
|
|
2014-08-29 16:58:11 +00:00
|
|
|
|
2014-10-02 23:20:52 +00:00
|
|
|
constant f : num → num → num → num
|
2014-08-29 16:58:11 +00:00
|
|
|
|
|
|
|
check
|
|
|
|
let a := 10,
|
|
|
|
b := 10,
|
|
|
|
c := 10
|
|
|
|
in f a b (f a 10 c)
|
|
|
|
|
|
|
|
check
|
|
|
|
let a := 10,
|
|
|
|
b := let c := 10 in f a c (f a a (f 10 a c)),
|
|
|
|
d := 10,
|
|
|
|
e := f (f 10 10 d) (f d 10 10) a
|
|
|
|
in f a b (f e d 10)
|