public bool KodGot_VDlina = false; //код готовности (значение введено)
/* фрагмент кода VL - для проверки согласованности алгоритмов VL и VL1
* V_dlina : extended; {длина ветви(выработки/воздуховода}
* dlinaUm : extended = 1000.0; {условное значение по умолчанию}
* dlinaMax : extended = 10000.0; {разумное максимальное}
* dlinaMin : extended = 10.0; {разумное ммнимальное }
* KodGot_Vdlina : boolean = false; {код готовности(значение введено)}
*/
public cop_clDlina(string sPar)
{
clVvodParDan ob = new clVvodParDan(NamePar, sPar, DlinaUm, DlinaMax, DlinaMin);
Dlina = ob.ParDan; //длина ветви(выработки/воздуховода
KodGot_VDlina = ob.kodVvod; //код готовности(значение введено)
}
private bool KodGot_Sps = false; //код готовности (значение введено)
/* фрагмент кода VL - для проверки согласованности алгоритмов VL и VL1
* V_sps : extended; {площадь поперечного сечения }
* spsUm : extended = 20.0; {условное значение по умолчанию}
* spsMax : extended = 100.0; {разумное максимальное}
* spsMin : extended = 1.0; {разумное ммнимальное }
* KodGot_Vsps : boolean = false; {код готовности (значение введено)}
*/
public clSps(string sPar)
{
clVvodParDan ob = new clVvodParDan(NamePar, sPar, SpsUm, SpsMax, SpsMin);
_Sps = ob.ParDan; //Sps ветви(выработки/воздуховода
KodGot_Sps = ob.kodVvod; //код готовности(значение введено)
}
private bool KodGot_Beta = false; //код готовности (значение введено)
/*Фагмент кода VL - для проверки согласованности алгоритмов VL и VL1
* V_beta : extended; {betta ветви ыработки}
* betaUm : extended = 1.6{0.001 обеспечивается при 1.6};{условное значение по умолчанию}
* betaMax : extended = 1.0; {разумное максимальное}
* betaMin : extended = 0.0000001; {разумное ммнимальное }
* KodGot_Vbeta : boolean = false; {код готовности (значение введено)}о)}
*/
public clBeta(string sPar)
{
clVvodParDan ob = new clVvodParDan(NamePar, sPar, BetaUm, BetaMax, BetaMin);
_Beta = ob.ParDan; //Beta ветви(выработки/воздуховода
KodGot_Beta = ob.kodVvod; //код готовности(значение введено)
}
private bool KodGot_Perim = false; //код готовности (значение введено)
/* фрагмент кода VL - для проверки согласованности алгоритмов VL и VL1
* V_perim : extended; {периметр(выработки/воздуховода}
* perimUm : extended = 10.0; {условное значение по умолчанию}
* perimMax : extended = 100.0; {разумное максимальное}
* perimMin : extended = 1.0; {разумное ммнимальное }
* KodGot_Vperim : boolean = false; {код готовности(значение введено)}
*/
public clPerim(string sPar)
{
clVvodParDan ob = new clVvodParDan(NamePar, sPar, PerimUm, PerimMax, PerimMin);
_Perim = ob.ParDan; //Perim ветви(выработки/воздуховода
KodGot_Perim = ob.kodVvod; //код готовности(значение введено)
}