Well... I haven't figured out how to properly make my lines long enough, but:

   ascii85i=: (33 + (5#85)#: 256 #. _4 ]\ ])&.(a.&i.)
   ascii85i'ab'
!!$G:
   <]&.ascii85i 'ab'
+--+
|ab|
+--+
   (-: ]&.ascii85i) a.
1

   |.&.ascii85i 'What use is this?'
?this is  useWhat

And, sadly:
   ascii85i^_1: _15 ,/\ ascii85i 'What use is this?'
!!!$"

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

Reply via email to