chickadee » heap » heap-delete!

heap-delete! heap datumprocedure

Delete the element with datum

heap
The heap from which to delete
datum
The datum whose element to delete
(define (heap-delete! heap datum)
  (let ((i (heap-index heap datum)))
    (if i
      (heap-delete!/index heap i)
      (error "Datum not found -- HEAP-DELETE!"))))