1 --- rlab-2.2.9-old/test.r 2006-10-26 16:45:47.000000000 -0400
2 +++ rlab-2.2.9/test.r 2006-11-16 01:42:50.000000000 -0500
9 tic(); # Start timing the tests...
12 if( ![a] ) { error(); }
13 if( !!![a]) { error(); }
15 -"\tfinished real-scalar entities..."
16 +printf ("\tfinished real-scalar entities...\n");
18 # SCALAR ENTITIES (COMPLEX)
22 b = [1,2,3;4,5,6;7,8,9];
23 c = [1,4,9;4,10,18;7,16,27];
26 if (!all (all (a .* b == c))) { error (); }
27 if (!all (all (b .* a == c))) { error (); }