16 lines
153 B
Text
16 lines
153 B
Text
|
|
|
|
let pair x y = (x, y)
|
|
|
|
let p1 = pair 1 1
|
|
let p2 = (1, True)
|
|
let p3 = (False, 1)
|
|
|
|
@:Int p1.0
|
|
@:Int p1.1
|
|
|
|
@:Int p2.0
|
|
@:Bool p2.1
|
|
|
|
@:Bool p3.0
|
|
@:Int p3.1
|