9 lines
495 B
Text
9 lines
495 B
Text
var [const] words= // create hashed unixdict of striped words (word:True, ...)
|
|
File("dict.txt").howza(11).pump(Dictionary().howza(8).add.fp1(True));
|
|
ss:=words.pump(List, // push stripped unixdict words through some functions
|
|
fcn(w){ words.holds(w.reverse()) }, Void.Filter, // filter palindromes
|
|
// create ("word","drow") if "word"<"drow" (ie remove duplicates)
|
|
fcn(w){ r:=w.reverse(); if(w<r) T(w,r) else Void.Skip });
|
|
|
|
ss.len().println(); //--> 158
|
|
ss.shuffle()[0,5].println();
|