# code: http://golf.shinh.org/reveal.rb?Major+Scales/tails+%280.25+string+test%29_1646444822&nbb
# target Nibbles version: 0.25
# commenter version: 0.1.2.181

| #(filter):[[chr]] 
    % #(split (remove empties)):[[chr]] 
        "\nA B C\xe2\x99\xaf D E F\xe2\x99\xaf G\xe2\x99\xaf\nA\xe2\x99\xad B\xe2\x99\xad C D\xe2\x99\xad E\xe2\x99\xad F G\nA\xe2\x99\xaf B\xe2\x99\xaf C\xf0\x9d\x84\xaa D\xe2\x99\xaf E\xe2\x99\xaf F\xf0\x9d\x84\xaa G\xf0\x9d\x84\xaa\nB C\xe2\x99\xaf D\xe2\x99\xaf E F\xe2\x99\xaf G\xe2\x99\xaf A\xe2\x99\xaf\nB\xe2\x99\xad C D E\xe2\x99\xad F G A\nB\xe2\x99\xaf C\xf0\x9d\x84\xaa D\xf0\x9d\x84\xaa E\xe2\x99\xaf F\xf0\x9d\x84\xaa G\xf0\x9d\x84\xaa A\xf0\x9d\x84\xaa\nC D E F G A B\nC\xe2\x99\xad D\xe2\x99\xad E\xe2\x99\xad F\xe2\x99\xad G\xe2\x99\xad A\xe2\x99\xad B\xe2\x99\xad\nC\xe2\x99\xaf D\xe2\x99\xaf E\xe2\x99\xaf F\xe2\x99\xaf G\xe2\x99\xaf A\xe2\x99\xaf B\xe2\x99\xaf\nD E F\xe2\x99\xaf G A B C\xe2\x99\xaf\nD\xe2\x99\xad E\xe2\x99\xad F G\xe2\x99\xad A\xe2\x99\xad B\xe2\x99\xad C\nD\xe2\x99\xaf E\xe2\x99\xaf F\xf0\x9d\x84\xaa G\xe2\x99\xaf A\xe2\x99\xaf B\xe2\x99\xaf C\xf0\x9d\x84\xaa\nE F\xe2\x99\xaf G\xe2\x99\xaf A B C\xe2\x99\xaf D\xe2\x99\xaf\nE\xe2\x99\xad F G A\xe2\x99\xad B\xe2\x99\xad C D\nE\xe2\x99\xaf F\xf0\x9d\x84\xaa G\xf0\x9d\x84\xaa A\xe2\x99\xaf B\xe2\x99\xaf C\xf0\x9d\x84\xaa D\xf0\x9d\x84\xaa\nF G A B\xe2\x99\xad C D E\nF\xe2\x99\xad G\xe2\x99\xad A\xe2\x99\xad B\xf0\x9d\x84\xab C\xe2\x99\xad D\xe2\x99\xad E\xe2\x99\xad\nF\xe2\x99\xaf G\xe2\x99\xaf A\xe2\x99\xaf B C\xe2\x99\xaf D\xe2\x99\xaf E\xe2\x99\xaf\nG A B C D E F\xe2\x99\xaf\nG\xe2\x99\xad A\xe2\x99\xad B\xe2\x99\xad C\xe2\x99\xad D\xe2\x99\xad E\xe2\x99\xad F\nG\xe2\x99\xaf A\xe2\x99\xaf B\xe2\x99\xaf C\xe2\x99\xaf D\xe2\x99\xaf E\xe2\x99\xaf F\xf0\x9d\x84\xaa\n" #(string):[chr] 
        "\n" #(string):[chr] 
    == #(equal?):int <--arg( A:[chr] ) 
        / #(foldr1):[chr] 
            % #(split (remove empties)):[[chr]] 
                $ #(= A):[chr] 
                ~ #(auto = words):auto 
            $ #(= C):[chr] <--arg( C:[chr] B:[chr] ) 
        ;$ #(= fstLine):[chr] <--arg( D:[chr] )