;; Returns: A strategy which returns the average of the two input strategies.
(define (average-strat strat1 strat2) (lambda (strat1 strat2) (/ (+ strat1 strat2)
