anchor.diff:      (declare (type (sa-sb 32) residual-1 residual-2 weights)
                (type (sb 32) delta))
       (when decorr-samples
  -      (correlate-sample (aref (the (sa-sb 32) (second decorr-samples)) 0)
  +      (correlate-sample (second decorr-samples)
                           (aref residual-2 0)
                           (aref weights 1)
                           update-weight-clip))
  
positive.code:     (declare (type (sa-sb 32) residual-1 residual-2 weights)
               (type (sb 32) delta))
      (when decorr-samples
        (correlate-sample (aref (the (sa-sb 32) (first decorr-samples)) 0)
                          (aref residual-1 0)
                          (aref weights 0)
                          update-weight-clip))
  
negative.code:              (type (sb 32) delta))
      (when decorr-samples
        (correlate-sample
         (first decorr-samples)
         (aref residual-1 0)
         (aref weights 0)
         update-weight-clip)
        (correlate-sample
         (second decorr-samples)
         (aref residual-1 1)
         (aref weights 1)
         update-weight-clip))
  