# code: http://golf.shinh.org/reveal.rb?permission+list/tails_1642073816&nbb
# target Nibbles version: 0.21
# commenter version: 0.1.2.181

! #(zip with):[[chr]] 
    . #(map):[[chr]] 
        `* #(nary cartesian product):[[int]] 
            ^ #(replicate):[[int]] 
                4 #(integer):int 
                : #(append):[[int]] 
                    `, #(range from 0):[int] 
                        8 #(integer):int 
                    ~ #(auto = []):auto 
        : #(append):[chr] <--arg( A:[int] ) 
            $ #(= A):[int] 
            " is -" #(string):[chr] 
    `* #(nary cartesian product):[[chr]] <--arg( B:[chr] ) 
        ^ #(replicate):[[chr]] 
            3 #(integer):int 
            `* #(nary cartesian product):[[chr]] 
                "-""rwx" #(string list):[[chr]] 
    : #(zipop: cons):null