( "IAEOUYMH" )
uppercase-alphabet
cartesian-product
@1
@0
cartesian-product
swap
or
( "\xcc\x00f\xc3\xc8\x19cg*\x8c0`p\x880\x00\x03\xd0\x91 \x80\xe0\xa7x\xfe\xd0\xc0\x10\x00\xf2\x10`\x030\x00\xf4\xe7" )
256
base #(list to num)
binary #(num to list)
compress
sort #(list)
pairwise
m:
    dump
    over
    head
    index
    space
    new-line
    or
    get