Re: a golden oldie challenge: Eliza

William James <w_a_x_man@[EMAIL PROTECTED]
> writes:

> This does so little that it should be no more than 2 lines.
> In Ruby:
>
> S =
>   [ /father|mother|brother|sister/i, "Tell me about your 0."],
>   [ /\b(am|i'm) (.*)/i, ["Why are you 2?","Have you always been 2?"]],
>   [ /\bI was (.*)/i, ["Why were you 1?","I can't believe you were

[...]

He, Ruby is so verbose, both K an Q beat it to death when it comes to
brevity. Witness the power, a sudoku solver in K:

f:{$[&/x;,x;,/f'@[EMAIL PROTECTED]
'&27=x[,/p i:x?0]?!10]}

Not that I understand what this eyesore means, but according to this
blog it is supposed to be a sudoku solver:

http://www.wagerlabs.com/blog/2008/02/shortest-sudoku.html

Time to abandon Ruby and move to K?

-- 
Dimitre Liotev
(format t "~{~a~}" (reverse '("et" "n" "in." "a" "zn" "@[EMAIL PROTECTED]
" "l" "d")))