anchor.diff:    (fmt "An error might be signaled if START and END are not valid bounding~@
   	index designators for SEQUENCE, which means that 0 <= START <= L, and~@
   	either END is NIL or 0 <= END <= L where L is the length of SEQUENCE."))
  +
  +(defparameter *error-count*
  +  (fmt "The consequences are undefined if a value of COUNT other than NIL or~@
  +        an integer is given."))
   
   (defparameter *find-description*
     (fmt "Searches the interval of SEQUENCE designated by START and END~@
  
positive.code: 	     *satisfy-a-one-argument-negative-test*
  	     *error-not-proper-sequence*
  	     *error-bounding-indexes*))
  
negative.code:         the indexes i such that START <= i < END.  The default for START is 0,~@
          and the default for END is NIL, which means the end of the sequence."))
  
  (defparameter *count*
    (fmt "COUNT is an integer or NIL.  When no value of COUNT is given, the~@
          default is NIL.  The value of COUNT limits the number of elements~@
          affected by the operation."))
  
  (defparameter *satisfy-a-two-argument-test*
    (fmt "To determine whether an element satisfies the test,  The KEY function~@
          is first applied to the element.  The result is then used in the test.~@
  