lambda = 0.01;                            % set values of parameters
 
mu = 0.1;

omega = 1.0;

Q = sparse (768,768);			  % declare the generator matrix

b = sparse (768, 1);			  % declare the solution vector

PC_LAN6;				  % read in the entries for Q
					  % in the "PC_LAN4.m" file

Qt = Q';				  % transpose the generator matrix

for i=1:768			          % replace the last equation by 
  Qt(768,i) = 1.0;                        % the normalisation constant in
end;					  % both the transposed Q and
b(768) = 1.0;                             % in the solution b

p = Qt\b;				  % solve to find the unknowns, the
                                          % steady state distribution

NumberPC_LAN6;				  % derive the mean number of
			                  % data packets at PC1

ThroughputPC_LAN6;			  % derive the mean throughput
                                          % of data packets at PC1

w = N/X - 1/mu                            % calculate waiting time as the 
                                          % residence time (N/X) minus the
                                          % transmission time (1/mu)
