(define size-of-pile
      (lambda (game-state pile-number)
        (cond ((= pile-number 3)
               (car game-state))
              ((= pile-number 1)
               (car (cdr game-state)))
              (else ; pile-number must be 2
               ________?_________))))