# | Line 12 | Line 12 | static char SCCSid[] = "$SunId$ LBL"; | |
---|---|---|
12 | ||
13 | #include <stdio.h> | |
14 | ||
15 | + | #include <math.h> |
16 | + | |
17 | #include "random.h" | |
18 | ||
17 | – | |
19 | #define PI 3.14159265359 | |
20 | ||
21 | typedef double FVECT[3]; | |
22 | ||
23 | double bubble(); /* pretty cute, huh? */ | |
24 | ||
25 | + | #ifdef DCL_ATOF |
26 | + | extern double atof(); |
27 | + | #endif |
28 | ||
29 | + | |
30 | main(argc, argv) | |
31 | int argc; | |
32 | char **argv; | |
33 | { | |
29 | – | double atof(); |
34 | char *cmtype, *cname; | |
35 | FVECT cent; | |
36 | double rad; | |
# | Line 73 | Line 77 | bubble(v, cent, rad, bubrad) /* compute location of ra | |
77 | FVECT v, cent; | |
78 | double rad, bubrad; | |
79 | { | |
76 | – | double sqrt(); |
80 | double r, ro, theta, phi; | |
81 | ||
82 | r = frandom()*bubrad; | |
# | Line 90 | Line 93 | sphere_cart(v, ro, theta, phi) /* spherical to cartesi | |
93 | FVECT v; | |
94 | double ro, theta, phi; | |
95 | { | |
93 | – | double sin(), cos(); |
96 | double d; | |
97 | ||
98 | d = sin(phi); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |