# code: http://golf.shinh.org/reveal.rb?uppercase+the+17th+letter/tails_1684721981&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

#(implicit map):[chr] 
    `\ #(special scans):[[chr]] 
        @ #(= fstLine):[chr] 
        : #(foldop: cons):null 
    ? #(if/else):chr <--arg( B:[chr] A:[chr] ) 
        == #(equal?):int 
            , #(length):int 
                | #(filter):[chr] 
                    `) #(swapped uncons):[chr] -->let( C:chr ) 
                        \ #(reverse):[chr] 
                            $ #(= B):[chr] 
                    $ #(= D):chr <--arg( D:chr ) 
            16 #(integer):int <--arg( E:int ) 
        `) #(to uppercase):chr <--arg( F:int ) 
            @ #(= C):chr 
        #(implicit arg = C):chr