    {:abilities [{:req (req (empty? (:hosted card))) :cost [:click 1]
                  :prompt "Choose a non-AI icebreaker to install on Dinosaurus"
                  :choices (req (filter #(and (has? % :subtype "Icebreaker")
-                                             (not (has? % :subtype "AI"))
-                                             (<= (:cost %) (:credit runner)))
+                                             (not (has? % :subtype "AI")))
                                        (:hand runner)))
                  :msg (msg "host " (:title target))
                  :effect (effect (gain :memory (:memoryunits target))

                    (move target :hand) (shuffle! :deck))
    :choices (req (filter #(has? % :subtype "Icebreaker") (:deck runner)))}

   "Spike"
   {:abilities [{:msg "break up to 3 barrier subroutines" :effect (effect (trash card {:cause :ability-cost}))}]}

   "Spinal Modem"
   {:effect (effect (gain :memory 1)) :leave-play (effect (lose :memory 1)) :recurring 2
    :events {:successful-trace {:req (req run) :effect (effect (damage :brain 1 {:card card}))}}}

                {:cost [:credit 1] :msg "add 2 strength" :effect (effect (pump card 2))}]}

   "Shiv"
   {:abilities [{:msg "break up to 3 sentry subroutines" :effect (effect (trash card {:cause :ability-cost}))}]
    :events (let [cloud {:req (req (has? target :subtype "Icebreaker"))
                         :effect (effect (update-breaker-strength card))}]
              {:runner-install cloud :trash cloud :card-moved cloud})
    :strength-bonus (req (count (filter #(has? % :subtype "Icebreaker") (all-installed state :runner))))}

   "Spike"
   {:abilities [{:msg "break up to 3 barrier subroutines" :effect (effect (trash card {:cause :ability-cost}))}]
    :events (let [cloud {:req (req (has? target :subtype "Icebreaker"))
                         :effect (effect (update-breaker-strength card))}]
              {:runner-install cloud :trash cloud :card-moved cloud})
    :strength-bonus (req (count (filter #(has? % :subtype "Icebreaker") (all-installed state :runner))))}

   "Study Guide"
   {:abilities [{:cost [:credit 1] :msg "break 1 code gate subroutine"}
