Problem: char pyramid

Code: char+pyramid/tails_1643275380

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 with implicit range):[[chr]] 
    ; (save):int -->let( A:int ) 
        , (length):int 
            @ (= fstLine):[chr] 
    & (justify):[chr] <--arg( C:int B:int ) 
        " " (string):[chr] 
        - (subtract):int 
            * (multiply):int 
                _ (= A):int 
                ~ (auto = 2):auto 
            ~ (auto = 1):auto 
        ~ (center):null 
        * (join):[chr] 
            " " (string):[chr] 
            `' (transpose):[[chr]] 
                > (drop):[chr] 
                    - (subtract):int 
                        _ (= A):int 
                        $ (= C):int 
                    ;@ (= fstLine):[chr]