--- ray/src/rt/glass.c 1996/04/11 15:59:56 2.8 +++ ray/src/rt/glass.c 2003/02/25 02:47:22 2.11 @@ -1,15 +1,12 @@ -/* Copyright (c) 1991 Regents of the University of California */ - #ifndef lint -static char SCCSid[] = "$SunId$ LBL"; +static const char RCSid[] = "$Id: glass.c,v 2.11 2003/02/25 02:47:22 greg Exp $"; #endif - /* * glass.c - simpler shading function for thin glass surfaces. - * - * 11/14/86 */ +#include "copyright.h" + #include "ray.h" #include "otypes.h" @@ -26,7 +23,7 @@ static char SCCSid[] = "$SunId$ LBL"; * modifier glass id * 0 * 0 - * 3 red grn blu + * 3+ red grn blu [refractive_index] * * The color is used for the transmission at normal incidence. * To compute transmissivity (tn) from transmittance (Tn) use: