diff --git a/jets/f/ut_play.c b/jets/f/ut_play.c
index 8f982c28b..9a300edf4 100644
--- a/jets/f/ut_play.c
+++ b/jets/f/ut_play.c
@@ -358,7 +358,7 @@
         return pro;
       }
 
-      case c3__ktpm: p_gen = u3t(gen);
+      case c3__ktpd: p_gen = u3t(gen);
       _play_used();
       {
         u3_noun boc = _play_x(van, sut, p_gen);