Bob Therriault wrote:
> Thanks Ric,
>
> I guess that why the specs were written, huh?
>
> New version back up to 63 characters.
>
> (a.{~,(('.'e.t){32 10)(,"0)2#65 97+/i.26)&(50{.[}.~2+[i.0{])t=. 'k'
> l m n o p q r s t u v w x y z a b c d e f g h i j
> [...]
>
A straightforward patch of the tacit version mentioned before has
one char less:
a=:(1j1#])`(,.@])@.('.'e.[)25{.(a.{~,2#65 97+/i.26)(>:@i.}.[){.
#'((1j1#])`(,.@])@.(''.''e.[)25{.(a.{~,2#65 97+/i.26)(>:@i.}.[){.)'
62
a'B'
C D E F G H I J K L M N O P Q R S T U V W X Y Z A
etc...
--
View this message in context:
http://old.nabble.com/Re%3A-Print-Custom-Alphabet-tp34348221s24193p34348221.html
Sent from the J Programming mailing list archive at Nabble.com.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
