Problem: convert decimal to balanced ternary

Code: convert+decimal+to+balanced+ternary/whio_1746711492

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)

> (drop) 
    - (subtract) 
        / (foldr1) 
            `? (find indices [by]) 
                ; (save) -->let( A ) 
                    + (add) 
                        '/' (char) 
                        `@ (to base) 
                            3 (integer) 
                            + (add) 
                                88573 (integer) 
                                $ (= fstInt) 
                % (modulus) <--arg( B ) 
                    $ (= B) 
                    ~ (auto = 2) 
            $ (= D) <--arg( D C ) 
        ~ (auto = 1) 
    (implicit arg = A)