rebol[]for i 1 10000 1[if 2 = length? unique form i[print i]]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page