Domanda sull'agente Clojure - Utilizzo di Send -Off

Question

Ho un paio di domande sul seguente codice:

(import 
 '(java.awt Color Graphics Dimension)
 '(java.awt.image BufferedImage)
 '(javax.swing JPanel JFrame))

(def width 900)
(def height 600) 

(defn render
 [g]
 (let [img (new BufferedImage width height 
                 (. BufferedImage TYPE_INT_ARGB))
       bg (. img (getGraphics))]
   (doto bg
      (.setColor (. Color white))
      (.fillRect 0 0 (. img (getWidth)) (. img (getHeight)))
      (.setColor (. Color red))
      (.drawOval 200 200 (rand-int 100) (rand-int 50)))
   (. g (drawImage img 0 0 nil))
   (. bg (dispose))
   ))

(def panel (doto (proxy [JPanel] []
                        (paint [g] (render g)))
             (.setPreferredSize (new Dimension 
                                     width 
                                     height))))

(def frame (doto (new JFrame) (.add panel) .pack .show))

(def animator (agent nil))


(defn animation 
  [x]
  (send-off *agent* #'animation)
  (. panel (repaint))
  (. Thread (sleep 100)))

(send-off animator animation)

1. Nella funzione di animazione - perché è #' Usato prima dell'animazione nell'invio?
2. Perché lo fa send-off All'inizio della funzione di animazione funziona? Non dovrebbe semplicemente andare più all'inizio della funzione di animazione e non eseguire mai i metodi di ridipingimento e sonno?

3. C'è uno svantaggio, rispetto all'originale, nello scrivere la funzione di animazione come:

   (defn animation 
     [x]
     (. panel (repaint))
     (. Thread (sleep 100))
     (send-off *agent* animation))