         connectors-clause   (str/join " or " connectors-clauses)
         cimi-filter         (cimi-and policy connectors-clause)
         cimi-filter         (cimi-and cimi-filter (clause-cpu-ram-disk component))]
-    (log/debug "the cimi-filter = " cimi-filter)
+    (log/debug "cimi-filter = " cimi-filter)
     cimi-filter))
 
 (defn- service-offers-by-component-policy


(defn- display-service-offer
  [service-offer]
  (str "ServiceOffer "
       (get-in service-offer [:connector :href]) "/"
       (instance-type service-offer)))

(defn smallest-service-offer


(defn- place-rank-component
  [user-connectors component]
  (log/info "Placing and ranking component " component)
  (log/info "user-connectors = " user-connectors)
  (let [filtered-service-offers (service-offers-by-component-policy user-connectors component)]
    (log/info "filtered-service-offers = " (map display-service-offer filtered-service-offers))
    (price-component user-connectors filtered-service-offers component)))

(defn place-and-rank
  [request]
  (let [components (:components request)
        user-connectors (:user-connectors request)]
    {:components (map (partial place-rank-component user-connectors) components)}))
