diff --git a/collects/tests/stepper/universe-test.rkt b/collects/tests/stepper/universe-test.rkt
new file mode 100644
index 0000000000..a03203778c
--- /dev/null
+++ b/collects/tests/stepper/universe-test.rkt
@@ -0,0 +1,11 @@
+;; The first three lines of this file were inserted by DrRacket. They record metadata
+;; about the language level of this file in a form that our tools can easily process.
+#reader(lib "htdp-intermediate-reader.ss" "lang")((modname universe-test) (read-case-sensitive #t) (teachpacks ((lib "universe.ss" "teachpack" "2htdp") (lib "image.ss" "teachpack" "2htdp"))) (htdp-settings #(#t constructor repeating-decimal #f #t none #f ((lib "universe.ss" "teachpack" "2htdp") (lib "image.ss" "teachpack" "2htdp")))))
+(define (zug state)
+  (overlay
+   (rectangle 100 state "solid" "blue")
+   (rectangle 100 200 "solid" "red")))
+
+(big-bang 14
+          (on-tick add1)
+          (to-draw zug))
\ No newline at end of file