anchor.diff:                  sw.Stop()
   
                   consoleLog <| sprintf "Insert all time: %A ms" sw.ElapsedMilliseconds
  -                consoleLog <| sprintf "Insert rate %A/s" (double streamCount / double sw.Elapsed.TotalSeconds)
  +                let insertOnlyTime = new TimeSpan(sw.ElapsedTicks - enqueueTicks)
  +                consoleLog <| sprintf "Insert rate %A/s" (double streamCount / double insertOnlyTime.TotalSeconds)
               }
           }
           |> Async.Parallel
  
positive.code:                 for event in myEvents do
                      do! projector.Enqueue event
  
                  consoleLog <| sprintf "Enqueue Time: %A ms" sw.ElapsedMilliseconds
  
                  projector.StartWork()
  
negative.code:         |> Async.RunSynchronously
  
      [<Fact>]
      let ``Pump many events at Raven with concurrency`` () : unit =
          use config = Metric.Config.WithHttpEndpoint("http://localhost:8083/")
          
          let documentStore = buildDocumentStore() :> Raven.Client.IDocumentStore 
  