00001 /* 00002 00003 Copyright (C) 2002 John W. Eaton 00004 00005 This file is part of Octave. 00006 00007 Octave is free software; you can redistribute it and/or modify it 00008 under the terms of the GNU General Public License as published by the 00009 Free Software Foundation; either version 2, or (at your option) any 00010 later version. 00011 00012 Octave is distributed in the hope that it will be useful, but WITHOUT 00013 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 00014 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 00015 for more details. 00016 00017 You should have received a copy of the GNU General Public License 00018 along with Octave; see the file COPYING. If not, write to the Free 00019 Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. 00020 00021 */ 00022 00023 #if defined (__GNUG__) && defined (USE_PRAGMA_INTERFACE_IMPLEMENTATION) 00024 #pragma implementation 00025 #endif 00026 00027 #ifdef HAVE_CONFIG_H 00028 #include <config.h> 00029 #endif 00030 00031 #include "ODES.h" 00032 #include "lo-error.h" 00033 00034 void 00035 ODES::initialize (const ColumnVector& xx, double tt) 00036 { 00037 base_diff_eqn::initialize (xx, tt); 00038 xdot = ColumnVector (xx.length (), 0.0); 00039 } 00040 00041 void 00042 ODES::initialize (const ColumnVector& xx, double tt, 00043 const ColumnVector& xtheta) 00044 { 00045 base_diff_eqn::initialize (xx, tt); 00046 xdot = ColumnVector (xx.length (), 0.0); 00047 theta = xtheta; 00048 } 00049 00050 /* 00051 ;;; Local Variables: *** 00052 ;;; mode: C++ *** 00053 ;;; End: *** 00054 */
SEO | [PR] 爆速!無料ブログ 無料ホームページ開設 無料ライブ放送 | ||