# code: http://golf.shinh.org/reveal.rb?81+digit+number/kaki_1702390172&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

+ #(concat):[chr] 
    * #(join):[[chr]] 
        ;_ #(= allInput):[chr] 
        . #(map):[[int]] 
            , #(range from 1):[int] 
                ; #(save):int -->let( A:int ) 
                    18 #(integer):int 
            , #(range from 1):[int] <--arg( B:int ) 
                [ #(min):int 
                    $ #(= B):int 
                    - #(subtract):int 
                        @ #(= A):int 
                        $ #(= B):int