src/cv/tilt.cal

{ SCCSid "$SunId$ LBL" }

{
        tilt.cal - tilt data for IES luminaires
}

tilt_ang = Acos(Kz) / DEGREE;
tilt_xang = if(Jy*Jy-FTINY, Asin(Jy/sqrt(Jy*Jy+Jz*Jz))/DEGREE, 0);

tilt_ang2 = tri(tilt_ang, 90);
tilt_xang2 = tri(tilt_xang, 90);
Revision:	2.2
Committed:	Thu Jun 2 09:10:17 1994 UTC (29 years, 10 months ago) by greg
Branch:	MAIN
Changes since 2.1:	+1 -1 lines
Log Message:	fixed warnings caused by certain orientations
#	User	Rev	Content
1	greg	1.1	{ SCCSid "$SunId$ LBL" }
2
3			{
4			tilt.cal - tilt data for IES luminaires
5			}
6
7			tilt_ang = Acos(Kz) / DEGREE;
8	greg	2.2	tilt_xang = if(JyJy-FTINY, Asin(Jy/sqrt(JyJy+Jz*Jz))/DEGREE, 0);
9	greg	1.1
10			tilt_ang2 = tri(tilt_ang, 90);
11			tilt_xang2 = tri(tilt_xang, 90);