0024310: TKOpenGl - GLSL compatibility issues

Lights defintion clean up:
- remove duplicated enumeration TLightType (equals to Visual3d_TypeOfLightSource)
- remove unused fields from Graphic3d_CLight
- OpenGl_Light, reuse Graphic3d_CLight definition

Phong GLSL program:
- move out cumulative ambient light intencity from limited list of lights
- compatibility issues, replace array of structures (light sources, materials, clipping planes) with arrays of primitive types

New Draw Harness command vlight to alter light sources definition.

OpenGl_ShaderProgram::Initialize() - add missing Linker log

src/V3d/V3d_Light.cdl

@@ -106,6 +106,10 @@ is
 	---Level: Public
 	---Purpose: returns true if the light is a headlight
 
+  SetHeadlight( me : mutable; theValue : Boolean from Standard ) is static;
+  ---Level: Public
+  ---Purpose: Setup headlight flag.
+
         IsDisplayed( me ) returns Boolean from Standard;
         ---Level: Public
         ---Purpose: Returns TRUE when a light representation is displayed

src/V3d/V3d_Light.cxx

@@ -114,6 +114,11 @@ Standard_Boolean V3d_Light::Headlight() const {
   return MyLight->Headlight();
 }
 
+void V3d_Light::SetHeadlight (const Standard_Boolean theValue)
+{
+  MyLight->SetHeadlight (theValue);
+}
+
 void V3d_Light::SymetricPointOnSphere (const Handle(V3d_View)& aView, const Graphic3d_Vertex &Center, const Graphic3d_Vertex &aPoint, const Standard_Real Rayon, Standard_Real& X, Standard_Real& Y, Standard_Real& Z, Standard_Real& VX, Standard_Real& VY, Standard_Real& VZ ) {
 
   Standard_Real X0,Y0,Z0,XP,YP,ZP;