    "Deep Thought"
    {:events {:successful-run {:effect (effect (add-prop card :counter 1)) :req (req (= target :rd))}
              :runner-turn-begins
-             {:req (req (>= (:counter card) 3)) :msg "look at the top card of R&D"
+             {:req (req (>= (get-virus-counters state side card) 3)) :msg "look at the top card of R&D"
               :effect (effect (prompt! card (str "The top card of your R&D is "
                                                  (:title (first (:deck corp)))) ["OK"] {}))}}}
 

                       :msg "gain 1 [Credits]" :effect (effect (gain :credit 1))}}}

   "Nerve Agent"
   {:events {:successful-run {:req (req (= target :hq))
                              :effect (effect (access-bonus (:counter card))
                                              (add-prop card :counter 1))}}}
   "Net Celebrity"
   {:recurring 1}


   {:effect (effect (gain :credit 8) (gain :runner :credit 3))}

   "Medium"
   {:events
    {:successful-run
     {:req (req (= target :rd))
      :effect (effect (add-prop card :counter 1)
                      (access-bonus (max 0 (dec (get-virus-counters state side (get-card state card))))))}}}

   "Melange Mining Corp."
   {:abilities [{:cost [:click 3] :effect (effect (gain :credit 7)) :msg "gain 7 [Credits]"}]}
