anchor.diff:                                   NS_BU
                            end,
               ?D3("~n[BU] NewSource~n~s", [NSource_BU]),
  -            case string:to_lower(SourceNet) == string:to_lower(lists:flatten(remove_whitespace(binary_to_list(NSource_BU), ?WHITESPACE, []))) of
  -                true ->
  -                    ok;
  -                _ ->
  -                    ?D_("~n[BU] Error Source == NewSource : Source      ~n > ~p", [Source]),
  -                    ?D_("~n[BU] Error Source == NewSource : SourceNet   ~n > ~p", [SourceNet]),
  -                    ?D_("~n[BU] Error Source == NewSource : NewSourceNet~n > ~p", [lists:flatten(remove_whitespace(binary_to_list(NSource_BU), ?WHITESPACE, []))]),
  -                    throw({error, "[BU] Error Source == NewSource"})
  -            end,
               %% -----------------------------------------------------------------
               %% 3. Source (=NSource_BU) ==> ParseTree (=NPT_BU)
               %% -----------------------------------------------------------------
  
positive.code:                                  NS_TD
                           end,
              ?D3("~n[TD] NewSource~n~s", [NSource_TD]),
              SourceNet = lists:flatten(remove_whitespace(Source, ?WHITESPACE, [])),
              case string:to_lower(SourceNet) == string:to_lower(lists:flatten(remove_whitespace(binary_to_list(NSource_TD), ?WHITESPACE, []))) of
                  true ->
                      ok;
                  _ ->
                      ?D_("~n[TD] Error Source == NewSource : Source      ~n > ~p", [Source]),
                      ?D_("~n[TD] Error Source == NewSource : SourceNet   ~n > ~p", [SourceNet]),
                      ?D_("~n[TD] Error Source == NewSource : NewSourceNet~n > ~p", [lists:flatten(remove_whitespace(binary_to_list(NSource_TD), ?WHITESPACE, []))]),
                      throw({error, "[TD] Error Source == NewSource"})
              end,
              %% -----------------------------------------------------------------
              %% 3. Source (=NSource_TD) ==> ParseTree (=NPT_TD)
              %% -----------------------------------------------------------------
  
negative.code: -define(D5(__Fmt, __Args), ?D(5, __Fmt, __Args)).
  
  eunit_test_source(_TestGroup, Source, Logs) ->
      ?debugFmt(?MODULE_STRING ++ ":eunit_test_source ===>~nTestGroup = ~p~n Source = ~p~n Logs = ~p~n", [_TestGroup, Source, Logs]),
      ?D1("~n[TD] Source~n~s", [Source]),
      %% -------------------------------------------------------------------------
      %% 1. Source ==> ParseTree
      %% -------------------------------------------------------------------------
      case ?PARSER_MODULE:source_to_pt(Source) of
          {ok, {ParseTree, _Tokens}} ->
              ?debugFmt(?MODULE_STRING ++ ":eunit_test_source ===>~nParseTree = ~p~n   Tokens = ~p~n", [ParseTree, _Tokens]),
              ?D2("~n[TD] ParseTree~n~p Tokens~n~p", [ParseTree, _Tokens]),
              %% -----------------------------------------------------------------
              %% Test TopDown
  