# code: http://golf.shinh.org/reveal.rb?The+B+Programming+Language/tails_1644306412&nbb
# target Nibbles version: 0.23
# commenter version: 0.1.2.181

/ #(foldr1):[chr] 
    / #(foldr):[[chr]] 
        ; #(save):[[chr]] 
            % #(split (remove empties)):[[chr]] 
                fstLine #(@):[chr] 
                ~ #(auto = words):auto 
        sets A 
        \C B 
        A #(_):[[chr]] 
        \E D 
        ? #(if/else):[[chr]] 
            - #(subtract):int 
                3 #(integer):int 
                , #(length):int 
                    E #($):[chr] 
            \F 
            : #(append):[[chr]] 
                = #(subscript (wrapped)):[chr] 
                    * #(multiply):int 
                        , #(length):int 
                            / #(foldr1):[chr] 
                                D #(_):[[chr]] 
                                \H G 
                                H #($):[chr] 
                        ~ #(auto = 2):auto 
                    `< #(take also drop):[[chr]] 
                        5 #(integer):int 
                        D #(_):[[chr]] 
                    sets I 
                I #($):[[chr]] 
            : #(append):[[chr]] 
                E #(@):[chr] 
                D #(_):[[chr]] 
    #\K J 
    #(implicit arg = K):[chr]