Problem: digit square

Code: digit+square/whio_1751052094

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) 
    $ (= fstInt) 
    > (drop) <--arg( B A ) 
        $ (= B) 
        : (append) 
            ^ (replicate) 
                _ (= fstInt) 
                "1" (string) 
            , (range from 1) 
                (implicit arg = B)