diff --git a/proxy.rkt b/proxy.rkt
index fcccc62..790e1d2 100644
--- a/proxy.rkt
+++ b/proxy.rkt
@@ -189,6 +189,14 @@
 	      (newline))
 	    #:mode 'text
 	    #:exists 'append)
+	  (with-output-to-file "zone-proxy.debug"
+	    (lambda ()
+	      (display "----------------------------------------------------------------------\n")
+	      (display (seconds->date (current-seconds)))
+	      (newline)
+	      (pretty-write current-ground-transition))
+	    #:mode 'text
+	    #:exists 'append)
 	  zone]
 	 [(? question? q)
 	  (transition zone