anchor.diff:  				{next_state, vector, NextStateData, ?TIMEOUT};
   			#eap_aka_identity{identity = <<?TEMP_TAG:6, _/bits>> = Identity}
   					when IdReq == full ->
  -				Pseudonym = binary:split(Identity, <<$@>>, []),
  +				[Pseudonym | _] = binary:split(Identity, <<$@>>, []),
   				CompressedIMSI = decrypt_imsi(Pseudonym, Keys),
   				IMSI = compressed_imsi(CompressedIMSI),
   				% @todo handle RADIUS attribute for ANID
  
positive.code: 				{next_state, vector, NewStateData, ?TIMEOUT};
  			#eap_aka_identity{identity = <<?TEMP_TAG:6, _/bits>> = Identity}
  					when IdReq == full ->
  				Pseudonym = binary:split(Identity, <<$@>>, []),
  				CompressedIMSI = decrypt_imsi(Pseudonym, Keys),
  				IMSI = compressed_imsi(CompressedIMSI),
  				% @todo handle DIAMETER ANID AVP
  
negative.code: 					when Trusted == true ->
  				NextStateData = NewStateData#statedata{eap_id = StartEapID,
  						identity = Identity},
  				[Pseudonym | _] = binary:split(Identity, <<$@>>, []),
  				CompressedIMSI = decrypt_imsi(Pseudonym, Keys),
  				IMSI = compressed_imsi(CompressedIMSI),
  				% @todo handle DIAMETER ANID AVP
  