# code: http://golf.shinh.org/reveal.rb?Electron+Configuration/tails_1708060697&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

. #(map):[[[chr]]] 
    =\ #(scanl):[int] 
        : #(append):[int] 
            0 #(integer):int 
            : #(append):[int] 
                . #(map):[int] 
                    , #(range from 1):[int] 
                        8 #(integer):int 
                    \A 
                    2 #(integer):int 
                + #(add):[int] 
                    4 #(integer):int 
                    \ #(reverse):[int] 
                        `D #(to base from data):[int] 
                            9 #(to base from data arg):null 
        \C B 
        1 #(integer):int 
        \E D 
        + #(add):int 
            * #(multiply):int 
                ^ #(pow):int 
                    - #(subtract):int 
                        2 #(integer):int 
                        fstInt #(_):int 
                    `% #(moddiv):int 
                        E #($):int 
                        ~ #(auto = 2):auto 
                    sets F 
                ^ #(pow):int 
                    fstInt #(;$):int 
                    F #($):int 
            D #(_):int 
    \G 
    + #(concat):[[chr]] 
        ! #(zip with):[[[chr]]] 
            , #(range from 1):[int] 
                ~ #(auto = infinity):auto 
            \H 
            \ #(reverse):[int] 
                `@ #(to base):[int] 
                    fstInt #(_):int 
                    G #(@):int 
            ~ #(zipop: by):null 
            \J I 
            . #(map):[[chr]] 
                ! #(zip with):[[chr]] 
                    "spdf" #(string):[chr] 
                    \K 
                    | #(filter):[int,int] 
                        =\ #(scanl):[int,int] 
                            , #(range from 1):[int] 
                                4 #(integer):int 
                            ~ #(tuple):int,int 
                                0 #(integer):int 
                                I #(_):int 
                            \N M L 
                            #(implicit tuple):int,int 
                                ; #(save):int 
                                    [ #(min):int 
                                        L #(_):int 
                                        - #(subtract):int 
                                            * #(multiply):int 
                                                4 #(integer):int 
                                                N #($):int 
                                            2 #(integer):int 
                                sets O 
                                - #(subtract):int 
                                    L #(;$):int 
                                    O #($):int 
                        \Q P 
                        Q #($):int 
                    : #(zipop: cons):null 
                \R 
                : #(append):[chr] 
                    J #(@):int 
                    R #($):[chr] 
#(postdata (hex): to base from data)
22f9073c5ada8a442182e91f60710e72e4baed685a15094bda95d433ec7ec504313502d