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.2
Committed:	Tue Mar 18 17:30:17 2003 UTC (22 years, 7 months ago) by greg
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.1:	+0 -0 lines
State:	*FILE REMOVED*
Log Message:	Decided to move ray/lib directory into non-CVS distribution
#	Content
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);