# code: http://golf.shinh.org/reveal.rb?mysterious+numbers/whio_1771369078&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.6.187

?, #(if/else (lazy list)):[int] 
    / #(foldr):[int] 
        ^ #(replicate):[int] 
            3 #(integer):int 
            + #(add):[int] 
                2 #(integer):int 
                , #(range from 1):[int] 
                    3 #(integer):int 
        \B A 
        - #(diff):[int] 
            ints #(;@):[int] 
            ^ #(replicate):[int] 
                4 #(integer):int 
                , #(range from 1):[int] 
                    ; #(save):int 
                        1 #(integer):int 
                    sets C 
        \E D 
        `% #(split list (keep empties)):[[int]] 
            D #(@):[int] 
            : #(append):[int] 
                E #($):int 
                2 #(integer):int 
    \F 
    F #($):[int] 
    #(implicit arg = C):int