diff options
| author | siddhu8990 | 2016-06-06 09:18:33 +0530 |
|---|---|---|
| committer | siddhu8990 | 2016-06-06 09:18:33 +0530 |
| commit | f08e63e652a564b3f805b69c05948e497c7b28f6 (patch) | |
| tree | d8f4bcc4dc02c668ec38745eaf867dd365fd9992 /2.3-1/src/c/differential_calculus/interfaces/int_ode.h | |
| parent | 49003250e69e4e500742614888e47db789bbe451 (diff) | |
| download | Scilab2C-f08e63e652a564b3f805b69c05948e497c7b28f6.tar.gz Scilab2C-f08e63e652a564b3f805b69c05948e497c7b28f6.tar.bz2 Scilab2C-f08e63e652a564b3f805b69c05948e497c7b28f6.zip | |
File handling functions added
Diffstat (limited to '2.3-1/src/c/differential_calculus/interfaces/int_ode.h')
| -rw-r--r-- | 2.3-1/src/c/differential_calculus/interfaces/int_ode.h | 31 |
1 files changed, 27 insertions, 4 deletions
diff --git a/2.3-1/src/c/differential_calculus/interfaces/int_ode.h b/2.3-1/src/c/differential_calculus/interfaces/int_ode.h index 1cb64497..28f43999 100644 --- a/2.3-1/src/c/differential_calculus/interfaces/int_ode.h +++ b/2.3-1/src/c/differential_calculus/interfaces/int_ode.h @@ -17,11 +17,34 @@ extern "C" { #endif -#define d0d0d0g2oded0(in1, in2, in3, in4) dodes(in1, in2, in3, in4, 1, 1.0e-2,\ - 1.0e-2, 1.0e-6) +#define d0d0d0fn0oded0(in1, in2, in3, func_name) dodes(in1, in2, in3, \ + func_name, "rkf",1, 1.0e-2, 1.0e-2, 1.0e-6, NULL) -#define d2d0d0f0oded2(in1, size1, in2, in3, func_name, out) dodea(in1, in2, in3, func_name, \ - size1[1], 1.0e-2, 1.0e-2, 1.0e-6, size1, out) +#define d2d0d0fn0oded2(in1, size1, in2, in3, func_name, out) dodea(in1, \ + in2, in3, func_name, "rkf",size1[1], 1.0e-2, 1.0e-2, \ + 1.0e-6, size1, out) + +#define d0d0d2fn0oded2(in1, in2, in3, size3, func_name, out) dodea(in1, in2, \ + in3, func_name, "rkf", 1, 1.0e-2, 1.0e-2, 1.0e-6, size3, out) + +#define d2d0d2fn0oded2(in1, size1, in2, in3, size3, func_name, out) dodea(in1, \ + in2, in3, func_name, "rkf",size1[1], 1.0e-2, 1.0e-2, \ + 1.0e-6, size1, out) + +#define g2d0d0d0fn0oded0(solvertype, typesize, in1, in2, in3, func_name) dodes(in1, in2, in3, \ + func_name, solvertype, 1, 1.0e-2, 1.0e-2, 1.0e-6, NULL) + +#define g2d2d0d0fn0oded2(solvertype, typesize, in1, size1, in2, in3, func_name, out) \ + dodea(in1, in2, in3, func_name, solvertype, size1[1], \ + 1.0e-2, 1.0e-2, 1.0e-6, size1, out) + +#define g2d0d0d2fn0oded2(solvertype, typesize, in1, in2, in3, size3, func_name, out) \ + dodea(in1, in2, in3, func_name, solvertype,1, 1.0e-2, 1.0e-2, \ + 1.0e-6, size3, out) + +#define g2d2d0d2fn0oded2(solvertype, typesize, in1, size1, in2, in3, size3, func_name, out) dodea(in1, \ + in2, in3, func_name, solvertype, size1[1], 1.0e-2, 1.0e-2, \ + 1.0e-6, size1, out) #ifdef __cplusplus } /* extern "C" */ |