| 7 |
|
|
| 8 |
|
#include "ray.h" |
| 9 |
|
#include "random.h" |
| 10 |
+ |
#include "paths.h" |
| 11 |
|
#include "resolu.h" |
| 12 |
|
|
| 13 |
|
#define NTRUNKBR 4 /* number of branches at trunk */ |
| 30 |
|
COLOR intens; /* output times solid angle */ |
| 31 |
|
} LOSTLIGHT; |
| 32 |
|
|
| 32 |
– |
extern char *progname; |
| 33 |
– |
|
| 33 |
|
FVECT scene_cent; /* center of octree cube */ |
| 34 |
|
RREAL scene_rad; /* radius to get outside cube from center */ |
| 35 |
|
|
| 115 |
|
VCOPY(myray.rdir, sdir); |
| 116 |
|
myray.rmax = 0.; |
| 117 |
|
ray_trace(&myray); |
| 118 |
< |
setcolr(leaf->val, colval(myray.rcol,RED), |
| 120 |
< |
colval(myray.rcol,GRN), |
| 121 |
< |
colval(myray.rcol,BLU)); |
| 118 |
> |
scolor_colr(leaf->val, myray.rcol); |
| 119 |
|
} |
| 120 |
|
|
| 121 |
|
/* Initialize a branch node contained in the given spherical triangle */ |
| 184 |
|
|
| 185 |
|
/* Sample sphere using triangular geodesic mesh */ |
| 186 |
|
TRITREE * |
| 187 |
< |
geosample(int nsamps) |
| 187 |
> |
geosample(long nsamps) |
| 188 |
|
{ |
| 189 |
|
int depth; |
| 190 |
|
TRITREE *tree; |
| 193 |
|
/* figure out depth */ |
| 194 |
|
if ((nsamps -= 4) < 0) |
| 195 |
|
error(USER, "minimum number of samples is 4"); |
| 196 |
< |
nsamps = nsamps*3/NTRUNKBR; /* round up */ |
| 196 |
> |
nsamps = nsamps*(NTRUNKBR-1)/NTRUNKBR; /* round up */ |
| 197 |
|
for (depth = 0; nsamps > 1; depth++) |
| 198 |
|
nsamps >>= 2; |
| 199 |
|
/* make base tetrahedron */ |
| 501 |
|
TRITREE *samptree; |
| 502 |
|
double thresh = 0; |
| 503 |
|
int i; |
| 504 |
< |
|
| 505 |
< |
progname = argv[0]; |
| 504 |
> |
|
| 505 |
> |
fixargv0(argv[0]); /* sets global progname */ |
| 506 |
> |
|
| 507 |
|
for (i = 1; i < argc && argv[i][0] == '-'; i++) |
| 508 |
|
switch (argv[i][1]) { |
| 509 |
|
case 'd': /* number of samples */ |