💬 Reply by screwtape

@ksaj

(ql:quickload :series)

(series::install :pkg :cl-user)

(defun lazy-hax0r-p (x)

(let* ((7s (scan-range :from 7 :by 7))

(7m (mask 7s))

(191s (scan-range :from 191 :by 191))

(191m (mask 191s))

(m (catenate 7m 191m)))

(collect-nth x m)))

LAZY-HAX0R-P

(series::install :pkg :cl-user :remove t)

(lazy-hax0r-p (* 2 1337))

I thought I was being cute but I'm actually lost by the fact that this works

💬 Replies

@screwtape lol damn... I'm at a loss for words right now.

Actually, this is how discoveries are made, so okay, I'm good with this monster you have unleashed. :ageblobcat:

[…]

@ksaj

Oh, I see, it doesn't work. I was treating catenate as though it had been #Mlist .

────

────