//....Class Constructor
public clsRadB(clsUnit.eSystem UnitSystem_In, eDesign Design_In, clsJBearing CurrentBearing_In)
//=============================================================================================
{
mCurrentBearing = CurrentBearing_In;
if (Design_In == eDesign.Flexure_Pivot)
{
mPivot = new clsPivot.clsFP(UnitSystem_In, clsRadB.eDesign.Flexure_Pivot, CurrentBearing_In);
}
else if (Design_In == eDesign.Tilting_Pad)
{
mPivot = new clsPivot.clsTP(UnitSystem_In, clsRadB.eDesign.Tilting_Pad, CurrentBearing_In);
}
//....Instantiate member class objects:
mPad = new clsPad(this);
mOilInlet = new clsOilInlet(CurrentBearing_In);
mARP = new clsARP(CurrentBearing_In);
mSL = new clsSL(CurrentBearing_In);
mFlange = new clsFlange(this);
//....Initialize:
mSplitConfig = true;
//........Material.
mMat.WCode_Base = "1002-107";
mMat.LiningExists = true;
mMat.WCode_Lining = "1002-960";
}
public clsOilInlet(clsJBearing CurrentBearing_In)
//=====================================================================
{
mCurrentBearing = CurrentBearing_In;
mCount_MainOilSupply = 1;
mOrifice.StartPos = eOrificeStartPos.Below;
mOrifice.Ratio_L_D = 1.5;
}
public clsFP(clsUnit.eSystem UnitSystem_In, clsRadB.eDesign Design_In, clsJBearing CurrentBearing_In)
: base(Design_In)
//===============================================================================================
{
//....Instantiate member class objects:
mEDM_Pad = new clsEDM_Pad(CurrentBearing_In);
mCurrentBearing = CurrentBearing_In;
}
public clsARP(clsJBearing CurrentBearing_In)
//==========================================
{
mCurrentBearing = CurrentBearing_In;
mDowel = new clsPin(mCurrentBearing.Unit.System);
mDowel.Spec_Type = "P";
mDowel.Spec_Mat = "STEEL";
mOffset_Direction = "CCW";
mInsertedOn = eInsertedOn.BearingOD;
}
public clsMount(clsJBearing CurrentBearing_In)
//===========================================
{
mCurrentBearing = CurrentBearing_In;
mBolting = true;
mScrew = new clsScrew(CurrentBearing_In.RadB.SL.Screw.Spec.Unit.System);
//....Initialize:
mEquiSpaced = true;
mCount = 4;
mAngStart = 45;
}
public clsSL(clsJBearing CurrentBearing_In)
//=========================================
{
mCurrentBearing = CurrentBearing_In;
//....Screw.
//
mScrew = new clsScrew(mCurrentBearing.Unit.System);
mScrew.Spec_Type = "SHCS";
mScrew.Spec_Mat = "STEEL";
//....Dowel.
//
mDowel = new clsPin(mCurrentBearing.Unit.System);
mDowel.Spec_Type = "P";
mDowel.Spec_Mat = "STEEL";
}
public Double DBC_ULimit(clsJBearing Bearing_In, int Index_In)
//============================================================
{
mCurrentBearing = Bearing_In;
return(((clsJBearing)mCurrentBearing).EndPlate[Index_In].OD - 2 * modMain.gcSep_Min - mScrew.Hole.CBore.D);
}
public Double DBC_LLimit(clsJBearing Bearing_In)
//=============================================
{
mCurrentBearing = Bearing_In;
return(((clsJBearing)mCurrentBearing).RadB.PadRelief_D() + 2 * modMain.gcSep_Min + mScrew.D());
}
private void Initialize_LocalObject()
//===================================
{
mBearing = (clsJBearing)modMain.gProject.PNR.Bearing.Clone();
}
//========================
#endregion
#region "CONSTRUCTOR:"
public clsTP(clsUnit.eSystem UnitSystem_In, clsRadB.eDesign Design_In, clsJBearing CurrentBearing_In)
: base(Design_In)
//======================================================================================
{
}
public clsEDM_Pad(clsJBearing Current_Bearing_In)
//===============================================
{
mCurrent_Bearing = Current_Bearing_In;
}
