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-2009 by Boris Houska and Hans Joachim Ferreau, K.U.Leuven. 00006 * Developed within the Optimization in Engineering Center (OPTEC) under 00007 * supervision of Moritz Diehl. All rights reserved. 00008 * 00009 * ACADO Toolkit is free software; you can redistribute it and/or 00010 * modify it under the terms of the GNU Lesser General Public 00011 * License as published by the Free Software Foundation; either 00012 * version 3 of the License, or (at your option) any later version. 00013 * 00014 * ACADO Toolkit is distributed in the hope that it will be useful, 00015 * but WITHOUT ANY WARRANTY; without even the implied warranty of 00016 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00017 * Lesser General Public License for more details. 00018 * 00019 * You should have received a copy of the GNU Lesser General Public 00020 * License along with ACADO Toolkit; if not, write to the Free Software 00021 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA 00022 * 00023 */ 00024 00025 00026 00034 void sparse_dae( DifferentialEquation *f ) 00035 { 00036 int n = 100; 00037 00038 DifferentialState x("x",n,1); 00039 00040 AlgebraicState z; 00041 Parameter p; 00042 00043 *f << dot(x) == - x*z; 00044 *f << 0 == p*p - z*z; 00045 }