anchor.diff:                    (white-p-network  nil)
                     (black-v-network  nil)
                     (white-v-network  nil)
  -                  (pool nil)
                     (return-game? nil)
                     (filename nil)
  -                  (verbose? t)
  +                  (verbose? nil)
                     )
   
     ;; Record a random board state from the game along with who won the game
  
positive.code: (defmacro run-evos (num lon lock)
    `(dotimes (i ,num)
       (setq nets (nth (random (length ,lon)) ,lon))
       (run-evo nets (random 10) 2 ,lock)
       )
    )
  
negative.code:           ;; Load the network
            (setq w-p-pool (init-nn-pool white-p-network white-threads?))
            ;; Otherwise were provided a network so use it
            (setq w-p-pool (init-pool white-p-network white-threads?))))
  
        ;; Initialize value nets
        (when black-v-network
  