anchor.diff:      <<Data0/binary, Data1/binary>>.
   
   
  -%% connect_measure(Port, Cipher, Mac, Data, Options) ->
  -%%     report([{value, 1},
  -%%              {suite, ?MODULE},
  -%%              {name, mk_name(["Transfer 1M bytes ",Cipher,"/",Mac," [µs]"])}]);
   connect_measure(Port, Cipher, Mac, Data, Options) ->
       AES_GCM = {cipher,
                  []},
  
positive.code:              ssh:close(C),
               Time
           end || _ <- lists:seq(1,?Nruns)],
      
      report([{value, 1000000 / median(Times)}, % Time in µs
              {suite, ?MODULE},
              {name, mk_name(["Transfer ",Cipher,"/",Mac," [Mbyte per sec]"])}]).
  
  send_wait_acc(C, Ch, Data) ->
      ssh_connection:send(C, Ch, Data),
  
negative.code: %%%
  %%% Private
  %%% 
  
  %%%----------------------------------------------------------------
  preferred_algorithms(KexAlg) ->
  