Hi Alex,
Ah. That's what I missed the sort direction of the second argument..
Thank you
Lindsay
On Tue, May 23, 2017 at 10:47 PM, Alexander Burger
wrote:
> Hi Lindsay,
>
> > My sample code ("ABRA..) is wrong. Sorry about that.
>
> Ah, I see. No problem.
>
>
> > :
Thanks Alex,
My sample code ("ABRA..) is wrong. Sorry about that.
I simplified too much from some other code I have written that has a lot
of unrelated stuff in it.
However, what about these examples? Similar to those of the documentation:
: (rank 'c '((a . a) (b . b) (d . d)) T) # ???
->
Hi Lindsay,
> : (nil (setq *BitsSA (sort (make (map link (chop "ABRAABRACADABRA"))
*BitsSA is a list of lists of characters:
: (more *BitsSA)
("A")
("A" "A" "B" "R" "A" "C" "A" "D" "A" "B" "R" "A")
("A" "B" "R" "A")
("A" "B" "R" "A" "A" "B" "R" "A" "C" "A" "D" "A" "B" "R"