Function: EMPTY-POOL-P

Source

(defun empty-pool-p (pool)
  (= (pool-count pool) 0))