27 lines
360 B
Mathematica
27 lines
360 B
Mathematica
inout
|
|
|
|
a = inout.AddOne1(1);
|
|
if (a != 2)
|
|
error("failed");
|
|
endif
|
|
|
|
a = inout.AddOne3(1,1,1);
|
|
if (a != [2,2,2])
|
|
error("failed");
|
|
endif
|
|
|
|
a = inout.AddOne1p((1,1));
|
|
if (a != (2,2))
|
|
error("failed");
|
|
endif
|
|
|
|
a = inout.AddOne2p((1,1),1);
|
|
if (a != [(2,2),2])
|
|
error("failed");
|
|
endif
|
|
|
|
a = inout.AddOne3p(1,(1,1),1);
|
|
if (a != [2,(2,2),2])
|
|
error("failed");
|
|
endif
|
|
|