Source position: ctglu.pp line 341
type TgluCylinder = procedure(
quadObject: PGLUquadric;
baseRadius: GLdouble;
topRadius: GLdouble;
height: GLdouble;
slices: GLint;
stacks: GLint
);