/* example of usage of ContinMC.ys:   "gracefully degrading system"

   two machines; while both up, each has an exponential up time with
   mean 25.0; while only one is up, it must carry extra load, and has an
   exponential up time with mean only 20.0; repair time is exponential
   with mean 8.0 (2 repairpersons are available) */  

Load("ContinMC.ys");

m:=ZeroMatrix(3,3);

m[1][1]:=-0.25;
m[1][2]:=0.25;
m[1][3]:=0;

m[2][1]:=0.05;
m[2][2]:=-0.175;
m[2][3]:=0.125;

m[3][1]:=0;
m[3][2]:=0.08;
m[3][3]:=-0.08;

pi:=solvedmc(m);

ForEach(i,1 .. 3) Echo(N(pi[i]));