anchor.diff:  		S :: binary(),
   		N :: pos_integer(),
   		MK :: binary().
  -%% @doc Pseudo-RANDom Number Function (PRF).
  +%% @doc Pseudo-Random Number Function (PRF).
   %%
   %%      See RFC5448 3.4.
   %% @private
  
positive.code: all() ->
  	[identity_radius, identity_radius_trusted, identity_radius_no_client,
  			identity_diameter_eap, identity_diameter_eap_trusted,
  			identity_diameter_sta, identity_diameter_sta_trusted].
  
  %%---------------------------------------------------------------------
  %%  Test cases
  
negative.code: end_per_testcase(TestCase, Config)
  		when TestCase == identity_radius;
  		TestCase == identity_radius_trusted;
  		TestCase == identity_radius_no_client;
  		TestCase == challenge_radius_trusted ->
  	Socket = ?config(socket, Config),
  	RadiusClient = ?config(radius_client, Config),
  	ok = ocs:delete_client(RadiusClient),
  