1 #ifndef OSKAR_DIERCKX_FPRATI_H_ 2 #define OSKAR_DIERCKX_FPRATI_H_ 3 4 /** 5 * @file oskar_dierckx_fprati.h 6 */ 7 8 #ifdef __cplusplus 9 extern "C" { 10 #endif 11 12 /** 13 * @details 14 * Given three points (p1,f1),(p2,f2) and (p3,f3), function fprati 15 * gives the value of p such that the rational interpolating function 16 * of the form r(p) = (u*p+v)/(p+w) equals zero at p. 17 */ 18 double oskar_dierckx_fprati(double *p1, double *f1, double p2, double f2, 19 double *p3, double *f3); 20 21 #ifdef __cplusplus 22 } 23 #endif 24 25 #endif /* OSKAR_DIERCKX_FPRATI_H_ */ 26