Source position: ctgl.pas line 10002
type TglProgramUniform1fEXT = procedure(
program_: GLuint;
location: GLint;
v0: GLfloat
);