Source position: ctgl.pas line 9191
type TglFragmentMaterialfSGIX = procedure(
face: GLenum;
pname: GLenum;
param: GLfloat
);