anchor.diff:  	[]->
   		{ok,[]};
   	[H|T]->
  -		lager:info("materialiser_vnode: These are the stored Snapshots: ~p",[H|T]),
  +		%lager:info("materialiser_vnode: These are the stored Snapshots: ~p",[H|T]),
   		case orddict:filter(fun(Key, _Value) -> 
   				belongs_to_snapshot(Key, SnapshotTime) end, [H|T]) of 
   			[]->
  
positive.code:         {ok, _} ->
          	case ets:lookup(OpsCache, Key) of
          	[]->
          		lager:info("storing the first operation for the key"),
          		OpsDict=orddict:new();
          	[{_, OpsDict}]->
          		lager:info("materialiser_vnode: OpsDict= ~p",[OpsDict])
          	end,
          	lager:info("operation being stored: ~p", [DownstreamOp]),
          	OpsDict1=orddict:append(DownstreamOp#clocksi_payload.commit_time, DownstreamOp, OpsDict),
          	lager:info("materialiser_vnode: OpsDict= ~p",[OpsDict1]),
              true = ets:insert(OpsCache, {Key, ops_gc(OpsDict1)}),
              {reply, ok, State};
          {error, Reason} ->
  
negative.code:             	ets:insert(SnapshotCache, {Key, orddict:store(CommitTime,Snapshot, SnapshotDict)})
              end;
          [{_, SnapshotDict}] ->
  			{ok, {_SnapshotCommitTime, LatestSnapshot}} = get_latest_snapshot(SnapshotDict, SnapshotTime),
  		    %lager:info("materialiser_vnode: Latest snapshot for key ~p is ~p, with commit time ~p.",[Key, LatestSnapshot, SnapshotCommitTime]),
              case ets:lookup(OpsCache, Key) of
              [] ->
              	Snapshot=LatestSnapshot;
              [{_, OpsDict}] ->
              	%lager:info("materialiser_vnode: about to filter OpsDict= ~p",[OpsDict]),
              	{ok, Ops}= filter_ops(OpsDict),
              	%lager:info("materialiser_vnode: Ops to apply are: ~p",[Ops]),
              	case Ops of
              	[]->
              	    Snapshot=LatestSnapshot;
  