ListXequY

Function: integer ListXequY(list lx, list ly);

Answers the question: is list X identical to list Y?

Returns the number 1 if true, 0 if false

Note: requires also the function ListXnotY .

The opposite function is ListXneqY .

See also: Lists

integer ListXequY(list lx, list ly)
{
    if(lx == ly)
        return ListXnotY(lx,ly) == [];
    return FALSE;
}

Example:

list l1 = ["a","b","c", 1,2,3];
list l2 = ["a",1,"b",3,"c",3];

integer ListXequY(list lx, list ly)
{
    return ( (llGetListLength(lx) == llGetListLength(ly) ) & ( ListXnotY(lx, ly) == [] ) );
}

list ListXnotY(list lx, list ly) {// return elements in X list that are not in Y list
    list lz;
    integer i = llGetListLength(lx);
    while(i--)
	if ( !~llListFindList(ly,llList2List(lx,i,i)) )
            lz += llList2List(lx,i,i);
    return lz;
}


default{
   state_entry() {
      llSay(0, "Are we the same lists? " + (string)ListXequY(l1,l2));
      //will say in this example: 0 , meaning No
   }
}

Posted with the kind permission of Very Keynes, who originated this script June 2007 in the SL scripters forum http://forums-archive.secondlife.com/54/e4/194138/1.html