anchor.diff:          to_list(A1)
       ).
   
  +one_side_updates_test() ->
  +    Nodename = 'node1@127.0.0.1',
  +    Node1 = node_spec(Nodename, {127, 0, 0, 1}),
  +
  +    A = B = new(),
  +
  +    A1 = add(Node1, a, A),
  +
  +
  +    ?assertEqual(
  +        [Node1],
  +        to_list(A1)
  +    ),
  +
  +    ?assertEqual(
  +        [Node1],
  +        to_list(merge(A1, B))
  +    ).
  +
   concurrent_updates_test() ->
       Nodename = 'node1@127.0.0.1',
       Node1 = node_spec(Nodename, {127, 0, 0, 1}),
  
positive.code: 
      %% LWW
      ?assertEqual([Node2], to_list(AB)).
  
  remfield_test() ->
      Name = 'node1@127.0.0.1',
  
negative.code:         merge(merge(A, B2), C3)
      ).
  
  
  clock_test() ->
      Nodename = 'node1@127.0.0.1',
      Node1 = node_spec(Nodename),
  