Method code for $list.intersection()

[Turn off line numbering]

---

  1: arg l1, l2;
  2: var i;
  3: 
  4: // set intersection of the arguments
  5: return filter i in (l1) where (i in l2);

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit