diff --git a/prospect-gl/examples/basic.rkt b/prospect-gl/examples/basic.rkt
index 1930590..c5ea99b 100644
--- a/prospect-gl/examples/basic.rkt
+++ b/prospect-gl/examples/basic.rkt
@@ -41,6 +41,18 @@
                  (void)
                  (update-sprites (simple-sprite 0 50 50 50 50 (circle 50 "solid" "orange"))
                                  (simple-sprite -1 60 60 50 50 (circle 50 "solid" "green"))))
+          (spawn (lambda (e s)
+                   (match e
+                     [(message (at-meta (frame-event counter elapsed-ms)))
+                      (and (> elapsed-ms 0)
+                           (let ((i (text (format "~a fps" (/ counter (/ elapsed-ms 1000.0))) 22 "black")))
+                             (transition s (update-sprites (simple-sprite -10 300 10
+                                                                          (image-width i)
+                                                                          (image-height i)
+                                                                          i)))))]
+                     [_ #f]))
+                 (void)
+                 (sub (frame-event ? ?) #:meta-level 1))
           (spawn (lambda (e s)
                    (match e
                      [(message _)