Problem: chemical equation

Code: chemical+equation/darrenks_1640289938

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)

: (append):[[chr]] 
    : (append):[chr] 
        : (append):[chr] 
            : (append):[chr] 
                : (append):[chr] 
                    : (append):[chr] 
                        "2" (string):[chr] 
                        `( (uncons):[chr] -->let( A:[[chr]] ) 
                            % (split (remove empties)):[[chr]] 
                                @ (= fstLine):[chr] 
                                ~ (auto = words):auto 
                    "+" (string):[chr] 
                ^ (replicate):[chr] 
                    / (divide):int 
                        , (length):int 
                            _ (= fstLine):[chr] 
                        6 (integer):int 
                    "5" (string):[chr] 
            + (concat):[chr] 
                $ (= A):[[chr]] 
        "->" (string):[chr] 
    * (join):[[chr]] 
        "+" (string):[chr] 
        . (map):[[chr],int] 
            + (concat):[chr] 
                ;_ (= allLines):[[chr]] 
            ~ (tuple):[chr],int <--arg( B:chr ) 
                : (append):[chr] 
                    `# (hashmod):int 
                        $ (= B):chr 
                        5 (hashmod arg):null 
                    $ (= B):chr 
                -8 (integer):int 
(postdata (hex): hashmod)
0