anchor.diff:  -define(EAP_APPLICATION_ID, 5).
   -define(SWm_APPLICATION_ID, 16777264).
   
  -%% 3GPP TS 23.003 14.5 Temporary identities
  --define(PERM_TAG, $6).
  --define(TEMP_TAG, $2).
  --define(FAST_TAG, $4).
  +%% 3GPP TS 23.003 19.3.2 Root NAI
  +-define(PERM_AKA,  $0).
  +-define(PERM_AKAp, $6).
  +%% 3GPP TS 23.003 19.3.4 Fast Re-auth
  +-define(FAST_AKA,  $4).
  +-define(FAST_AKAp, $8).
  +%% 3GPP TS 23.003 19.3.5 Pseudonym
  +-define(TEMP_AKA,  $2).
  +-define(TEMP_AKAp, $7).
   
   %%----------------------------------------------------------------------
   %%  The ocs_eap_aka_fsm API
  
positive.code: 						{next_state, vector, NextStateData, ?TIMEOUT};
  					#eap_packet{code = response, type = ?Identity,
  							identifier = StartEapID,
  							data = <<?TEMP_TAG:6, _/bits>> = Identity}
  							when Trusted == true ->
  						NextStateData = NewStateData#statedata{eap_id = StartEapID,
  								identity = Identity},
  						[Pseudonym | _] = binary:split(Identity, <<$@>>, []),
  
negative.code: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %%% @doc This {@link //stdlib/gen_fsm. gen_fsm} behaviour callback module
  %%% 	implements the functions associated with an EAP server within EAP
  %%% 	3rd Generation Authentication and Key Agreement (EAP-AKA/AKA')
  %%% 	in the {@link //ocs. ocs} application.
  %%%
  %%% @reference <a href="http://tools.ietf.org/html/rfc4187">
  