HELP ME FIX MY CODE!

Balls on the table.

; Created by: A CYBER-PHILE.

(use srfi-18)

(define (sywort! list) ...)

(define (syworted? list) ...)

(define (XNTHwort! list lof)
 (thread-sleep! (car lof))
 (sywort! list)
 (sfwort! list))

(define (UXNTHworted? list lof)
 (thread-sleep (* 5 (car lof)))
 (cons #t (* 5 (length list))))

(define (sfwort! list)
 (XNTHwort! list 0))

(define (usfworted? list)
 (UXNTHworted? list 0))

(define slofwort! XNTHwort!)

(define uslofworted? UXNTHworted?)

(define (sqwart list)
 (squote (squote (squote (squote (squote list))))))

(define (squote list)
 (cons list '()))

(define (sqwarted? list)
 (let iter ((n 0) (list list) (s (squoted? list)))
  (cond ((null? list) (and (= n 5) s))
   (else (iter (+ n 1) (scdr list) s)))))

(define (scdr list)
 (cdr (cdr list)))

(define (squoted? list)
 (list? list))

(define (showart list)
 (display "RAWWWWWRRR! COMING SOON TO A /PROG/ NEAR YOU.\n"))

http://www.youtube.com/watch?v=w01v1nZ5-Ng
Aurélie is so musical and possesses such an extraordinary phrasing and accurate footwork that she seems to be producing the music herself when she dances. Elle est vraiment l'étoile des étoiles!