simple_dae_c.cpp
Go to the documentation of this file.
00001 /*
00002  *    This file is part of ACADO Toolkit.
00003  *
00004  *    ACADO Toolkit -- A Toolkit for Automatic Control and Dynamic Optimization.
00005  *    Copyright (C) 2008-2014 by Boris Houska, Hans Joachim Ferreau,
00006  *    Milan Vukov, Rien Quirynen, KU Leuven.
00007  *    Developed within the Optimization in Engineering Center (OPTEC)
00008  *    under supervision of Moritz Diehl. All rights reserved.
00009  *
00010  *    ACADO Toolkit is free software; you can redistribute it and/or
00011  *    modify it under the terms of the GNU Lesser General Public
00012  *    License as published by the Free Software Foundation; either
00013  *    version 3 of the License, or (at your option) any later version.
00014  *
00015  *    ACADO Toolkit is distributed in the hope that it will be useful,
00016  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
00017  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00018  *    Lesser General Public License for more details.
00019  *
00020  *    You should have received a copy of the GNU Lesser General Public
00021  *    License along with ACADO Toolkit; if not, write to the Free Software
00022  *    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
00023  *
00024  */
00025 
00026 
00027 
00035 #include <acado_integrators.hpp>
00036 #include <acado_gnuplot.hpp>
00037 
00038 
00039 /* >>> start tutorial code >>> */
00040 
00041 void ffcn_model( double *xx, double *f, void *user_data ){
00042 
00043     double        x =  xx[ 0];
00044     double        z =  xx[ 1];
00045     double        p =  xx[ 2];
00046     double        q =  xx[ 3];
00047 
00048     f[0] = -p*x*x*z;
00049     f[1] = q*q - z*z + 0.1*x;
00050 
00051 
00052 //    f << dot(x) == -p*x*x*z  ;
00053 //    f <<     0  ==  q*q - z*z;
00054 
00055 }
00056 
00057 
00058 
00059 
00060 int main( ){
00061 
00062     USING_NAMESPACE_ACADO
00063 
00064     // DEFINE A RIGHT-HAND-SIDE:
00065     // -------------------------
00066     DifferentialState         x;
00067     AlgebraicState            z;
00068     Parameter               p,q;
00069 
00070 
00071     IntermediateState is(4);
00072      is(0) = x;
00073      is(1) = z;
00074      is(2) = p;
00075      is(3) = q;
00076 
00077     CFunction simpledaeModel( 2, ffcn_model );
00078 
00079     // Define a Right-Hand-Side:
00080     // -------------------------
00081 
00082     DifferentialEquation f;
00083 
00084     f << simpledaeModel(is);
00085 
00086 
00087 
00088     // DEFINE AN INTEGRATOR:
00089     // ---------------------
00090     IntegratorBDF integrator(f);
00091 
00092 
00093     // DEFINE INITIAL VALUES:
00094     // ----------------------
00095     double x0   =  1.0;
00096     double z0   =  1.000000;
00097 
00098     double pp[2] = { 1.0, 1.0 };
00099 
00100     Grid interval( 0.0, 1.0, 100 );
00101 
00102 
00103     // START THE INTEGRATION:
00104     // ----------------------
00105     integrator.integrate( interval, &x0, &z0, pp );
00106 
00107     VariablesGrid differentialStates;
00108     VariablesGrid algebraicStates   ;
00109     VariablesGrid intermediateStates;
00110 
00111     integrator.getX ( differentialStates );
00112     integrator.getXA( algebraicStates    );
00113     integrator.getI ( intermediateStates );
00114 
00115     GnuplotWindow window;
00116         window.addSubplot( differentialStates(0) );
00117         window.addSubplot( algebraicStates   (0) );
00118 
00119     window.plot();
00120 
00121 
00122     return 0;
00123 }
00124 /* <<< end tutorial code <<< */
00125 
00126 


acado
Author(s): Milan Vukov, Rien Quirynen
autogenerated on Thu Aug 27 2015 12:00:00