anchor.diff:  
   
   
  -        /// Takes Array of DigestedPeptides and and returns Array of DigestedPeptides including those resulting of one or more Misscleavage events
  -        let concernMissCleavages (minMissCleavages:int) (maxMisscleavages:int) (digestedPeptidesA:(DigestedPeptide<'a>) []) =
  -            if digestedPeptidesA = [||] then [||]
  +        /// Returns Sequence of DigestedPeptides including those resulting of one or more Misscleavage events.
  +        let concernMissCleavages (minMissCleavages:int) (maxMisscleavages:int) (digestedPeptides:(DigestedPeptide<'a>) []) =
  +            if digestedPeptides = [||] then [||]
               else
  -            let lengthOfPeptideL = digestedPeptidesA.Length
  +            let lengthOfPeptideL = digestedPeptides.Length
               let minToMaxMissCleavagesL = [minMissCleavages.. maxMisscleavages]
               let rec connectDigestedPeptides acc (digestedPeptidesA: DigestedPeptide<'a> []) (fstPepIdx:int)  (lastPepIdx:int) currentMissCleavages =
                   if lengthOfPeptideL < lastPepIdx then acc
  
positive.code:                 ) (0,0)
              |> fst 
  
  
  
      [<AutoOpen>]
  
negative.code:                         yield (tmp.[prefixLength].Value,tmp)
                          }
  
          
          ///Cuts AminoAcid sequence at each place, where the sequence fits the cutting pattern of the protease. Returns sequence of resulting AminoAcid sequences
          let digest (protease:Protease) proteinID (aas:seq<AminoAcid>) =
              let groupAfter f (input:seq<_>) =     
  