1 |
– |
/* Copyright (c) 1986 Regents of the University of California */ |
2 |
– |
|
1 |
|
#ifndef lint |
2 |
< |
static char SCCSid[] = "$SunId$ LBL"; |
2 |
> |
static const char RCSid[] = "$Id$"; |
3 |
|
#endif |
6 |
– |
|
4 |
|
/* |
5 |
|
* genmarble.c - generate a marble with bubbles inside. |
6 |
|
* |
9 |
|
|
10 |
|
#include <stdio.h> |
11 |
|
|
12 |
+ |
#include <stdlib.h> |
13 |
+ |
|
14 |
|
#include <math.h> |
15 |
|
|
16 |
|
#include "random.h" |
19 |
|
|
20 |
|
typedef double FVECT[3]; |
21 |
|
|
22 |
< |
double bubble(); /* pretty cute, huh? */ |
22 |
> |
static double bubble(); /* pretty cute, huh? */ |
23 |
> |
static void sphere_cart(); |
24 |
|
|
25 |
– |
#ifdef DCL_ATOF |
26 |
– |
extern double atof(); |
27 |
– |
#endif |
25 |
|
|
29 |
– |
|
26 |
|
main(argc, argv) |
27 |
|
int argc; |
28 |
|
char **argv; |
68 |
|
} |
69 |
|
|
70 |
|
|
71 |
< |
double |
71 |
> |
static double |
72 |
|
bubble(v, cent, rad, bubrad) /* compute location of random bubble */ |
73 |
|
FVECT v, cent; |
74 |
|
double rad, bubrad; |
85 |
|
} |
86 |
|
|
87 |
|
|
88 |
+ |
static void |
89 |
|
sphere_cart(v, ro, theta, phi) /* spherical to cartesian coord. conversion */ |
90 |
|
FVECT v; |
91 |
|
double ro, theta, phi; |