| 111 |
|
for (j = 0; j < 3; j++) |
| 112 |
|
org[j] += .001*fa->norm[j]; |
| 113 |
|
/* send sample */ |
| 114 |
< |
raysamp(distarr+dim[1]*nazi+dim[2], org, dir, rt); |
| 114 |
> |
raysamp(distarr+3*(dim[1]*nazi+dim[2]), org, dir, rt); |
| 115 |
|
} |
| 116 |
|
rayflush(rt); |
| 117 |
|
/* write out the face w/ distribution */ |
| 179 |
|
dir[j] = -dir[j]; |
| 180 |
|
} |
| 181 |
|
/* send sample */ |
| 182 |
< |
raysamp(distarr+dim[1]*nazi+dim[2], org, dir, rt); |
| 182 |
> |
raysamp(distarr+3*(dim[1]*nazi+dim[2]), org, dir, rt); |
| 183 |
|
} |
| 184 |
|
} |
| 185 |
|
rayflush(rt); |
| 243 |
|
.001*co->ad[j]; |
| 244 |
|
|
| 245 |
|
/* send sample */ |
| 246 |
< |
raysamp(distarr+dim[1]*nazi+dim[2], org, dir, rt); |
| 246 |
> |
raysamp(distarr+3*(dim[1]*nazi+dim[2]), org, dir, rt); |
| 247 |
|
} |
| 248 |
|
rayflush(rt); |
| 249 |
|
/* write out the ring w/ distribution */ |