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 (30 years, 6 months ago) by greg
Branch:	MAIN
Changes since 2.1:	+1 -1 lines
Log Message:	fixed warnings caused by certain orientations
#	Content
1	{ SCCSid "$SunId$ LBL" }
2
3	{
4	tilt.cal - tilt data for IES luminaires
5	}
6
7	tilt_ang = Acos(Kz) / DEGREE;
8	tilt_xang = if(JyJy-FTINY, Asin(Jy/sqrt(JyJy+Jz*Jz))/DEGREE, 0);
9
10	tilt_ang2 = tri(tilt_ang, 90);
11	tilt_xang2 = tri(tilt_xang, 90);