← Back to branch summary

~ubuntu-branches/debian/sid/gsl/sid

« back to all changes in this revision

Viewing changes to multiroots/hybridj.c

  • Committer: Bazaar Package Importer
  • Author(s): Dirk Eddelbuettel
  • Date: 2008-12-16 06:17:55 UTC
  • mfrom: (1.3.2 upstream) (3.1.15 jaunty)
  • Revision ID: james.westby@ubuntu.com-20081216061755-9la7p0qwrhopk8pl
Tags: 1.12+dfsg-1
* New upstream version released today

* doc/*: As before, removed the 'non-free' documentation to create a 
  source package that complies with Debian's interpretation of what is free. 

Show diffs side-by-side

added added

removed removed

Lines of Context:
multiroots/hybridj.c
61
61
static int hybridj_alloc (void *vstate, size_t n);
62
62
static int hybridj_set (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx);
63
63
static int hybridsj_set (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx);
64
 
static int set (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale);
 
64
static int hybridj_set_impl (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale);
65
65
static int hybridj_iterate (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx);
66
66
static void hybridj_free (void *vstate);
67
 
static int iterate (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale);
 
67
static int hybridj_iterate_impl (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale);
68
68
 
69
69
static int
70
70
hybridj_alloc (void *vstate, size_t n)
311
311
static int
312
312
hybridj_set (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx)
313
313
{
314
 
  int status = set (vstate, fdf, x, f, J, dx, 0);
 
314
  int status = hybridj_set_impl (vstate, fdf, x, f, J, dx, 0);
315
315
  return status ;
316
316
}
317
317
 
318
318
static int
319
319
hybridsj_set (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx)
320
320
{
321
 
  int status = set (vstate, fdf, x, f, J, dx, 1);
 
321
  int status = hybridj_set_impl (vstate, fdf, x, f, J, dx, 1);
322
322
  return status ;
323
323
}
324
324
 
325
325
static int
326
 
set (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale)
 
326
hybridj_set_impl (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale)
327
327
{
328
328
  hybridj_state_t *state = (hybridj_state_t *) vstate;
329
329
 
365
365
static int
366
366
hybridj_iterate (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx)
367
367
{
368
 
  int status = iterate (vstate, fdf, x, f, J, dx, 0);
 
368
  int status = hybridj_iterate_impl (vstate, fdf, x, f, J, dx, 0);
369
369
  return status;
370
370
}
371
371
 
372
372
static int
373
373
hybridsj_iterate (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx)
374
374
{
375
 
  int status = iterate (vstate, fdf, x, f, J, dx, 1);
 
375
  int status = hybridj_iterate_impl (vstate, fdf, x, f, J, dx, 1);
376
376
  return status;
377
377
}
378
378
 
379
379
static int
380
 
iterate (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale)
 
380
hybridj_iterate_impl (void *vstate, gsl_multiroot_function_fdf * fdf, gsl_vector * x, gsl_vector * f, gsl_matrix * J, gsl_vector * dx, int scale)
381
381
{
382
382
  hybridj_state_t *state = (hybridj_state_t *) vstate;
383
383