# matchBodys_udf_2
# written by John Dannenhoffer

# first BOX
BOX       0  0  0  1  1  1
SELECT    FACE
ATTRIBUTE _color  $red

# second BOX
BOX       1  0  0  1  1  1
ATTRIBUTE _color  $blue

# find and report the matches using the new method
UDPRIM    matchBodys   makemaps 1

SELECT    BODY     @nbody-1
GETATTR   nodeMap1 $_nodeMap_   # 0 0 0 0 1 2 3 4
GETATTR   edgeMap1 $_edgeMap_   # 0 0 0 0 1 2 3 4 0 0 0 0
GETATTR   faceMap1 $_faceMap_   # 0 1 0 0 0 0

ASSERT    nodeMap1.sum  10
ASSERT    edgeMap1.sum  10
ASSERT    faceMap1.sum   1

SELECT    BODY     @nbody
GETATTR   nodeMap2 $_nodeMap_   # 5 6 7 8 0 0 0 0
GETATTR   edgeMap2 $_edgeMap_   # 5 6 7 8 0 0 0 0 0 0 0 0
GETATTR   faceMap2 $_faceMap_   # 2 0 0 0 0 0

ASSERT    nodeMap2.sum  26
ASSERT    edgeMap2.sum  26
ASSERT    faceMap2.sum   2

END
