Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

gLAMOROUS! eXTRAORDINAIRE!

Name: TRUE TRUTH EXPERT !!TthtFzrtPXElUy7 2009-11-19 15:38

hELLO AND WELCOME TO TRUE TRUTH EXPERT INTERNET PERSONA AND EXTRAVAGANJA EXTRAORDINOIR POST OF TODAY.


(map 'string #'(lambda (x) (if (eq x (char-upcase x)) (char-downcase x) (char-upcase x))) (format nil "~@(~A~)" "gLAMOROUS! eXTRAORDINAIRE!"))

Name: Leah Culver !1LEahRIBg. 2009-11-19 16:45

Tripfags + Lisp thread

(define (atom? n)
  (not (or (null? n)
           (pair? n))))

(define (flatten l)
  (cond ((null? l) '())
        ((atom? l) (list l))
        (else
         (apply append (map flatten l)))))
Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List
All trademarks and copyrights on this site are owned by their respective parties. All comments and posts are the responsibility of their own posters.
- Tinychan + 2ch Mode -