# code: http://golf.shinh.org/reveal.rb?Advent+of+Code+Not+Quite+Lisp/tails_1710226024&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

? #(index):int 
    `\ #(special scans):[int] 
        . #(map):[int] 
            @ #(= fstLine):[chr] 
            - #(subtract):int <--arg( A:chr ) 
                * #(multiply):int 
                    % #(modulus):int 
                        $ #(= A):chr 
                        ~ #(auto = 2):auto 
                    ~ #(auto = 2):auto 
                ~ #(auto = 1):auto 
        + #(foldop: add):null 
    1 #(integer):int