Problem: euro denominations

Code: euro+denominations/tails_1644976567

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)

* (join):[chr] 
    "+" (string):[chr] 
    ! (zip with):[int] 
        ; (save):[int] -->let( E:[int] ) 
            .~~ (append until null):[int] 
                $ (= fstInt):int 
                < (take):[int] <--arg( A:int ) 
                    1 (integer):int 
                    | (filter):[int] 
                        + (concat):[int] 
                            . (map):[[int]] 
                                \ (reverse):[int] 
                                    `, (range from 0):[int] 
                                        5 (integer):int 
                                . (map):[int] <--arg( B:int ) 
                                    , (range from 1):[int] 
                                        3 (integer):int 
                                    - (subtract):int <--arg( C:int ) 
                                        * (multiply):int 
                                            _ (= A):int 
                                            $ (= C):int 
                                        * (multiply):int 
                                            / (divide):int 
                                                5 (integer):int 
                                                $ (= C):int 
                                            ^ (pow):int 
                                                ~ (auto = 10):auto 
                                                @ (= B):int 
                        + (add):int <--arg( D:int ) 
                            $ (= D):int 
                            ~ (auto = 1):auto 
        >> (tail):[int] <--arg( F:int ) 
            @ (= E):[int] 
        - (zipop: sub):null