diff --git a/src/gensql/inference/gpm/crosscat.cljc b/src/gensql/inference/gpm/crosscat.cljc
index 69dd426..a6e5dd3 100644
--- a/src/gensql/inference/gpm/crosscat.cljc
+++ b/src/gensql/inference/gpm/crosscat.cljc
@@ -85,8 +85,8 @@
         ;; If the targets and constraints are not equal but the overlapping parts are,
         ;; just remove the overlapping keys and recur the scores. 
         (every? (fn [shared-key]
-                  (= (shared-key targets)
-                     (shared-key constraints)))
+                  (= (get targets shared-key)
+                     (get constraints shared-key)))
                 intersection)
         (reduce-kv (fn [logp _ view]
                      ;; Filtering view variables happens naturally.