Author: Eric Bier on July 3, 1983 12:33 pm

Last edited by Bier on July 3, 1983 3:59 pm

Contents: Procedures implementing shadows (reflections and transparency to come).

DIRECTORY

SVFancyRays: DEFINITIONS =

BEGIN

CSGTree: TYPE = CSG.CSGTree;

LightSourceList: TYPE = Shading.LightSourceList;

Point3d: TYPE = Matrix3d.Point3d;

VisibleLights: PROC [allLights: LightSourceList, surfacePoint: Point3d, tree: CSGTree] RETURNS [visibleLights: LightSourceList];

END.