core: Add the shuffler words but without primitives.

[factor.git] / extra / math / similarity / similarity.factor

diff --git a/extra/math/similarity/similarity.factor b/extra/math/similarity/similarity.factor
index a2c4a676e35c30ebbec9ddca79e9c5bec9a08736..52c5027ada3d64bc73397c5dcd8e7c1448906c57 100644 (file)
--- a/extra/math/similarity/similarity.factor
+++ b/extra/math/similarity/similarity.factor
@@ -27,4 +27,4 @@ PRIVATE>
 
 : weighted-cosine-similarity ( w a b -- n )
     [ weighted-v. ]
-    [ [ over ] dip [ weighted-norm ] 2bi@ * ] 3bi / ;
+    [ overd [ weighted-norm ] 2bi@ * ] 3bi / ;