diff --git a/lisp/core-context.lisp b/lisp/core-context.lisp
index 57dda31..1419b83 100644
--- a/lisp/core-context.lisp
+++ b/lisp/core-context.lisp
@@ -74,7 +74,7 @@ or nil if the heading is not found."
          (obj-vector (memory-object-vector obj))
          (threshold (or semantic-threshold (ignore-errors (read-from-string (uiop:getenv "CONTEXT_SEMANTIC_THRESHOLD"))) 0.75))
          (similarity (if (and foveal-vector obj-vector (not is-foveal))
-                         (cosine-similarity foveal-vector obj-vector)
+                          (vector-cosine-similarity foveal-vector obj-vector)
                          0.0))
          (is-semantically-relevant (>= similarity threshold))
          (should-render (or (<= depth 2) is-foveal is-semantically-relevant))
diff --git a/org/core-context.org b/org/core-context.org
index 3d8cbf0..29ad31d 100644
--- a/org/core-context.org
+++ b/org/core-context.org
@@ -168,7 +168,7 @@ This function is the heart of the context assembly. Its performance directly aff
          (obj-vector (memory-object-vector obj))
          (threshold (or semantic-threshold (ignore-errors (read-from-string (uiop:getenv "CONTEXT_SEMANTIC_THRESHOLD"))) 0.75))
          (similarity (if (and foveal-vector obj-vector (not is-foveal))
-                         (cosine-similarity foveal-vector obj-vector)
+                          (vector-cosine-similarity foveal-vector obj-vector)
                          0.0))
          (is-semantically-relevant (>= similarity threshold))
          (should-render (or (<= depth 2) is-foveal is-semantically-relevant))