22 lines
280 B
Mathematica
22 lines
280 B
Mathematica
|
template_ns
|
||
|
|
p1 = pairii(2,3);
|
||
|
|
p2 = pairii(p1);
|
||
|
|
|
||
|
|
if (p2.first != 2)
|
||
|
|
error("failed");
|
||
|
|
endif
|
||
|
|
if (p2.second != 3)
|
||
|
|
error("failed");
|
||
|
|
endif
|
||
|
|
|
||
|
|
p3 = pairdd(3.5,2.5);
|
||
|
|
p4 = pairdd(p3);
|
||
|
|
|
||
|
|
if (p4.first != 3.5)
|
||
|
|
error("failed");
|
||
|
|
endif
|
||
|
|
|
||
|
|
if (p4.second != 2.5)
|
||
|
|
error("failed");
|
||
|
|
endif
|