extra/sets/extras/extras.factor

   1 ! Copyright (C) 2013 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: kernel sequences sets ;
   4 IN: sets.extras
   5
   6 : setwise-xor ( seq0 seq1 -- set )
   7     [ append members ] [ intersect ] 2bi diff ;