# code: http://golf.shinh.org/reveal.rb?stable+partition/darrenks_1640230125&nbb
# target Nibbles version: 0.2
# commenter version: 0.1.2.181

+ #(concat):[chr] 
    =~ #(group all by):[[chr]] 
        fstLine #(@):[chr] 
        \A 
        `$ #(signum):int 
            - #(subtract):int 
                A #($):chr 
                / #(foldr1):chr 
                    fstLine #(_):[chr] 
                    #\C B 
                    #(implicit arg = C):chr