public DECOMR(DEC dec, DECB decb, ELMHES elmhes, DECH dech, CommonBlock LINAL) { #region Set Dependencies this._dec = dec; this._decb = decb; this._elmhes = elmhes; this._dech = dech; #endregion Set Dependencies #region Common varaible Initialization #region Common Block: LINAL Initialization this._linal = LINAL; MLE = LINAL.intData[0]; MUE = LINAL.intData[1]; MBJAC = LINAL.intData[2]; MBB = LINAL.intData[3]; MDIAG = LINAL.intData[4]; MDIFF = LINAL.intData[5]; MBDIAG = LINAL.intData[6]; #endregion Common Block: LINAL Initialization #endregion Common varaible Initialization }
public DECOMR() { #region Initialization Common Blocks CommonBlock LINAL = new CommonBlock(0, 7, 0, 0); #endregion Initialization Common Blocks #region Dependencies (Initialization) DEC dec = new DEC(); DECB decb = new DECB(); ELMHES elmhes = new ELMHES(); DECH dech = new DECH(); #endregion Dependencies (Initialization) #region Set Dependencies this._dec = dec; this._decb = decb; this._elmhes = elmhes; this._dech = dech; #endregion Set Dependencies #region Common varaible Initialization #region Common Block: LINAL Initialization this._linal = LINAL; MLE = LINAL.intData[0]; MUE = LINAL.intData[1]; MBJAC = LINAL.intData[2]; MBB = LINAL.intData[3]; MDIAG = LINAL.intData[4]; MDIFF = LINAL.intData[5]; MBDIAG = LINAL.intData[6]; #endregion Common Block: LINAL Initialization #endregion Common varaible Initialization }
public RADAU5() { #region Initialization Common Blocks CommonBlock CONRA5 = new CommonBlock(4, 4, 0, 0); CommonBlock LINAL = new CommonBlock(0, 7, 0, 0); #endregion Initialization Common Blocks #region Dependencies (Initialization) DEC dec = new DEC(); DECB decb = new DECB(); ELMHES elmhes = new ELMHES(); DECH dech = new DECH(); DECC decc = new DECC(); DECBC decbc = new DECBC(); DECHC dechc = new DECHC(); SOL sol = new SOL(); SOLC solc = new SOLC(); SOLB solb = new SOLB(); SOLBC solbc = new SOLBC(); SOLH solh = new SOLH(); SOLHC solhc = new SOLHC(); DECOMR decomr = new DECOMR(dec, decb, elmhes, dech, LINAL); DECOMC decomc = new DECOMC(decc, decbc, dechc, LINAL); SLVRAD slvrad = new SLVRAD(sol, solc, solb, solbc, solh, solhc, LINAL); ESTRAD estrad = new ESTRAD(sol, solb, solh, LINAL); RADCOR radcor = new RADCOR(decomr, decomc, slvrad, estrad, CONRA5, LINAL); #endregion Dependencies (Initialization) #region Set Dependencies this._radcor = radcor; #endregion Set Dependencies }
public RADCOR() { #region Initialization Common Blocks CommonBlock CONRA5 = new CommonBlock(4, 4, 0, 0); CommonBlock LINAL = new CommonBlock(0, 7, 0, 0); #endregion Initialization Common Blocks #region Dependencies (Initialization) DEC dec = new DEC(); DECB decb = new DECB(); ELMHES elmhes = new ELMHES(); DECH dech = new DECH(); DECC decc = new DECC(); DECBC decbc = new DECBC(); DECHC dechc = new DECHC(); SOL sol = new SOL(); SOLC solc = new SOLC(); SOLB solb = new SOLB(); SOLBC solbc = new SOLBC(); SOLH solh = new SOLH(); SOLHC solhc = new SOLHC(); DECOMR decomr = new DECOMR(dec, decb, elmhes, dech, LINAL); DECOMC decomc = new DECOMC(decc, decbc, dechc, LINAL); SLVRAD slvrad = new SLVRAD(sol, solc, solb, solbc, solh, solhc, LINAL); ESTRAD estrad = new ESTRAD(sol, solb, solh, LINAL); #endregion Dependencies (Initialization) #region Set Dependencies this._decomr = decomr; this._decomc = decomc; this._slvrad = slvrad; this._estrad = estrad; #endregion Set Dependencies #region Common varaible Initialization #region Common Block: CONRA5 Initialization this._conra5 = CONRA5; NN = CONRA5.intData[0]; NN2 = CONRA5.intData[1]; NN3 = CONRA5.intData[2]; NN4 = CONRA5.intData[3]; XSOL = CONRA5.doubleData[0]; HSOL = CONRA5.doubleData[1]; C2M1 = CONRA5.doubleData[2]; C1M1 = CONRA5.doubleData[3]; #endregion Common Block: CONRA5 Initialization #region Common Block: LINAL Initialization this._linal = LINAL; MLE = LINAL.intData[0]; MUE = LINAL.intData[1]; MBJAC = LINAL.intData[2]; MBB = LINAL.intData[3]; MDIAG = LINAL.intData[4]; MDIFF = LINAL.intData[5]; MBDIAG = LINAL.intData[6]; #endregion Common Block: LINAL Initialization #endregion Common varaible Initialization }
internal override void InitializeRungeKuttaClasses() { bbampl = new BBAMPL(); dec = new DEC(); sol = new SOL(); dech = new DECH(); solh = new SOLH(); decc = new DECC(); solc = new SOLC(); dechc = new DECHC(); solhc = new SOLHC(); decb = new DECB(); solb = new SOLB(); decbc = new DECBC(); solbc = new SOLBC(); elmhes = new ELMHES(); //solout = new SOLOUTR(INTERN); contr5 = new CONTR5(CONRA5); decomr = new DECOMR(dec, decb, elmhes, dech, LINAL); decomc = new DECOMC(decc, decbc, dechc, LINAL); slvrar = new SLVRAR(sol, solb, solh, LINAL); slvrai = new SLVRAI(solc, solbc, solhc, LINAL); slvrad = new SLVRAD(sol, solc, solb, solbc, solh, solhc, LINAL); estrad = new ESTRAD(sol, solb, solh, LINAL); estrav = new ESTRAV(sol, solb, solh, LINAL); slvrod = new SLVROD(sol, solb, LINAL); slvseu = new SLVSEU(sol, solb, solh, LINAL); radcor = new RADCOR(decomr, decomc, slvrad, estrad, CONRA5, LINAL); radau5 = new RADAU5(radcor); //dr1_radau5 = new DR1_RADAU5(fvpol, jvpol, solout, bbampl, radau5); base._RKSolOut = new RKSolOut(this.contr5); }