Beispiel #1
0
		public DOPRI5()
		{
			#region Initialization Common Blocks

			CommonBlock CONDO5 = new CommonBlock(2, 0, 0, 0);

			#endregion Initialization Common Blocks

			#region Dependencies (Initialization)

			HINIT hinit = new HINIT();
			CDOPRI cdopri = new CDOPRI();
			DOPCOR dopcor = new DOPCOR(hinit, cdopri, CONDO5);

			#endregion Dependencies (Initialization)

			#region Set Dependencies

			this._dopcor = dopcor;

			#endregion Set Dependencies
		}
Beispiel #2
0
		public DOPCOR()
		{
			#region Initialization Common Blocks

			CommonBlock CONDO5 = new CommonBlock(2, 0, 0, 0);

			#endregion Initialization Common Blocks

			#region Dependencies (Initialization)

			HINIT hinit = new HINIT();
			CDOPRI cdopri = new CDOPRI();

			#endregion Dependencies (Initialization)

			#region Set Dependencies

			this._hinit = hinit; this._cdopri = cdopri;

			#endregion Set Dependencies

			#region Common varaible Initialization

			#region Common Block: CONDO5 Initialization

			this._condo5 = CONDO5;
			XOLD = CONDO5.doubleData[0];
			HOUT = CONDO5.doubleData[1];

			#endregion Common Block: CONDO5 Initialization

			#endregion Common varaible Initialization
		}
Beispiel #3
0
		public DOPCOR(HINIT hinit, CDOPRI cdopri, CommonBlock CONDO5)
		{
			#region Set Dependencies

			this._hinit = hinit; this._cdopri = cdopri;

			#endregion Set Dependencies

			#region Common varaible Initialization

			#region Common Block: CONDO5 Initialization

			this._condo5 = CONDO5;
			XOLD = CONDO5.doubleData[0];
			HOUT = CONDO5.doubleData[1];

			#endregion Common Block: CONDO5 Initialization

			#endregion Common varaible Initialization
		}
		///// <summary>
		///// MeITol1 = An indicator for the type of error control.
		/////                 ITOL    RTOL       ATOL          EWT(i)
		///// MeITol1 =1     scalar     scalar     RTOL*ABS(Y(i)) + ATOL
		///// MeITol1 =2     scalar     array      RTOL*ABS(Y(i)) + ATOL(i)
		///// MeITol1 =3     array      scalar     RTOL(i)*ABS(Y(i)) + ATOL
		///// MeITol1 =4     array      array      RTOL(i)*ABS(Y(i)) + ATOL(i)
		///// </summary>
		//public int ITol
		//{
		//    get { return MeITol; }
		//    set { MeITol = value; }
		//}

		#endregion Properties

		#region Internal Metods

		internal override void InitializeRungeKuttaClasses()
		{
			_hinit = new HINIT();
			_cdopri = new CDOPRI();
			_contd5 = new CONTD5(_CONDO5);
			_dopcor = new DOPCOR(_hinit, _cdopri, _CONDO5);
			this._Dopri5 = new DOPRI5(_dopcor);

			base._RKSolOut = new RKSolOut(this._contd5);
		}