2014-01-05 20:05:08 +00:00
|
|
|
import Real.
|
|
|
|
variable f {A : Type} (x y : A) : A
|
|
|
|
check f 10 20
|
|
|
|
check f 10
|
|
|
|
check @f
|
|
|
|
variable g {A : Type} (x1 x2 : A) {B : Type} (y1 y2 : B) : B
|
|
|
|
check g 10 20 true
|
|
|
|
check let r : Real -> Real -> Real := g 10 20
|
2013-12-10 17:48:24 +00:00
|
|
|
in r
|
2014-01-05 20:05:08 +00:00
|
|
|
check g 10
|
2014-01-06 05:45:31 +00:00
|
|
|
set::option pp::implicit true
|
2014-01-05 20:05:08 +00:00
|
|
|
check let r : Real -> Real -> Real := g 10 20
|
2013-12-10 17:48:24 +00:00
|
|
|
in r
|