anchor.diff:                      completeLayer secondSubLayer
   
   
  -        and constructLayer layerNum = 
  +        let constructLayer layerNum = 
               let matricesSize = 1 <<< layerNum   
               let matricesCount = (double stringSize + 1.) / double(matricesSize) - 1. |> ceil |> int
   
  
positive.code:                 [0..from1.Size-1] |> List.fold (fun acc k -> acc + nt1Matrix.[i + left1Fst, k + left1Snd] * 
                                                                     nt2Matrix.[k + left2Fst, j + left2Snd]) 0. 
              let actualCol2Count = (min (snd from2.Top) (stringSize + 1)) - snd from2.Left
              Array2D.init from1.Size actualCol2Count calcCell    
  
          let performMultiplication tasks = 
              multiplicationCounter := !multiplicationCounter + (Array.length tasks)
              let crossproduct xs ys = 
  
negative.code:                 let toMult = 
                      //todo: annotation?
                      let getMults i (matrix: SubMatrix.T) =
                          if (i % 2) = 0
                          then
                              matrix.RelativeMatrix 0 -(snd matrix.Top - fst matrix.Top - matricesSize), 
                              matrix.RelativeMatrix halfMatricesSize 0
  