# RCSid $Id: glass_ill.rad,v 1.1 2018/11/20 17:12:41 greg Exp $
# A clear glazing used to create rectangular illum at window
# mkillum -ab 0 !oconv -i glass.oct illum_glass.rad
#@mkillum !
# mkillum f=glass_ill c=d d=50 s=64

void glass glass_clear
0
0
3
               0.92               0.92               0.92

void colordata illum_mat.dist
9 red green blue glass_illR.dat glass_illG.dat glass_illB.dat
	illum.cal il_alth il_azih
0
9
	0.000000	1.000000	0.000000
	0.000000	0.000000	1.000000
	1.000000	0.000000	0.000000

illum_mat.dist illum illum_mat
1 glass_clear
0
3 0.946982 0.577398 0.452005

illum_mat polygon clear_glazing
0
0
12
               -8.1                  1                  1
               -8.1                  4                  1
               -8.1                  4                  2
               -8.1                  1                  2