Now there is something we could add to the OS. Call it M.
REBOL[]m
8 bytes!!!
--Ryan
Flight Attendant: "Surely you cant be serious."
Doctor: "I am serious, and please dont call me Shirly."
[EMAIL PROTECTED] wrote:
> I guess I forgot the ultra-ultra short version which doesn't handle spaces or
>strange chars:
> REBOL[]foreach c ask{}[l: index? find{%etinamsdrgukwohblzfcp�vx�q�yj�56%7�%%8%/
> %%%%94%%%%%�%3%%�2%10}c until[prin pick{-�}odd? l(l: l / 2)< 2]prin{ }]
>
> (152-153 bytes, may require deletion of the / at the end of first line on some
>systems)
>
> Or if we skip numbers:
> REBOL[]foreach c ask{}[l: index? find{%etinamsdrgukwohblzfcp�vx�q�yj}c until[
> prin pick{-�}odd? l(l: l / 2)< 2]prin{ }]
>
> (120-121 bytes)
>
> --
> /Johan R�nnblom, Team Amiga
