                                 (not (is-type? target "Operation"))))
                  :not-distinct true
                  :choices (req (conj (take 5 (:deck corp)) "No install"))
-                 :effect (effect (corp-install (move state side target :play-area) nil {:no-install-cost true}))}
+                 :effect (effect (corp-install (move state side target :play-area)
+                                               nil {:no-install-cost true}))}
                 {:label "Install a card from HQ or Archives"
                  :prompt "Choose a card to install from Archives or HQ"
                  :show-discard true

              :prompt "Pay 3 [Credits] to force Runner to encounter Archangel?"
              :yes-ability {:cost [:credit 3]
                            :effect (req (system-msg state :corp "pays 3 [Credits] to force the Runner to encounter Archangel"))}}}
    :abilities [{:label "Trace 6 - Add 1 installed card to the Runner's Grip"
                 :trace {:base 6 :choices {:req #(:installed %)}
                         :msg "add 1 installed card to the Runner's Grip"
                         :effect (effect (move :runner target :hand true) (system-msg (str "adds " (:title target) " to the Runner's Grip")))}}]}

   "Archer"
   {:additional-cost [:forfeit]
    :abilities [{:msg "gain 2 [Credits]" :effect (effect (gain :credit 2))}
                trash-program end-the-run]}

   "Architect"
   {:flags {:untrashable-while-rezzed true}

   {:abilities [end-the-run]}

   "Assassin"
   {:abilities [(trace-ability 5 (do-net-damage 3))
                (trace-ability 4 (assoc trash-program :msg "trash a program"))]}

   "Asteroid Belt"
   (space-ice end-the-run)
