<pre>line-mode
words
2
step
&quot;/&quot;
over
reverse
cartesian-product
catenate #(list+list)
    &quot;&lt;&quot;
    swap
    &quot;&gt;&quot;
m3
</pre>