Problem: pascal to the moon

Code: pascal+to+the+moon/tails_1677636450

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):[[int]] 
    `\ (special scans):[int] 
        . (map):[int] 
            `, (range from 0):[int] 
                10 (integer):int 
            / (divide):int <--arg( A:int ) 
                ^ (pow):int 
                    ; (save):int -->let( B:int ) 
                        ^ (pow):int 
                            ~ (auto = 10):auto 
                            @ (= fstInt):int 
                    ^ (pow):int 
                        2 (integer):int 
                        @ (= A):int 
                - (subtract):int 
                    $ (= B):int 
                    ~ (auto = 1):auto 
        * (foldop: mult):null 
    `@ (to base):[int] <--arg( D:int C:int ) 
        _ (= B):int 
        (implicit arg = D):int