namespace Deltares.Stability.Calculation.Inner
{
    public class TCirculairSlipPlane : TSlipPlane
    {
        // Private Declarations
        // internal data
        protected double FRadius = 0;
        protected double FXCenterPoint = 0;
        protected double FZCenterPoint = 0;
        //Constructor  Create()
        public TCirculairSlipPlane() : base()
        {
            // TODO: Add any constructor code here
        }

        public double XCenterPoint
        {
            get
            {
                return FXCenterPoint;
            }
            set
            {
                FXCenterPoint = value;
            }
        }

        public double ZCenterPoint
        {
            get
            {
                return FZCenterPoint;
            }
            set
            {
                FZCenterPoint = value;
            }
        }

        public double Radius
        {
            get
            {
                return FRadius;
            }
            set
            {
                FRadius = value;
            }
        }

        // ===========================================================================================
        // Date        ID   Modification
        // 2008-03-26  Best Created
        // ===========================================================================================
        public override void CreateSlices()
        {
            int i;
            base.CreateSlices();

            // Find intersection points with surface
            FSliceDivision.XMidActive = FXCenterPoint;
            FSliceDivision.ZMidActive = FZCenterPoint;
            FSliceDivision.Radius = FRadius;
            FSliceDivision.ZTangent = FZCenterPoint - FRadius;
            FSliceDivision.DivideFailureSurfaceInSlices();
            FNSlices = FSliceDivision.NSlices;
            FSlices = new Tslice[FNSlices];
            for (i = 0; i < FNSlices; i ++)
            {
                FSlices[i] = new Tslice(FSliceDivision.Slices[i]);
            }
        }
    }

    // end TCirculairSlipPlane
}