diff --git a/collects/rnrs/arithmetic/flonums-6.ss b/collects/rnrs/arithmetic/flonums-6.ss
index cad637ce10..6024a80c08 100644
--- a/collects/rnrs/arithmetic/flonums-6.ss
+++ b/collects/rnrs/arithmetic/flonums-6.ss
@@ -40,7 +40,7 @@
 (define-fl nan? flnan? (a) nocheck)
 
 (define-fl max flmax (a b ...) nocheck)
-(define-fl max flmin (a b ...) nocheck)
+(define-fl min flmin (a b ...) nocheck)
 
 (define-fl + fl+ (a b ...) nocheck)
 (define-fl * fl* (a b ...) nocheck)