anchor.diff:      Result0=rpc:call(FirstNode, antidote, read,
                       [Key, Type]),
       ?assertMatch({ok, []}, Result0),
  -    %%Result1=rpc:call(FirstNode, antidote, append,
  -    %%                [Key, Type, {{remove, a}, ucl}]),
  -    %%?assertMatch({ok, _}, Result1),
  -    %%Result2=rpc:call(FirstNode, antidote, read,
  -    %%                [Key, Type]),
  -    %%?assertMatch({error,{precondition,{not_present,a}}}, Result2),
       Result3=rpc:call(FirstNode, antidote, append,
                       [Key, Type, {{add, a}, ucl}]),
       ?assertMatch({ok, _}, Result3),
  
positive.code:     lager:info("Remove started"),
      Type = crdt_orset,
      Key = key_remove,
      %%Remove a non-existent key will trigger error
      %Result0=rpc:call(FirstNode, antidote, clocksi_execute_tx,
      %                [{update, {Key, Type, {{remove, a}, ucl}}}]),
      %lager:info("Result0: ~w", [Result0]),
      %?assertMatch({error, _}, Result0),
      
      Result1=rpc:call(FirstNode, antidote, clocksi_execute_tx,
                      [[{update, {Key, Type, {{add, a}, ucl}}}, {update, {Key, Type, {{add, b}, ucl}}}]]),
  
negative.code:     Result7=rpc:call(FirstNode, antidote, read,
                      [Key, Type]),
      ?assertMatch({ok, []}, Result7).
  