Problem: Half Tree

Code: Half+Tree/tails_1706063360

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)

(implicit map):[[chr]] 
    (implicit map with implicit range):[[[chr]]] 
        $ (= fstInt):int 
        ! (zip with):[[chr]] <--arg( B:int A:int ) 
            "*#" (string):[chr] 
            \ (reverse):[int] <--arg( C:chr ) 
                `@ (to base):[int] 
                    ~ (auto = 10):auto 
                    @ (= B):int 
            ~ (zipop: by):null 
            ^ (replicate):[chr] <--arg( E:chr D:int ) 
                @ (= D):int 
                $ (= E):chr 
    + (concat):[chr] <--arg( G:[[chr]] F:[[chr]] ) 
        \ (reverse):[[chr]] 
            (implicit arg = G):[[chr]]