# code: http://golf.shinh.org/reveal.rb?Old+Magician/tails_1642263306&nbb
# target Nibbles version: 0.21
# commenter version: 0.1.2.181

! #(zip with):[[chr],[chr]] 
    , #(range from 1):[int] 
        ~ #(auto = infinity):auto 
    \A 
    >> #(tail):[[int]] 
        intMatrix #(;;@):[[int]] 
    ~ #(zipop: by):null 
    \C B 
    ~ #(tuple):[chr],[chr] 
        : #(append):[chr] 
            : #(append):[chr] 
                "Case #" #(string):[chr] 
                C #($):int 
            ":" #(string):[chr] 
        = #(subscript (wrapped)):[chr] 
            / #(foldr1):int 
                B #(@):[int] 
                \E D 
                D #(@):int 
            "BLACK""WHITE" #(string list):[[chr]]