anchor.diff:              ST <- ?CALLBACKS,
               CS <- ?SENDERS]
           ++
  -        [{T, [], groups([[T,CE,D,SE,SD,SC,S,SS,ST,CS]
  -                         || CE <- ?ENCODINGS,
  +        [{T, [], groups([[T,E,D,SD,SC,S,SS,ST,CS]
  +                         || E  <- ?ENCODINGS,
                               D  <- ?RFCS,
  -                            SE <- ?ENCODINGS,
                               SD <- ?DECODINGS,
                               SC <- ?CONTAINERS,
                               S  <- ?STRING_DECODES,
  
positive.code: groups() ->
      [{P, [P], Ts} || Ts <- [tc(tc())], P <- [shuffle, parallel]]
          ++
          [{?util:name([T,CE,D,SE,SD,SC,S,SS,ST,CS]),
            [],
            [{group, if S -> shuffle; not S -> parallel end}]}
           || T  <- ?TRANSPORTS,
              CE <- ?ENCODINGS,
              D  <- ?RFCS,
              SE <- ?ENCODINGS,
              SD <- ?DECODINGS,
              SC <- ?CONTAINERS,
              S  <- ?STRING_DECODES,
  
negative.code: 
  call(Config, Req, Opts) ->
      Name = proplists:get_value(testcase, Config),
      #group{encoding = Enc,
             client_service = CN,
             client_dict = Dict0}
          = Group
          = group(Config),
      diameter:call(CN,
                    dict(Req, Dict0),
                    msg(Req, Enc, Dict0),
                    [{extra, [{Name, Group}, diameter_lib:now()]} | Opts]).
  
  origin({D,E,C}) ->
  