nth-node
Name
nth-node -- Return a specific node in a node list (by numeric index)
Description
Returns the kth node in nl.  The first node in the node list
has the index "1".
Author
Norman Walsh, <ndw@nwalsh.com>
Source Code
(define (nth-node nl k)
  ;; Return a specific node in a node list (by numeric index)
  (if (equal? k 1)
      (node-list-first nl)
      (nth-node (node-list-rest nl) (- k 1))))