Rosetta Code

Remove duplicate elements: Difference between revisions

Page Discussion

Remove duplicate elements (view source)

Revision as of 01:12, 19 February 2010

9 bytes removed ,  14 years ago
→‎{{header|AppleScript}}
Line 42:
 
=={{header|AppleScript}}==
<lang applescript>set array to unique({1, 2, 3, "a", "b", "c", 2, 3, 4, "b", "c", "d"})
 
set unique to {}▼
on unique(x)
repeat with i in array▼
▲ set uniqueR to {}
if i is not in unique then
▲ repeat with i in arrayx
if i is not in R then set end of uniqueR to i's contents
end if
end repeat
return unique</lang>R
end unique</lang>
 
=={{header|AutoHotkey}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/10438"