# | Line 10 | Line 10 | static char SCCSid[] = "$SunId$ LBL"; | |
---|---|---|
10 | * 8/19/85 | |
11 | */ | |
12 | ||
13 | – | #define FTINY 1e-7 |
13 | ||
14 | + | #include <math.h> |
15 | ||
16 | + | #include "fvect.h" |
17 | + | |
18 | + | |
19 | int | |
20 | quadratic(r, a, b, c) /* find real roots of quadratic equation */ | |
21 | double *r; /* roots in ascending order */ | |
22 | double a, b, c; | |
23 | { | |
21 | – | double fabs(), sqrt(); |
24 | double disc; | |
25 | int first; | |
26 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |