Comparing+arrays+for+equality

//by Richard Russell, November 2012//

Supposing you have two numeric arrays (of the same size) and you want to test whether they are identical, i.e. that their contents are the same. Obviously you could iterate through the indices, comparing each element in turn with the corresponding element in the other array, but that's a bit messy. Luckily there is a much neater way to do it: code format="bb4w" array1 -= array2 IF MOD(array1) = 0 THEN PRINT "Arrays are identical" ELSE PRINT "Arrays are different" ENDIF code This works because the **MOD(array)** function returns zero only if //all// the elements of the array are zero.

Of course the above test is destructive of the contents of array1, which may not be desirable. If you want to preserve the contents of the array one method is to reverse the effect of the subtraction by adding back array2: code format="bb4w" array1 -= array2 equal% = MOD(array1) = 0 array1 += array2 code Here **equal%** is set TRUE if the arrays are identical and FALSE otherwise.

Another way of preserving the contents of array1 is to use a third array (with the same dimensions as the other arrays): code format="bb4w" test = array1 - array2 equal% = MOD(test) = 0 code