Compare syncGroup shape points list

Working on a script to compare shapes in syncGroups  and sync the layer color coloring.

It compares the points list from the master to the child's group shape using the points transformed from the parent.
The parent is defined by "par" prefixed to the group name

I know there will not be duplicate elements so simple code is all I need:

forall(mem list1 member(mem list2))

When it runs in the script I get a nil, but If I copy and paste the lists to a variables in the CIW and run the procedure I get a t

Running script and printing the list the value of the lists I see they are the same or one is reversed, but the code should still see they are the same.

The code does see some elements as the same but not all

Is there a rounding problem when I use the dbTransformPoint or is there something I am missing.

Code I have tried to match two lists: (probably some others but it was ugly code)

procedure(cmpPtsList0(list1 list2)
    forall(mem list1 member(mem list2))
)

procedure(cmpPtsList1(list1 list2)
    foreach(mem list1
        list2 = remove(mem list2))
null(list2)
)

procedure(cmpPtsList2(list1 list2)
let(    (x1 x2 y1 y2 list3)
foreach(mem1 list1
    x1    = xCoord(mem1)
    y1    = yCoord(mem1)
    foreach(mem2 list2
        x2    = xCoord(mem2)
        y2    = yCoord(mem2)
        when(equal(x1 x2) && equal(y1 y2)
            list2 = remove(mem1 list2)))
    )
null(list2)
))

procedure(cmpPtsList3(list1 list2)
    equal(list1 list2) || equal(list1 reverse(list2))
 )

procedure(cmpPtsListX(listA listB)
let(    ((contentCount makeTable('counts 0)))
    foreach(elem listA contentCount[elem]=contentCount[elem]+1)
    foreach(elem listB contentCount[elem]=contentCount[elem]-1)
    forall(elem contentCount zerop(contentCount[elem]))
  )
)

Paul