--- ray/src/common/zeroes.c 1989/02/02 10:41:51 1.1 +++ ray/src/common/zeroes.c 2003/07/17 09:21:29 2.5 @@ -1,24 +1,25 @@ -/* Copyright (c) 1986 Regents of the University of California */ - #ifndef lint -static char SCCSid[] = "$SunId$ LBL"; +static const char RCSid[] = "$Id: zeroes.c,v 2.5 2003/07/17 09:21:29 schorsch Exp $"; #endif - /* * zeroes.c - compute roots for various equations. * - * 8/19/85 + * External symbols declared in standard.h */ -#define FTINY 1e-7 +#include "copyright.h" +#include + +#include "fvect.h" +#include "rtmath.h" + int quadratic(r, a, b, c) /* find real roots of quadratic equation */ double *r; /* roots in ascending order */ double a, b, c; { - double fabs(), sqrt(); double disc; int first;