This game is kind of fun:

           (10x #. '0' -&(a.&i.) }.) {. 8!:2 ] _9223372036854775808
        9223372036854775808
           
           fNr =: [: {. 8!:2               NB.  Format number
           sb0 =: 10x #. '0' -&(a.&i.) ]   NB.  Subtract '0'
        
           (,&.": sb0)&>/@split fNr  _9223372036854775808  NB.  Loss of
fidelity, too bad
        _9223372036854775807
           
           (".@, 'x' ,~ ":@sb0)&>/@split fNr  _9223372036854775808
        _9223372036854775808
           
-Dan

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to