(******************************************************************************
*                                LGHT3D1 .DEF                                 *
*                              ABO Software Dep.                              *
*                                                                             *
* Purpose : TO provide shading algorithms FOR 3D graphics.                    *
*                                                                             *
*   Notes :                                                                   *
*                                                                             *
*         Version Date : 22/10/92                                             *
******************************************************************************)

DEFINITION MODULE LGHT3D1;

FROM COLOR1 IMPORT ColorRGB;
FROM PNT3D1 IMPORT Point3D;
VAR
	direction :Point3D;
	color     :ColorRGB;
	ambient   :ColorRGB;

PROCEDURE shade(
	o,n : Point3D;
	c :ColorRGB): ColorRGB;

END LGHT3D1.