Difference between revisions of "ListXequY"

From Second Life Wiki
Jump to navigation Jump to search
m (examples should at least compile)
Line 27: Line 27:
list l1 = ["a","b","c","d"];
list l1 = ["a","b","c","d"];
list l2 = ["a","1","b","2","c","3"];
list l2 = ["a","1","b","2","c","3"];
integer ListXequY(list lx, list ly) {
    if (llList2CSV( ListXnotY(lx,ly) ) =="") return TRUE;
    else return FALSE;
}
list ListXnotY(list lx, list ly) {// return elements in X list that are not in Y list
    list lz = [];
    integer i = 0;
    integer n = llGetListLength(lx);
    for (; i < n; i++)
        if (llListFindList(ly,llList2List(lx,i,i)) == -1)
            lz += llList2List(lx,i,i);
    return lz;
}


default{
default{

Revision as of 23:27, 25 June 2010

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 (llList2CSV( ListXnotY(lx,ly) ) =="") return TRUE;
   else return FALSE;

} </lsl>


Example:

<lsl> list l1 = ["a","b","c","d"]; list l2 = ["a","1","b","2","c","3"];

integer ListXequY(list lx, list ly) {

   if (llList2CSV( ListXnotY(lx,ly) ) =="") return TRUE;
   else return FALSE;

}

list ListXnotY(list lx, list ly) {// return elements in X list that are not in Y list

   list lz = [];
   integer i = 0;
   integer n = llGetListLength(lx);
   for (; i < n; i++)
       if (llListFindList(ly,llList2List(lx,i,i)) == -1)
           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