1 |
{ RCSid $Id: sphsamp.cal,v 1.2 2005/02/15 23:36:10 greg Exp $ } |
2 |
{ |
3 |
Jittered sampling of a sphere |
4 |
|
5 |
2/15/2005 G. Ward |
6 |
|
7 |
Constant: |
8 |
N - total number of samples on sphere |
9 |
Input: |
10 |
i - sample number [0,N-1] |
11 |
Output: |
12 |
theta - polar angle (0-PI) |
13 |
phi_un - azimuthal angle (unnormalized) |
14 |
phi - azimuthal angle (0-2*PI) |
15 |
Dx - X-component of direction vector |
16 |
Dy - Y-component of direction vector |
17 |
Dz - Z-component of direction vector |
18 |
} |
19 |
S : .7; { jitter amount (0-1) } |
20 |
|
21 |
k : 2*sqrt(PI/N); { k^2 is solid angle of each sample } |
22 |
|
23 |
mod(n,d) : n - floor(n/d)*d; |
24 |
|
25 |
alpha0 = asin(2/N*(i+.5) - 1); |
26 |
|
27 |
theta = alpha0 + PI/2 + k*S*(rand(.35*i+10.3) - .5); |
28 |
phi_un = sqrt(PI*N)*alpha0 + k*S*(rand(-.83*i-17.9) - .5); |
29 |
phi = mod(phi_un, 2*PI); |
30 |
|
31 |
sint = sin(theta); |
32 |
Dx = cos(phi)*sint; |
33 |
Dy = sin(phi)*sint; |
34 |
Dz = cos(theta); |