From 22f703cab05b7cd368f4de9e03991b7664dc5022 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20Frings-F=C3=BCrst?= Date: Mon, 1 Sep 2014 13:56:46 +0200 Subject: Initial import of argyll version 1.5.1-8 --- numlib/zbrent.h | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 numlib/zbrent.h (limited to 'numlib/zbrent.h') diff --git a/numlib/zbrent.h b/numlib/zbrent.h new file mode 100644 index 0000000..2f8aac4 --- /dev/null +++ b/numlib/zbrent.h @@ -0,0 +1,44 @@ +#ifndef ROOT_H +#define ROOT_H + +/* + * Copyright 2000 Graeme W. Gill + * All rights reserved. + * + * This material is licenced under the GNU AFFERO GENERAL PUBLIC LICENSE Version 3 :- + * see the License.txt file for licencing details. + */ + +#ifdef __cplusplus + extern "C" { +#endif + +/* 1 dimentional root finding code */ + +/* Bracket search function */ +/* return 0 on sucess */ +/* -1 on no range */ +/* -2 on too many itterations */ +int zbrac( +double *x1, /* Input and output bracket values */ +double *x2, +double (*func)(void *fdata, double tp), /* function to evaluate */ +void *fdata); /* Opaque data pointer */ + +/* Root finder */ +/* return 0 on sucess */ +/* -1 on root not bracketed */ +/* -2 on too many itterations */ +int zbrent( +double *rv, /* Return value */ +double x1, /* Bracket to search */ +double x2, /* (Min, Max) */ +double tol, /* Desired tollerance */ +double (*func)(void *fdata, double tp), /* function to evaluate */ +void *fdata); /* Opaque data pointer */ + +#ifdef __cplusplus + } +#endif + +#endif /* ROOT_H */ -- cgit v1.2.3