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

<lsl> integer ListXequY(list lx, list ly) {

   if(lx == ly)
       return ListXnotY(lx,ly) == [];
   return FALSE;

} </lsl>

Example:

<lsl> 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
  }

} </lsl>

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