diff --git a/word.rkt b/word.rkt
index 136eeee..f094705 100644
--- a/word.rkt
+++ b/word.rkt
@@ -28,24 +28,6 @@
    (define (word-output w) #f)
    (define (word-return w) w)])
 
-(module+ generics
-  (provide
-   (contract-out
-    [word-fps
-     (-> word? flonum?)]
-    [word-label
-     (-> word? flonum? string?)]
-    [word-evt
-     (-> word? evt?)]
-    [word-event
-     (-> word? any/c word?)]
-    [word-tick
-     (-> word? word?)]
-    [word-output
-     (-> word? any/c)]
-    [word-return
-     (-> word? any/c)])))
-
 (define (default b f d) (if b (f b) d))
 (struct *word (fps label evt event tick output return)
   #:methods gen:word
@@ -193,6 +175,20 @@
  (contract-out
   [word?
    (-> any/c word?)]
+  [word-fps
+   (-> word? flonum?)]
+  [word-label
+   (-> word? flonum? string?)]
+  [word-evt
+   (-> word? evt?)]
+  [word-event
+   (-> word? any/c word?)]
+  [word-tick
+   (-> word? word?)]
+  [word-output
+   (-> word? any/c)]
+  [word-return
+   (-> word? any/c)]
   [word (->* () ((or/c #f word?)
                  #:fps real?
                  #:label (or/c string? (-> real? string?))