Page 474 - Advanced Mine Ventilation
P. 474

Appendix C: Ventilation Network Analyzer in Cþþ With Input and Output  443

                      cin >> ii >> qdjs;
                      for(int i¼1; i<¼nj; iþþ)
                      {
                         if(jctn[i] ¼¼ ii)
                          {
                                        qdjs;
                           qdjunc[i] ¼
                           break;
                          }
                      }
                    }
                }

                // ROADWAY CALCULATIONS

              label1200: je ¼ 1;

                if(jj !¼ 1)
                   je ¼  jout[jj-1]þ1;
                js ¼  jout[jj];
                for(int k¼je; k<¼js; kþþ)
                {
                   int index ¼ nbout[k];
                                                 qdwall[index];
                      qd ¼  cdj[jj] * q[index] þ
                      cdb[index]  ¼  qd/q[index];
                      mb[index] ¼ 1;
                }

                // JUNCTION CALCULATIONS
                for(int i¼1; i<¼nj; iþþ)
                {
                   if(mj[i] ¼¼ 0)
                    {
                        je ¼ 1;
                        if(i !¼ 1)
                        {
                           je ¼   jin[i-1]þ1;
                        }
                        js ¼ jin[i];
                        summtn ¼ 0.0;
                        sumair ¼ 0.0;
                                    false;
                        bool flag ¼
                        for(int k¼je; k<¼js; kþþ)
                        {
                           int j  ¼  nbin[k];
                           if(mb[j] ¼¼ 0)
   469   470   471   472   473   474   475   476   477   478   479