コード例 #1
0
        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);
        }
コード例 #2
0
ファイル: radau5.cs プロジェクト: davidsiaw/neuron
        public RADCOR()
        {
            #region Initialization Common Blocks

            CommonBlock CONRA5 = new CommonBlock(4, 4, 0, 0);
            CommonBlock LINAL = new CommonBlock(0, 7, 0, 0);
            #endregion
            #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
            #region Set Dependencies

            this._decomr = decomr; this._decomc = decomc; this._slvrad = slvrad; this._estrad = estrad;
            #endregion
            #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
            #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
            #endregion
        }
コード例 #3
0
ファイル: radau5.cs プロジェクト: davidsiaw/neuron
        public RADAU5()
        {
            #region Initialization Common Blocks

            CommonBlock CONRA5 = new CommonBlock(4, 4, 0, 0);
            CommonBlock LINAL = new CommonBlock(0, 7, 0, 0);
            #endregion
            #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
            #region Set Dependencies

            this._radcor = radcor;
            #endregion
        }
コード例 #4
0
ファイル: radau5.cs プロジェクト: davidsiaw/neuron
        public RADCOR(DECOMR decomr, DECOMC decomc, SLVRAD slvrad, ESTRAD estrad, CommonBlock CONRA5, CommonBlock LINAL)
        {
            #region Set Dependencies

            this._decomr = decomr; this._decomc = decomc; this._slvrad = slvrad; this._estrad = estrad;
            #endregion
            #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
            #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
            #endregion
        }