 		    :price 1.31133	  
 		    :type :sell-stop		 
 		    :lots 0.1}))))
- 
+  
 (def- value-to-order-type
   {0 :buy 1 :sell 2 :buy-limit
    3 :sell-limit 4 :buy-stop


(defn open? [order]
  (= (order-close-time order) 0))

(defn order-type
  "type of order, even if it is already closed"
  [o]

(defmethod close! :entry [{id :id :as order}] 
  (core/order-delete id)
  order)
 
(defmethod close! :market
  ([o] (oclose o 0))
  ([{:keys [price lots slip id] :as order} new-lots]
