anchor.diff:  		      Member_pids = pg2:get_members(N),
   		      case Member_pids of
   			  [Pid|_]->
  -			      pg2:leave(Multi_Subscribe_To,Pid),
   			      pg2:join(Multi_Subscribe_To,Pid),
   			      Pid! subscribed;
   			  {error,_} -> lager:info("Unavailable")
  
positive.code: handle_event({send_message,Single_Channel,Single_Msg},State)-> 
  
      Member = pg2:get_members(Single_Channel),
  
  
      case Member of
  	[Pid|_] -> Pid!{send,Single_Msg};
  	{error,_}-> lager:info("unavailable:",Member)
      end,
      {ok,State};
  
negative.code: 	    Member_Pids = pg2:get_members(Subscriber),
  	    case Member_Pids of
  		[Pid|_]->
  		    pg2:join(Single_Subscribe_To,Pid),
  		    Pid!subscribed;
  		{error,_}-> lager:info("Unavailable")
  