Mercurial > hg > octave-nkf
comparison src/DLD-FUNCTIONS/dassl.cc @ 5275:23b37da9fd5b
[project @ 2005-04-08 16:07:35 by jwe]
author | jwe |
---|---|
date | Fri, 08 Apr 2005 16:07:37 +0000 |
parents | 048db020498c |
children | 4c8a2e4e0717 |
comparison
equal
deleted
inserted
replaced
5274:eae7b40388e9 | 5275:23b37da9fd5b |
---|---|
56 // Is this a recursive call? | 56 // Is this a recursive call? |
57 static int call_depth = 0; | 57 static int call_depth = 0; |
58 | 58 |
59 ColumnVector | 59 ColumnVector |
60 dassl_user_function (const ColumnVector& x, const ColumnVector& xdot, | 60 dassl_user_function (const ColumnVector& x, const ColumnVector& xdot, |
61 double t, int& ires) | 61 double t, octave_idx_type& ires) |
62 { | 62 { |
63 ColumnVector retval; | 63 ColumnVector retval; |
64 | 64 |
65 assert (x.capacity () == xdot.capacity ()); | 65 assert (x.capacity () == xdot.capacity ()); |
66 | 66 |