2014-01-05 12:05:08 -08:00
|
|
|
import Int.
|
|
|
|
variable f {A : Type} : A -> A -> A
|
|
|
|
infixl 65 + : f
|
2014-01-05 11:03:35 -08:00
|
|
|
print true + false
|
|
|
|
print 10 + 20
|
|
|
|
print 10 + (- 20)
|
2014-01-09 08:33:52 -08:00
|
|
|
set_option pp::notation false
|
|
|
|
set_option pp::coercion true
|
2014-01-05 11:03:35 -08:00
|
|
|
print true + false
|
|
|
|
print 10 + 20
|
|
|
|
print 10 + (- 20)
|