Source position: ctgl.pas line 9185
type TglFragmentLightModelfSGIX = procedure(
pname: GLenum;
param: GLfloat
);