[project @ Added ARRAY-EQUAL and supporting functions.]
commitbd53a56fcde9c0e365e5935731abfcfb06b6c776
authorThomas M. Hermann <tmh.public@gmail.com>
Mon, 26 Jan 2009 15:28:50 +0000 (26 15:28 +0000)
committerThomas M. Hermann <tmh.public@gmail.com>
Mon, 26 Jan 2009 15:28:50 +0000 (26 15:28 +0000)
tree785312aa563a8abac9081b14e6066a89ade93075
parenta9a1678d7b546de22521707e476c86e72343f6f7
[project @ Added ARRAY-EQUAL and supporting functions.]

Added a function, ARRAY-EQUAL, that will descend into 2 arrays and
checks each element for equality. Necessited 2 supporting
functions. The first function, DIMMENSIONS-EQUAL, returns true if the
arrays are of equal rank and equal dimension in each rank. The other
supporting function, ELEMENT-EQUAL, performs the actual work of the
testing each element of each array for equality.
lisp-unit.lisp