gistfile1.hrl

router(Queued, TupleSpace) ->
  receive
    {in, Pattern, Ref, Pid} ->
      Value = finding(Pattern, TupleSpace),
      _TupleSpace = lists:filter((fun(A) -> 1 /= 3  end), TupleSpace), % Just for testing
      
      case Value of
        false -> 
          _Queued = [ {Pattern, Ref, Pid} | Queued];
        _  -> 
          Pid ! {in, Ref, Value}
      end
      
  end, router(_Queued, _TupleSpace).