(setq *print-circle* T);; then create some list with a large number of items, of which a bunch;; of th