public void Calc_Annulus_Params()
            //=================================
            {
                //....Flow reqd. GPM.
                Double pFlowReqd_gpm = mCurrent_Bearing_Radial_FP.PerformData.FlowReqd;

                //....Calculate AMin:
                Double pUp, pDown;

                pUp   = 231 * pFlowReqd_gpm;
                pDown = 2 * mCount_MainOilSupply * 60 * 12 * 10;

                Double pAMin = 0.0F;

                if (pDown != 0.0F)
                {
                    pAMin = pUp / pDown;
                }

                //....Calculate H:
                Double pH = 0.0F;

                if (mAnnulus.Ratio_Wid_Depth != 0.0F)
                {
                    double pAny = 0.0F;
                    pAny = (pAMin / mAnnulus.Ratio_Wid_Depth);

                    if (pAny != 0.0F)
                    {
                        pH = (Double)Math.Sqrt(pAny);
                    }
                }

                //....Diameter & Length:
                //
                if (pH != 0.0F)
                {
                    mAnnulus.D   = mCurrent_Bearing_Radial_FP.OD() - 2 * pH;
                    mAnnulus.Wid = pH * mAnnulus.Ratio_Wid_Depth;
                }
            }
            //-------------

            #region "Locations:"
            //------------------

            //public Double Calc_Screw_Loc_Center()
            ////=====================================
            //{
            //    //....Commmon for RScrew & LScrew.
            //    //
            //    Double pDFit = mCurrent_Bearing_Radial_FP.OD();
            //    Double pD_CBore = mScrew.Hole.CBore.D;
            //    Double pLoc = 0.5F * (pDFit - pD_CBore) - 0.1;

            //    return modMain.MRound(pLoc, 0.05);
            //}

            // PB 22OCT18. BG, write a new method: Screw_Loc_Center_ULimit (see scanned docu for formula)

            public Double Screw_Loc_Center_ULimit()
            //=====================================
            {
                Double pResult            = 0;
                Double pBearing_DFit      = mCurrent_Bearing_Radial_FP.OD();
                Double pScrew_CBore_D     = mScrew.Hole.CBore.D;
                Double pScrew_CBore_Depth = mScrew.Hole.CBore.Depth;
                Double pScrew_D           = mScrew.D();

                Double pX1 = Math.Pow((pScrew_CBore_Depth + pScrew_CBore_D + 0.030), 2);
                Double pX2 = Math.Pow((0.5 * pBearing_DFit), 2);
                Double pX3 = Math.Sqrt(1 - (pX1 / pX2));

                pResult = 0.5 * (pBearing_DFit * pX3 - pScrew_CBore_D);
                return(pResult);
            }