DZone Snippets: split-unique code http://snippets.dzone.com/posts Thu, 24 Jul 2008 20:17:27 GMT DZone Snippets: split-unique code SPLIT-UNIQUE - split a block into unique and duplicate values http://snippets.dzone.com/posts/show/2948 <code> <br /> split-unique: func [block [any-block!] /local uniq dupe dest] [ <br /> uniq: copy [] <br /> dupe: copy [] <br /> foreach item block [ <br /> dest: either find/only uniq item [dupe] [uniq] <br /> append/only dest item <br /> ] <br /> reduce [uniq dupe] <br /> ] <br /></code> Wed, 01 Nov 2006 21:35:34 GMT http://snippets.dzone.com/posts/show/2948 gregg.irwin (Gregg Irwin)