Source position: ctgl.pas line 9186
type TglFragmentLightModelfvSGIX = procedure(
pname: GLenum;
params: PGLfloat
);