anchor.diff:  		is_binary(EapMessage), is_pid(PortServer) ->
   	Server = {ServerAddress, ServerPort},
   	Client= {ClientAddress, ClientPort},
  -	Answer = #'3gpp_swm_DEA'{'Session-Id' = SessionId,
  +	Answer = #'3gpp_sta_DEA'{'Session-Id' = SessionId,
   			'Auth-Application-Id' = ?STa_APPLICATION_ID,
   			'Auth-Request-Type' = AuthType,
   			'Result-Code' = ResultCode,
  
positive.code: 		auc_fsm :: undefined | pid(),
  		session_id:: binary() | {NAS :: inet:ip_address() | string(),
  				Port :: string(), Peer :: string()},
  		request :: undefined | #diameter_eap_app_DER{} | #'3gpp_swm_DER'{}
  				| #radius{},
  		secret :: undefined | binary(),
  		eap_id = 0 :: byte(),
  
negative.code: 		is_binary(EapMessage), is_pid(PortServer) ->
  	Server = {ServerAddress, ServerPort},
  	Client= {ClientAddress, ClientPort},
  	Answer = #'3gpp_sta_DEA'{'Session-Id' = SessionId,
  			'Auth-Application-Id' = ?STa_APPLICATION_ID,
  			'Auth-Request-Type' = AuthType,
  			'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_MULTI_ROUND_AUTH',
  