70     color col, diffuse, phongcol;  in shader()  local
89         return obj->tex->col; /* will only use the objects ambient color    */  in shader()
96     col = obj->tex->texfunc(&hit, obj->tex, incident);  in shader()
136                     ColorAddS(&diffuse, &li->tex->col, inten);  in shader()
143                             ColorAddS(&phongcol, &col, phongval);  in shader()
145                             ColorAddS(&phongcol, &(li->tex->col), phongval);  in shader()
154     col.r *= (diffuse.r + obj->tex->ambient); /* do a product of the */  in shader()
155     col.g *= (diffuse.g + obj->tex->ambient); /* diffuse intensity with */  in shader()
156     col.b *= (diffuse.b + obj->tex->ambient); /* object color + ambient */  in shader()
159         ColorAccum(&col, &phongcol);  in shader()
167         ColorAccum(&col, &specol);  in shader()
175         ColorAccum(&col, &transcol);  in shader()
178     return col; /* return the color of the shaded pixel... */  in shader()
183     color col;  in shade_reflection()  local
201     col = trace(&specray); /* trace specular reflection ray */  in shade_reflection()
205     ColorScale(&col, specular);  in shade_reflection()
207     return col;  in shade_reflection()
212     color col;  in shade_transmission()  local
224     col = trace(&transray); /* trace transmission ray */  in shade_transmission()
228     ColorScale(&col, trans);  in shade_transmission()
230     return col;  in shade_transmission()