anchor.diff:  					#eap_aka_identity{identity = <<?PERM_AKA,
   							PermanentID/binary>> = Identity} when IdReq == full ->
   						[IMSI | _] = binary:split(PermanentID, <<$@>>, []),
  -						gen_fsm:send_event(AucFsm, {vector, {self(), IMSI,
  +						gen_fsm:send_event(AucFsm, {vector, {self(), IMSI, undefined,
   								get_radius_rat(RequestAttributes)}}),
   						NextStateData = NewStateData#statedata{identity = Identity},
   						{next_state, vector, NextStateData, ?TIMEOUT};
  
positive.code: 						[Pseudonym | _] = binary:split(Identity, <<$@>>, []),
  						CompressedIMSI = ocs_eap_aka:decrypt_imsi(Pseudonym, Keys),
  						IMSI = ocs_eap_aka:compressed_imsi(CompressedIMSI),
  						gen_fsm:send_event(AucFsm, {vector, {self(), IMSI,
  								get_radius_rat(RequestAttributes)}}),
  						NextStateData = NewStateData#statedata{identity = Identity},
  						{next_state, vector, NextStateData, ?TIMEOUT}
  
negative.code: 						NextStateData = NewStateData#statedata{eap_id = StartEapID,
  								identity = Identity},
  						[IMSI | _] = binary:split(PermanentID, <<$@>>, []),
  						gen_fsm:send_event(AucFsm, {vector, {self(), IMSI, undefined,
  								get_radius_rat(RequestAttributes)}}),
  						{next_state, vector, NextStateData, ?TIMEOUT};
  					#eap_packet{code = response, type = ?Identity,
  