anchor.diff:          //    let cov = x * x.Transpose
               
           //    cov ./ z
  +
  
positive.code:         /// computes the unnormalized (using only the dot product) cross-correlation of signals v1 and v2 at a given lag.
          let xCorr lag v1 v2 = 
              correlationOf Vector.dot lag v1 v2
  
      /// Contains correlation functions optimized for matrices
      [<AutoOpen>]
  
negative.code: 
              let xMed = xs |> Array.median
              let xMad = xs |> Array.medianAbsoluteDev
              let xWeights = xs |> Array.map ((bicorHelpers.deviation xMed xMad) >> bicorHelpers.weight)
              let xNF = bicorHelpers.getNormalizationFactor xs xWeights xMed
  
              let yMed = ys |> Array.median
              let yMad = ys |> Array.medianAbsoluteDev
              let yWeights = ys |> Array.map ((bicorHelpers.deviation yMed yMad) >> bicorHelpers.weight)
              let yNF = bicorHelpers.getNormalizationFactor ys yWeights yMed
  
              bicorHelpers.sumBy4 (fun xVal xWeight yVal yWeight ->
  