anchor.diff:  
                       Expect.isTrue isCuttingSite_Arg
                           "Digestion.isCuttingSite did not identify the CuttingSite correctly."
  -
                   )
                   testCase "isCuttingSite_lysPro" (fun () ->
                       let isCuttingSite_lysPro =
  
positive.code: 
                      Expect.sequenceEqual digest testDigest
                          "Digestion.BioArray.digest failed sto produce expected digested peptides."
  
                  )
                  testCase "concernMissCleavages" (fun () ->
                      let withMissCleavages =
  
negative.code: 
                      Expect.isTrue isCuttingSite_lysPro
                          "Digestion.isCuttingSite did not identify the CuttingSite correctly."
                  )
                  testCase "isCuttingSite_argPro" (fun () ->
                      let isCuttingSite_argPro =
  