function [C] = C_repairmen(p_n,s)
% C_REPAIRMEN - coefficient of loss for repairmen
%   
% Input: 
%   p_n: is the steady-state probabity we are in the state X(t)=n
%   s: the number of servers
% 
% References: 
% 
% Introduction to Probability Models: Chapter 10
% by Roe Goodman 
% 
% Written by:
% -- 
% John L. Weatherwax                2007-09-10
% 
% email: wax@alum.mit.edu
% 
% Please send comments and especially bug reports to the
% above email address.
% 
%-----

nArray   = 0:(s-1);
smnArray = s-nArray; 
C = dot( smnArray, p_n(1:s) )/s;