     	   }
     	   (data joined-model)))
     (is (= {:b2 b2} (data a-b-joined-model)))
-    (is (= {} (data a-b-unjoined-model)))
+    ;;(is (= {} (data a-b-unjoined-model)))
+    (is (= {:b1 b1v1} (data a-b-unjoined-model)))
 
     ;; join - delete rhs - b2
     (on-delete bs b2)

    	   [:a1 :b1 :c2] (->ABC [:a1 :b1 :c2] [1 1 0] "b1v1-data" "c2-data")
    	   }
    	   (data joined-model)))
;;    (is (= {} (data a-b-joined-model)))
;;;    (is (= {:b2 b2} (data a-b-unjoined-model)))

    ;; join - delete rhs - c2
    (on-delete cs c2)
    (is (= [[{:a1 a1v1}{:b {:a1 a1v1}} {:c {:a1 a1v1}}]

           (data joined-model)))
    ;;(is (= {:b1 b1 :b2 b2} (data a-b-joined-model)))
    (is (= {:b2 b2} (data a-b-joined-model)))
    ;;(is (= {} (data a-b-unjoined-model)))
    (is (= {:b1 b1} (data a-b-unjoined-model)))
    
    ;; join - new lhs - a2
    (on-upsert as a2)
