# RCSid $Id: illum_tfunc.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
# A transfunc window to turn into a light source with mkillum

#@mkillum l+ f=tfunc_ill c=a d=100 s=128

void transfunc tfunc_mat
2 absdf aniso.cal
0
11 .9 .9 .9 .05 .8 .9 .1 .02 0 0 1

tfunc_mat polygon tfunc_window
0
0
12
	-8.1	1	1
	-8.1	4	1
	-8.1	4	2
	-8.1	1	2