anchor.diff:              async {
                   match storeValues with
                   | Empty -> return AsyncSeq.empty
  -                | Dictionary d -> return AsyncSeq.empty // Don't create a dictionary version, that would just duplicate items
  +                | Dictionary _ -> return AsyncSeq.empty // Don't create a dictionary version, that would just duplicate items
                   | Values values ->
                       let! (dictionary:IReliableDictionary<_,_>) = sm.GetOrAddAsync(dictionaryName) |> Async.AwaitTask
                       do!
  
positive.code:             match vs with
              | EmptyStore sm ->
                  ResultStore(sm, values)
              | DictionaryStore (sm,d) ->
                  ResultStore(sm, values)
              | ResultStore (sm,v) ->
                  let sequence = AsyncSeq.append v values
  
negative.code:         )
  
      let private lift2AsyncSeq f store1 store2 =
          doAsyncSeq' (f AsyncSeq.empty) f store1
          |> fun f' -> doAsyncSeq' (f' AsyncSeq.empty) f' store2
          |> result (store1 |> stateManager)
  