     :learning-window 30000}
    {:id :saf-bored :name "bored" :layer :safety
     :valence -0.1 :arousal -0.4
-    :desire 0.0 :decay-rate 0.02 :max-delta 0.3
+    :desire 0.0 :decay-rate 0.01 :max-delta 0.3
     :learning-window (* 5 60 1000)}
    {:id :saf-delight :name "delight" :layer :safety
     :valence 0.7 :arousal 0.7


(defn anger-reaction-percept
  [done-signal]
  {:name "Got angry" :satisfaction-vector
   {:phys-anger -0.5
    :saf-bored -0.3}})

(defn anger-management
  [robot percept-chan]

    :other-agents #{:steve_ballmer}
    :satisfaction-vector {:phys-anger 0.1
                          :phys-hunger 0.0
                          :phys-fear 0.8
                          :saf-bored -0.5
                          :saf-delight 0.0
                          :saf-playful -0.1
                          :soc-lonely -0.1}}
