anchor.diff:  		ext_state,
   		user_fun,
   		user_args,
  +		as_pid,
   		sctp_pid
   	}).
   
  
positive.code: 	#asp_state{user_fun = Fun, user_args = Args} = LoopDat,
  	Fun(Prim, Args).
  
  
  % Helper function to send data to the SCTP peer
  send_sctp_to_peer(LoopDat, Msg) ->
  
negative.code: 	% transition into ASP_DOWN
  	% signal this to the user
  	send_prim_to_user(LoopDat, osmo_util:make_prim('M','ASP_DOWN',confirm)),
  	next_state(asp_down, LoopDat);
  
  asp_active({xua_msg, ?M3UA_MSGC_ASPTM, ?M3UA_MSGT_ASPTM_ASPIA_ACK}, LoopDat) ->
  	timer:cancel(LoopDat#asp_state.t_ack),
  	% transition into ASP_INACTIVE
  	% signal this to the user
  	send_prim_to_user(LoopDat, osmo_util:make_prim('M','ASP_INACTIVE',confirm)),
  	next_state(asp_inactive, LoopDat);
  
  asp_active(#primitive{subsystem = 'M', gen_name = 'ASP_DOWN',
  		      spec_name = request, parameters = _Params}, LoopDat) ->
  