lsode.cc File Reference

#include <string>
#include <iomanip>
#include <iostream>
#include "LSODE.h"
#include "lo-mappers.h"
#include "defun.h"
#include "error.h"
#include "gripes.h"
#include "oct-obj.h"
#include "ov-fcn.h"
#include "ov-cell.h"
#include "pager.h"
#include "pr-output.h"
#include "unwind-prot.h"
#include "utils.h"
#include "variables.h"
#include "LSODE-opts.cc"

Include dependency graph for lsode.cc:

Go to the source code of this file.

Macros
#define	LSODE_ABORT()   return retval
#define	LSODE_ABORT1(msg)
#define	LSODE_ABORT2(fmt, arg)

Functions
OCTAVE_EXPORT octave_value_list	Flsode (const octave_value_list &args, int nargout)
ColumnVector	lsode_user_function (const ColumnVector &x, double t)
Matrix	lsode_user_jacobian (const ColumnVector &x, double t)

Variables
static int	call_depth = 0
static octave_function *	lsode_fcn
static octave_function *	lsode_jac
static bool	warned_fcn_imaginary = false
static bool	warned_jac_imaginary = false

Macro Definition Documentation

#define LSODE_ABORT

(

)

return retval

Definition at line 140 of file lsode.cc.

Referenced by Flsode().

#define LSODE_ABORT1

(

msg

)

Value:

do \
    { \
      ::error ("lsode: " msg); \
      LSODE_ABORT (); \
    } \
  while (0)

Definition at line 143 of file lsode.cc.

Referenced by Flsode().

#define LSODE_ABORT2	(		fmt,
			arg
	)

Value:

do \
    { \
      ::error ("lsode: " fmt, arg); \
      LSODE_ABORT (); \
    } \
  while (0)

Definition at line 151 of file lsode.cc.

Function Documentation

OCTAVE_EXPORT octave_value_list Flsode	(	const octave_value_list &	args,
		int	nargout
	)

Definition at line 275 of file lsode.cc.

References octave_value::all_strings(), octave_value::cell_value(), clear_function(), error(), LSODE::error_message(), error_state, extract_function(), octave_value::function_value(), ODE::integrate(), base_diff_eqn::integration_ok(), base_diff_eqn::integration_state(), octave_value::is_cell(), octave_value::is_function_handle(), octave_value::is_inline_function(), Array< T >::length(), LSODE_ABORT, LSODE_ABORT1, lsode_opts, lsode_user_function(), lsode_user_jacobian(), print_usage(), action_container::protect_var(), octave_value::rows(), ODEFunc::set_jacobian_function(), LSODE_options::set_options(), state, unique_symbol_name(), warned_fcn_imaginary, and warned_jac_imaginary.

ColumnVector lsode_user_function	(	const ColumnVector &	x,
		double	t
	)

Definition at line 63 of file lsode.cc.

References octave_base_value::do_multi_index_op(), error_state, gripe_user_supplied_eval(), octave_value_list::length(), Array< T >::length(), warned_fcn_imaginary, warning(), and x.

Referenced by Flsode().

Matrix lsode_user_jacobian	(	const ColumnVector &	x,
		double	t
	)

Definition at line 102 of file lsode.cc.

References octave_base_value::do_multi_index_op(), error_state, gripe_user_supplied_eval(), octave_value_list::length(), Array< T >::length(), warned_jac_imaginary, warning(), and x.

Referenced by Flsode().

Variable Documentation

int call_depth = 0

static

Definition at line 60 of file lsode.cc.

octave_function* lsode_fcn

static

Definition at line 50 of file lsode.cc.

octave_function* lsode_jac

static

Definition at line 53 of file lsode.cc.

bool warned_fcn_imaginary = false

static

Definition at line 56 of file lsode.cc.

Referenced by Flsode(), and lsode_user_function().

bool warned_jac_imaginary = false

static

Definition at line 57 of file lsode.cc.

Referenced by Flsode(), and lsode_user_jacobian().