1 |
aw0a |
1 |
/* |
2 |
|
|
* Lsode.h |
3 |
|
|
* by Kirk Abbott and Ben Allan |
4 |
|
|
* Created: 1/94 |
5 |
|
|
* Version: $Revision: 1.6 $ |
6 |
|
|
* Version control file: $RCSfile: Lsode.h,v $ |
7 |
|
|
* Date last modified: $Date: 1997/07/18 12:23:18 $ |
8 |
|
|
* Last modified by: $Author: mthomas $ |
9 |
|
|
* |
10 |
|
|
* This file is part of the ASCEND Tcl/Tk interface |
11 |
|
|
* |
12 |
|
|
* Copyright 1997, Carnegie Mellon University |
13 |
|
|
* |
14 |
|
|
* The ASCEND Tcl/Tk interface is free software; you can redistribute |
15 |
|
|
* it and/or modify it under the terms of the GNU General Public License as |
16 |
|
|
* published by the Free Software Foundation; either version 2 of the |
17 |
|
|
* License, or (at your option) any later version. |
18 |
|
|
* |
19 |
|
|
* The ASCEND Tcl/Tk interface is distributed in hope that it will be |
20 |
|
|
* useful, but WITHOUT ANY WARRANTY; without even the implied warranty of |
21 |
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
22 |
|
|
* General Public License for more details. |
23 |
|
|
* |
24 |
|
|
* You should have received a copy of the GNU General Public License |
25 |
|
|
* along with the program; if not, write to the Free Software Foundation, |
26 |
|
|
* Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check the file named |
27 |
|
|
* COPYING. COPYING is found in ../compiler. |
28 |
|
|
*/ |
29 |
|
|
|
30 |
jds |
54 |
/** @file |
31 |
|
|
* Lsode Integrator. |
32 |
|
|
* <pre> |
33 |
|
|
* NOTE: The macro DOTIME is defined inside Lsode.c. |
34 |
|
|
* If its value is TRUE, we spew all sorts of time junk. |
35 |
|
|
* If FALSE we are quiet. Default for this macro is FALSE. |
36 |
|
|
* |
37 |
|
|
* Requires #include "utilities/ascConfig.h" |
38 |
|
|
* #include "solver/slv_client.h" |
39 |
|
|
* #include "interface/Integrators.h" |
40 |
|
|
* </pre> |
41 |
|
|
*/ |
42 |
|
|
|
43 |
aw0a |
1 |
#ifndef lsode__already_included |
44 |
|
|
#define lsode__already_included |
45 |
|
|
|
46 |
jds |
54 |
extern void Asc_BLsodeIntegrate(slv_system_t sys, |
47 |
|
|
unsigned long start_index, |
48 |
|
|
unsigned long finish_index, |
49 |
|
|
struct Integ_system_t *blsys); |
50 |
|
|
/**< |
51 |
|
|
* <!-- void Asc_BLsodeIntegrate(sys,start_index, finish_index,blsys) --> |
52 |
aw0a |
1 |
* Takes the start and finish index as defined by the user and carries |
53 |
|
|
* out the integration using repeated calls to the function lsode. |
54 |
|
|
* Assumes sys corresponds to g_solvinst_cur. |
55 |
|
|
* works off instances of type blsode taken from blsys. |
56 |
|
|
*/ |
57 |
|
|
|
58 |
jds |
54 |
#endif /* lsode__already_included */ |
59 |
aw0a |
1 |
|