diff --git a/collects/typed-scheme/private/base-env-numeric.rkt b/collects/typed-scheme/private/base-env-numeric.rkt
index 045282ef..111e2484 100644
--- a/collects/typed-scheme/private/base-env-numeric.rkt
+++ b/collects/typed-scheme/private/base-env-numeric.rkt
@@ -259,7 +259,7 @@
                   (list (->* (list -Real -Flonum) -Real -Flonum))
                   (list (->* (list -InexactReal) -InexactReal -InexactReal))
                   (list (->* (list -Real) -Real -Real))
-                  (list (->* (list) (Un -Real -FloatComplex) -FloatComplex))
+                  (list (->* (list (Un -Real -FloatComplex)) (Un -Real -FloatComplex) -FloatComplex))
                   (list (->* (list -FloatComplex) N -FloatComplex))
                   (list (->* (list N -FloatComplex) N -FloatComplex))
                   (list (->* (list N) N N))))]