/usr/share/radiance/noise.cal is in radiance-materials 4R1+20120125-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | frac(x)=x-floor(x);
hermite(p0,p1,r0,r1,t) = p0 * ((2*t-3)*t*t+1) +
p1 * (-2*t+3)*t*t +
r0 * (((t-2)*t+1)*t) +
r1 * ((t-1)*t*t);
rand2a(x) = 1-2*rand(.69692*x);
rand2b(x) = 1-2*rand(.05393*x);
noise(x) = noise_1(floor(x),frac(x),ceil(x));
noise_1(xl,xd,xu) = hermite(
rand2a(xl),
rand2a(xu),
rand2b(xl),
rand2b(xu),
xd);
|