( "EG\x17\xf9\xb0S\x88>a\xde\x03\xe7\x1d>\xff\xfe\x96\xe7mS\xd3y\xbfc\x22\x86\x83\xaa,\x89W\xbcg\xa2\xb5\xed\xea\xf2\x82*\xf5=\x16c-\xae\xb9\xb2" )
256
base #(list to num)
29
base #(num to list)
lines
    ( "';! " )
    lowercase-alphabet
    catenate #(list+list)
    select
m4
left-uncons
73
left-cons
itemize
swap
cartesian-product
    show-comma
    show-line
m2
extract-array
tuck
tuck