No, you could write them in J [1]. This is how you do quicksort in J: quicksort=: (($:@(<#[) , (=#[) , $:@(>#[)) ({~ [EMAIL PROTECTED])) ^: (1<#)
--Casey [1] http://en.wikipedia.org/wiki/J_programming_language On Thu, Apr 3, 2008 at 12:41 PM, Tim Shearer <[EMAIL PROTECTED]> wrote: > So now I have to compile my jokes? > > -t > > > On Thu, 3 Apr 2008, Ryan Ordway wrote: > > #include <stdio.h> > > main(t,_,a) > > char *a; > > { > > return!0<t?t<3?main(-79,-13,a+main(-87,1-_,main(-86,0,a+1)+a)): > > 1,t<_?main(t+1,_,a):3,main(-94,-27+t,a)&&t==2?_<13? > > main(2,_+1,"%s %d %d\n"):9:16:t<0?t<-72?main(_,t, > > "@n'+,#'/*{}w+/w#cdnr/+,{}r/*de}+,/*{*+,/w{%+,/w#q#n+,/#{l+,/n{n+,/+#n > > +,/#\ > > ;#q#n+,/+k#;*+,/'r :'d*'3,}{w+K w'K:'+}e#';dq#'l \ > > q#'+d'K#!/+k#;q#'r}eKK#}w'r}eKK{nl]'/#;#q#n'){)#}w'){){nl]'/+#n';d}rw' > > i;# \ > > ){nl]!/n{n#'; r{#w'r nc{nl]'/#{l,+'K {rw' iK{;[{nl]'/w#q#n'wk nw' \ > > iwk{KK{nl]!/w{%'l##w#' i; :{nl]'/*{q#'ld;r'}{nlwb!/*de}'c \ > > ;;{nl'-{}rw]'/+,}##'*}#nc,',#nw]'/+kd'+e}+;#'rdq#w! nr'/ ') }+} > > {rl#'{n' ')# \ > > }'+}##(!!/") > > :t<-50?_==*a?putchar(31[a]):main(-65,_,a+1):main((*a=='/')+t,_,a+1) > > :0<t?main(2,2,"%s"):*a=='/'||main(0,main(-61,*a, > > "!ek;dc [EMAIL PROTECTED]'(q)-[w]*%n+r3#l,{}:\nuwloca-O;m > > .vpbks,fxntdCeghiry"),a+1); > > } > > > > > > > > On Apr 3, 2008, at 8:54 AM, Jeremy Frumkin wrote: > > > > > ..- .-.. .-.. .. .----. -- --. --- .. -. --. - --- ... .- > > > -.-- .- > > > -... --- ..- - - .... .. ... - .... .-. . .- -.. .. ... > > > - .... .- - > > > -. --- -. . --- ..-. -.-- > > > --- ..- ... ..- ..-. ..-. . .-. ..-. .-. > > > --- -- .-. -- .. - .... . .-- .- -.-- .. -.. > > > --- .-- .... . -. > > > .. ..- ... . -- -.-- .--. .-. . ..-. . .-. .-. . -.. .. > > > -. .--. ..- > > > - -.. . ...- .. -.-. . .-.-.- .-.-.- .-.-.- > > > > > > -....- -....- .--- .- ..-. > > > > > > > > > On 4/3/08 6:51 AM, "Walter Lewis" <[EMAIL PROTECTED]> wrote: > > > > > > Sebastian Hammer wrote: > > > > > > > > > A true hacker has no need for these crude tools. He waits for > > > > > > cosmic > > > > > > radiation to pummel the magnetic patterns on his drive into a > > > > > > pleasing > > > > > > and functional sequence of bits. > > > > > > > > > > > Alas, having been doing this (along with my partners, the four > > > > Yorkshiremen) since the Stone Age ... > > > > > > > > We used to arrange pebbles in the middle of road into the relevant > > > > patterns (we *dreamed* of being able to afford the wire for an > > > > abacus). > > > > Passing carts would then help "crunch" the numbers. > > > > > > > > Walter > > > > for whom graph paper, templates, pencils, 80 column punchcards and > > > > IBM Assembler were formative experiences > > > > > > > > > > > > > > > > > =============================================== > > > Jeremy Frumkin > > > Head, Emerging Technologies and Services > > > 121 The Valley Library, Oregon State University > > > Corvallis OR 97331-4501 > > > > > > [EMAIL PROTECTED] > > > > > > 541.602.4905 > > > 541.737.3453 (Fax) > > > =============================================== > > > " Without ambition one starts nothing. Without work one finishes > > > nothing. " > > > - Emerson > > > > > > > > -- > > Ryan Ordway E-mail: [EMAIL PROTECTED] > > Unix Systems Administrator [EMAIL PROTECTED] > > OSU Libraries, Corvallis, OR 97331 Office: Valley Library #4657 > > >