Mercurial > octave

comparison liboctave/DASRT.cc @ 11586:12df7854fa7c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
strip trailing whitespace from source files
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:24:59 -0500
parents a83bad07f7e3
children 72c96de7a403
comparison
equal deleted inserted replaced
11585:1473d0cf86d2 11586:12df7854fa7c
56 F77_FUNC (ddasrt, DDASRT) (dasrt_fcn_ptr, const octave_idx_type&, 56 F77_FUNC (ddasrt, DDASRT) (dasrt_fcn_ptr, const octave_idx_type&,
57 double&, double*, double*, const double&, 57 double&, double*, double*, const double&,
58 octave_idx_type*, const double*, 58 octave_idx_type*, const double*,
59 const double*, octave_idx_type&, double*, 59 const double*, octave_idx_type&, double*,
60 const octave_idx_type&, octave_idx_type*, 60 const octave_idx_type&, octave_idx_type*,
61 const octave_idx_type&, double*, 61 const octave_idx_type&, double*,
62 octave_idx_type*, dasrt_jac_ptr, 62 octave_idx_type*, dasrt_jac_ptr,
63 dasrt_constr_ptr, const octave_idx_type&, 63 dasrt_constr_ptr, const octave_idx_type&,
64 octave_idx_type*); 64 octave_idx_type*);
65 } 65 }
66 66
128 return 0; 128 return 0;
129 } 129 }
130 130
131 static octave_idx_type 131 static octave_idx_type
132 ddasrt_g (const octave_idx_type& neq, const double& t, const double *state, 132 ddasrt_g (const octave_idx_type& neq, const double& t, const double *state,
133 const octave_idx_type& ng, double *gout, double *, octave_idx_type *) 133 const octave_idx_type& ng, double *gout, double *, octave_idx_type *)
134 { 134 {
135 BEGIN_INTERRUPT_WITH_EXCEPTIONS; 135 BEGIN_INTERRUPT_WITH_EXCEPTIONS;
136 136
137 octave_idx_type n = neq; 137 octave_idx_type n = neq;
138 138
442 442
443 return retval; 443 return retval;
444 } 444 }
445 445
446 DASRT_result 446 DASRT_result
447 DASRT::integrate (const ColumnVector& tout, const ColumnVector& tcrit) 447 DASRT::integrate (const ColumnVector& tout, const ColumnVector& tcrit)
448 { 448 {
449 DASRT_result retval; 449 DASRT_result retval;
450 450
451 Matrix x_out; 451 Matrix x_out;
452 Matrix xdot_out; 452 Matrix xdot_out;