Words from neighbour ones: Difference between revisions

J
(Added Arturo implementation)
(J)
Line 789:
24: transpose
</pre>
 
=={{header|J}}==
<lang J> >(([-.-.)9 <@((=i.9)&(#&,))\ 9&{.@>@(#~ 8<#@>)) cutLF fread 'unixdict.txt'
applicate
architect
astronomy
christine
christoph
committee
composite
constrict
construct
different
extensive
greenwood
implement
improvise
intercept
interpret
interrupt
philosoph
prescript
receptive
telephone
transcend
transport
transpose</lang>
 
=={{header|Java}}==
6,962

edits