I wrote this obfuscated scheme program. It's beyond obfuscated actually, it's really just silly. Don't even try to figure out what it's doing, I promise it's not worth your time.
(require (lib "list.ss"))
(define (g n) (if (> n 11) '() (cons n (g (+ n 1)))))
(define (h n) (or (< n 4) (odd? n) (> (/ (log n) (log 3)) 2
(
Read more... )