anchor.diff:                  Type == expression4AddonList andalso Operator == "-" orelse
                   Type == expression9AddonList andalso Operator == "not" ->
                   ?debugFmt("wwe debugging fold/5 ===> ~n F: ~p~n", [F]),
  -                {Acc ++ case length(Acc) of
  -                            0 -> [];
  -                            _ -> " "
  -                        end ++ Operator, CtxAcc}
  +                {Acc ++ Operator, CtxAcc}
           end
                                          end,
           {[], NewCtx},
  
positive.code:               end,
      RT = {case Type of
                nodeLabel -> ":";
                relType -> ":";
                where -> "where ";
                _ -> []
            end ++ ValueNew, NewCtx2},
      ?debugFmt("wwe debugging fold/5 ===> ~n RT: ~p~n", [RT]),
      RT;
  
negative.code:                   top_down -> NewCtx1;
                    bottom_up -> Fun(ST, NewCtx1)
                end,
      RT = {"[.." ++ ValueNew ++ "]", NewCtx2},
      ?debugFmt("wwe debugging fold/5 ===> ~n RT: ~p~n", [RT]),
      RT;
  fold(FType, Fun, Ctx, Lvl, {"[", {expression, _} = Value, []} = ST) ->
      ?debugFmt("wwe debugging fold/5 ===> Start ~p~n ST: ~p~n", [Lvl, ST]),
      NewCtx = case FType of
                   top_down -> Fun(ST, Ctx);
  