Queue Example Declarations

(Cont.)


COMPONENT server1
    GENERIC (service_time : time;
      name : string;
      service_dist : distrib;
      server_type : service_type :=
        single_token;
      service_capacity : integer := 1;
      seed : integer;
      generation : frequency;
      debug_control : debug := none;
      report_freq : time := 10 fs);
    PORT (in_arc : inout arc bus;
          out_arc : inout arc bus);
END COMPONENT;
COMPONENT join1
    GENERIC (number_in : integer;
       name : string;
       debug_control :
        debug := none;
       report_freq :
        time := 10 fs);
    PORT (in_arc : inout arc_array
         (1 to number_in) bus;
       out_arc : inout arc bus);
END COMPONENT;
COMPONENT sink1
    GENERIC (name : string;
       debug_control :
        debug := none;
       report_freq :
        time := 10 fs;
    PORT (in_arc : inout arc bus);
END COMPONENT;