W3:system"wget -qO- http://www.yak.net/kablooey/scrabble/3letterwords.html|grep ''|cut -d'>' -f2|cut -d'<' -f1" W:system"wget -qO- http://www.scrabble.org.au/words/fours.htm" W4:first each"<"vs'W{x[0]+til x[1]-x 2}raze 1 -1 1+1 -1 1#\:where W like"*
*" W:system"wget -qO- http://www.poslarchive.com/math/scrabble/lists/common-5.html" W:(1+first where W like"*
*")_W W5:upper -1_" "vs first"<"vs raze W,'" " graph:{W:(W3;W4;W5)@-3+l:count x:string x;update p:`$x from flip[enlist[`c]!(`$enlist distinct raze W where each W like/:x^/:neg[til l]rotate'l#enlist l$"* ")]} ladder:{[s;e] `G set select from graph[s]where p<>c; while[not e in G`c;{G,:select from graph[x]where not c in distinct raze value flip G}each exec c from G where not c in exec p from G]; reverse raze over(exec p by c from G)scan e} \ / http://interactivepython.org/courselib/static/pythonds/Graphs/graphbfs.html ladder[`FOOL;`SAGE] / http://blog.wolfram.com/2012/01/11/the-longest-word-ladder-puzzle-ever/ ladder[`BEST;`MATH] / http://en.wikipedia.org/wiki/Word_ladder ladder[`COLD;`WARM] / http://books.google.com/books?id=JkQCAAAAQAAJ&dq=charles%20dodgson&pg=PP1#v=onepage&q&f=false ladder[`HEAD;`TAIL] / mlp prognosis ladder[`MARK;`FAIL] / http://thinks.com/puzzles/doublets.htm ladder[`MILK;`PAIL] `MILK`MILL`PILL`PALL`PAIL ladder[`WELL;`DONE] `WELL`DELL`DOLL`DOLE`DONE ladder[`MICE;`RATS] `MICE`RICE`RACE`RATE`RATS ladder[`CAMP;`SITE] `CAMP`SAMP`SAME`SATE`SITE ladder[`INK;`PEN] `INK`INN`ION`DON`DEN`PEN ladder[`OIL;`GAS] `OIL`AIL`AAL`GAL`GAS ladder[`FISH;`BIRD] `FISH`BISH`BISK`BIRK`BIRD ladder[`FIRE;`HEAT] `FIRE`HIRE`HERE`HERD`HEAD`HEAT ladder[`HAND;`FOOT] `HAND`FAND`FOND`FOOD`FOOT ladder[`FOUR;`FIVE] `FOUR`FOUD`FOND`FIND`FINE`FIVE ladder[`DEAD;`LIVE] `DEAD`LEAD`LEND`LIND`LINE`LIVE ladder[`TEARS;`SMILE] `TEARS`SEARS`SPARS`SPARE`SPIRE`SPILE`SMILE ladder[`GREEN;`BROWN] `GREEN`GREES`BREES`BREWS`BROWS`BROWN ladder[`SLEEP;`DREAM] `SLEEP`BLEEP`BLEED`BREED`DREED`DREAD`DREAM ladder[`ELM;`OAK] `ELM`ELF`EFF`OFF`OAF`OAK ladder[`ONE;`TWO] `ONE`ONO`OHO`THO`TWO ladder[`BLACK;`WHITE] `BLACK`CLACK`CLICK`CHICK`CHINK`CHINE`WHINE`WHITE ladder[`BREAD;`TOAST] `BREAD`BREAK`BLEAK`BLEAT`BLEST`BLAST`BOAST`TOAST ladder[`FLUTE;`CELLO] `FLUTE`FLITE`FLITS`FLATS`FEATS`FELTS`CELTS`CELLS`CELLO ladder[`LINEN;`SHEET] `LINEN`LIKEN`LIKER`SIKER`SAKER`SAYER`SHYER`SHEER`SHEET