                  :choices (req (:discard corp)) :effect (effect (move target :hand))}]}
 
    "Project Wotan"
-   {:data [:counter 3]
+   {:effect (effect (add-prop card :counter 3))
     :abilities [{:counter-cost 1 :msg "add an 'End the run' subroutine to the approached ICE"}]}
 
    "Quantum Predictive Model"

    :effect (effect (add-prop target :counter 1))}

   "Geothermal Fracking"
   {:data {:counter 2}
    :abilities [{:cost [:click 1] :counter-cost 1 :msg "gain 7 [Credits] and take 1 bad publicity"
                 :effect (effect (gain :credit 7 :bad-publicity 1))}]}


    :steal-cost-bonus (req [:credit 2])}

   "Firmware Updates"
   {:effect (effect (add-prop card :counter 3))
    :abilities [{:counter-cost 1 :choices {:req #(and (ice? %) (can-be-advanced? %))}
                 :req (req (< 0 (:counter card 0)))
                 :msg (msg "place 1 advancement token on " (card-str state target))
