Page 487 - Advanced Mine Ventilation
P. 487
456 Appendix C: Ventilation Network Analyzer in Cþþ With Input and Output
for(int i¼2; i<¼n; iþþ)
{
for(int j¼i; j<¼n; jþþ)
{
p[i][jþ2] ¼ p[i-1][jþ1] - p[i][jþ1] * alpha[j] - p[i]
[j] * beta[j];
}
}
for(int i¼1; i<¼n1; iþþ)
{
c[l][i] ¼ 0;
for(int j¼i; j<¼n1; jþþ)
{
c[l][i] ¼ c[l][i] þ p[i][jþ1] * s[j];
}
}
printc(l);
}
}
}
else
{
nd[key];
nd[l] ¼
1;
n1 ¼ nd[key] þ
dd[keyþnfixb];
dd[jj] ¼
for(int j¼1; j<¼n1; jþþ)
{
c[l][j] ¼ c[key][j];
}
}
}
}
}
void printc (int l)
{
cout << endl << setw(20) << "CO-EFFICIENTS " << endl;
for (int i¼1; i<¼n1; iþþ)
{
cout << setw(10) << c[l][i] << setw(15);
}
}

