ray/lib/orange.cal

{
        orange.cal - texture for orange

        orange must be unit sphere centered at origin

        A1 = angular frequency
}
otex_psiz : .006;                       { was .003 }
otex_rand : .6;

otex_dx = otex_psiz * PI*sin(2*otex_X)/2*Py/otex_rad/A1 / otex_denom;

otex_dy = otex_psiz * -PI*sin(2*otex_X)/2*Px/otex_rad/A1 / otex_denom;

otex_dz = otex_psiz * PI*(sin(2*otex_X)/2*(Pz*Atan2(Py,Px)-1/sqrt(3)) +
                sin(2*otex_Y)/sqrt(3))/otex_rad/A1 / otex_denom;

otex_X = PI * ((Atan2(Py,Px)*otex_rad - acos(Pz)/sqrt(3))/A1 +
                otex_rand*noise3(Px/A1,Py/A1,Pz/A1));
otex_Y = PI * (2*acos(Pz)/sqrt(3)/A1 +
                otex_rand*noise3((Px+1)/A1,(Py+1)/A1,(Pz+1)/A1));
otex_denom = (sq(sin(otex_X))+sq(sin(otex_Y)))^1.5;
otex_rad = sqrt(1-Pz*Pz);
Revision:	1.1
Committed:	Wed Mar 12 17:45:48 2003 UTC (21 years, 3 months ago) by greg
Branch:	MAIN
Log Message:	Added the rest of the missing files to ray/lib/
#	User	Rev	Content
1	greg	1.1	{
2			orange.cal - texture for orange
3
4			orange must be unit sphere centered at origin
5
6			A1 = angular frequency
7			}
8			otex_psiz : .006; { was .003 }
9			otex_rand : .6;
10
11			otex_dx = otex_psiz * PIsin(2otex_X)/2*Py/otex_rad/A1 / otex_denom;
12
13			otex_dy = otex_psiz * -PIsin(2otex_X)/2*Px/otex_rad/A1 / otex_denom;
14
15			otex_dz = otex_psiz * PI(sin(2otex_X)/2(PzAtan2(Py,Px)-1/sqrt(3)) +
16			sin(2*otex_Y)/sqrt(3))/otex_rad/A1 / otex_denom;
17
18			otex_X = PI * ((Atan2(Py,Px)*otex_rad - acos(Pz)/sqrt(3))/A1 +
19			otex_rand*noise3(Px/A1,Py/A1,Pz/A1));
20			otex_Y = PI * (2*acos(Pz)/sqrt(3)/A1 +
21			otex_rand*noise3((Px+1)/A1,(Py+1)/A1,(Pz+1)/A1));
22			otex_denom = (sq(sin(otex_X))+sq(sin(otex_Y)))^1.5;
23			otex_rad = sqrt(1-Pz*Pz);