Source position: ctgl.pas line 9188
type TglFragmentLightfvSGIX = procedure(
light: GLenum;
pname: GLenum;
params: PGLfloat
);