From: Doug Coleman <doug.coleman@gmail.com>
Date: Thu, 18 Aug 2022 23:57:43 +0000 (-0500)
Subject: math.statistics: fix typo
X-Git-Tag: 0.99~1123
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=07d2b0364b3301eab16a1ccfb050f5b3edddbd91

math.statistics: fix typo
---

diff --git a/basis/math/statistics/statistics.factor b/basis/math/statistics/statistics.factor
index e9a61a9628..ab5e10a6e6 100644
--- a/basis/math/statistics/statistics.factor
+++ b/basis/math/statistics/statistics.factor
@@ -124,7 +124,7 @@ PRIVATE>
     k seq nth-unsafe ; inline
 
 : (kth-object) ( seq k nth-quot exchange-quot quot: ( x y -- ? ) -- elt )
-    ! The algorithm modifiers seq, so we clone it
+    ! The algorithm modifies seq, so we clone it
     [ >array ] 4dip kth-object-impl ; inline
 
 : kth-object-unsafe ( seq k quot: ( x y -- ? ) -- elt )