anchor.diff:          {{4,43,980,960},{node,inner},[
               {{4,43,865,787},{node,inner},{seedtree_leaf,[6688,7127,7348],
                   [{{66,132,252,718},{node,leaf},
  -                    {<<"Node718132">>,<<"Value718132">>}}]}},
  +                    {<<"Node718132">>,<<"Value718132">>}}],7518}},
               {{220,45,980,960},{node,inner},{seedtree_leaf,[6286,3391],
                   [{{342,456,959,513},{node,leaf},
  -                    {<<"intree01">>, datafoo3}}]}}]},
  +                    {<<"intree01">>, datafoo3}}],6520}}]},
           {{27,163,597,986},{node,inner},[
  -            {{37,163,597,911},{node,inner},{seedtree_leaf,[3732,5606],[]}},
  -            {{27,984,226,986},{node,inner},{seedtree_leaf,[5039],[]}}]}]},
  +            {{37,163,597,911},{node,inner},{seedtree_leaf,[3732,5606],[],6006}},
  +            {{27,984,226,986},{node,inner},{seedtree_leaf,[5039],[],5494}}]}]},
           SeedTree7Tree).
   
   
  
positive.code:     NewChildrenMbrAndPos.
  
  % XXX vmx: rename to _test when it should be run again
  seedtree_write_case1_test() ->
      % Test "Case 1: input R-tree fits in the target node" (chapter 6.1)
      % Test 1.1: input tree fits in
      % NOTE vmx: seedtree's maximum height should/must be height of the
  
negative.code:     ?debugVal(RootPos),
      SeedTree1 = seedtree_init(Fd, RootPos, 2),
      ?assertEqual({seedtree_root, {{4,43,980,986}, {node,inner},
          [{{4,43,980,960}, {node,inner},{seedtree_leaf,[7518,6520],[],7579}},
           {{27,163,597,986},{node,inner},{seedtree_leaf,[6006,5494],[],6174}}]},
           [], 2},
          SeedTree1),
      SeedTree2 = seedtree_init(Fd, RootPos, 3),
      ?assertEqual({seedtree_root, {{4,43,980,986}, {node,inner},
          [{{4,43,980,960}, {node,inner},
              [{{4,43,865,787},{node,inner},{seedtree_leaf,[6688,7127,7348],[],7518}},
               {{220,45,980,960},{node,inner},{seedtree_leaf,[6286,3391],[],6520}}]},
           {{27,163,597,986}, {node,inner},
              [{{37,163,597,911},{node,inner},{seedtree_leaf,[3732,5606],[],6006}},
               {{27,984,226,986},{node,inner},{seedtree_leaf,[5039],[],5494}}]}]},
           [], 3},
          SeedTree2).
  