anchor.diff:                end,
       RT = {case Format of
                 true ->
  -                  lists:append(
  -                      [A1, " ", format_keyword(
  -                          "between "), B1, " ", format_keyword("and "), C1]);
  +                  lists:append([
  +                      A1,
  +                      " ",
  +                      format_keyword("between "),
  +                      B1,
  +                      " ",
  +                      format_keyword("and "),
  +                      C1
  +                  ]);
                 _ -> lists:append([A1, " between ", B1, " and ", C1])
             end, NewCtx4},
       ?debugFmt(?MODULE_STRING ++ ":fold ===>~n RT: ~p~n", [RT]),
  
positive.code: format_identifier(Identifier = _ST) ->
      case Identifier of
          "*" -> Identifier;
          _ -> I_1 = lists:sublist(Identifier, 1),
              case I_1 == "'" orelse I_1 == "\"" of
                  true -> Identifier;
                  _ -> case lists:member(string:uppercase(Identifier),
                      get_funs()) of
                           true -> format_keyword(Identifier);
                           _ -> format_identifier(
                               string:split(Identifier, ".", all), [],
                               [])
                       end
              end
      end.
  
  format_identifier([], _, Acc) ->
      Acc;
  format_identifier([IdentifierPart | Tail], Tz, Acc) ->
      case ?CASE_IDENTIFIER of
          keep_unchanged -> IdentifierPart;
          lower -> string:casefold(IdentifierPart);
          upper -> string:uppercase(IdentifierPart);
          _ ->
              format_identifier(Tail, ".", lists:append(
                  [Acc, Tz, format_identifier_part(
                      string:tokens(IdentifierPart, "_"), [], [])]))
      end.
  
  format_identifier_part([], _, Acc) ->
      Acc;
  format_identifier_part([IdentifierPart | Tail], Tz, Acc) ->
      format_identifier_part(Tail, "_", lists:append([
          Acc,
          Tz,
          string:titlecase(string:casefold(IdentifierPart))
      ])).
  
  % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  % Formatting keywords.
  
negative.code: % WHERE_CURRENT_OF
  % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
  fold(Format, State, FType, Fun, Ctx, _Lvl, {where_current_of, {cur, CurName}} =
      ST) -> ?debugFmt(?MODULE_STRING ++ ":fold ===> Start ~p-~p-~p~n ST: ~p~n",
      [Format, _Lvl, State#state.indentation_level, ST]),
      NewCtx = case FType of
                   top_down -> Fun(ST, Ctx);
                   bottom_up -> Ctx
  