anchor.diff:  
       (write-sequence (fmt-template *pivot-report-template*
                                     `(("{THE-TABLE}" . ,table)
  -                                    ("{TIME}" . ,(pretty-fmt-time (get-universal-time)))))
  +                                    ("{TIME}" . ,(test-grid::pretty-fmt-time (get-universal-time)))))
                       out)))
   
   (defun print-pivot-reports (joined-index)
  
positive.code: (in-package #:test-grid)
  
  ;; -------------- the reporting source code directory -----------;; 
  
  
negative.code:                              (funcall lib-world-setter* index-key (list lib-world))))
           (lisp-getter (lambda (index-key) (car (funcall lisp-getter* index-key))))
           (new-quicklisp-keys (remove quicklisp-new
                                       (test-grid::hash-table-keys db-index)
                                       :key lib-world-getter
                                       :test (complement #'string=))))
      (dolist (key new-quicklisp-keys)
  