fgl.h
上传用户:xk288cn
上传日期:2007-05-28
资源大小:4876k
文件大小:61k
源码类别:

GIS编程

开发平台:

Visual C++

  1. C  GLUT version of "GL/fgl.h"
  2. C  Modifications from SGI IRIX 5.3 version:
  3. C  1)  F prefix removed from OpenGL constants.
  4. C  2)  Constants over 32 characters truncated to 32 characters.
  5. C ***********************************************************
  6. C  AttribMask 
  7.        integer*4   GL_CURRENT_BIT
  8.        parameter ( GL_CURRENT_BIT = 1 ) 
  9.        integer*4   GL_POINT_BIT
  10.        parameter ( GL_POINT_BIT = 2 ) 
  11.        integer*4   GL_LINE_BIT
  12.        parameter ( GL_LINE_BIT = 4 ) 
  13.        integer*4   GL_POLYGON_BIT
  14.        parameter ( GL_POLYGON_BIT = 8 ) 
  15.        integer*4   GL_POLYGON_STIPPLE_BIT
  16.        parameter ( GL_POLYGON_STIPPLE_BIT = 16 ) 
  17.        integer*4   GL_PIXEL_MODE_BIT
  18.        parameter ( GL_PIXEL_MODE_BIT = 32 ) 
  19.        integer*4   GL_LIGHTING_BIT
  20.        parameter ( GL_LIGHTING_BIT = 64 ) 
  21.        integer*4   GL_FOG_BIT
  22.        parameter ( GL_FOG_BIT = 128 ) 
  23.        integer*4   GL_DEPTH_BUFFER_BIT
  24.        parameter ( GL_DEPTH_BUFFER_BIT = 256 ) 
  25.        integer*4   GL_ACCUM_BUFFER_BIT
  26.        parameter ( GL_ACCUM_BUFFER_BIT = 512 ) 
  27.        integer*4   GL_STENCIL_BUFFER_BIT
  28.        parameter ( GL_STENCIL_BUFFER_BIT = 1024 ) 
  29.        integer*4   GL_VIEWPORT_BIT
  30.        parameter ( GL_VIEWPORT_BIT = 2048 ) 
  31.        integer*4   GL_TRANSFORM_BIT
  32.        parameter ( GL_TRANSFORM_BIT = 4096 ) 
  33.        integer*4   GL_ENABLE_BIT
  34.        parameter ( GL_ENABLE_BIT = 8192 ) 
  35.        integer*4   GL_COLOR_BUFFER_BIT
  36.        parameter ( GL_COLOR_BUFFER_BIT = 16384 ) 
  37.        integer*4   GL_HINT_BIT
  38.        parameter ( GL_HINT_BIT = 32768 ) 
  39.        integer*4   GL_EVAL_BIT
  40.        parameter ( GL_EVAL_BIT = 65536 ) 
  41.        integer*4   GL_LIST_BIT
  42.        parameter ( GL_LIST_BIT = 131072 ) 
  43.        integer*4   GL_TEXTURE_BIT
  44.        parameter ( GL_TEXTURE_BIT = 262144 ) 
  45.        integer*4   GL_SCISSOR_BIT
  46.        parameter ( GL_SCISSOR_BIT = 524288 ) 
  47.        integer*4   GL_ALL_ATTRIB_BITS
  48.        parameter ( GL_ALL_ATTRIB_BITS = 1048575 ) 
  49. C       GL_MULTISAMPLE_BIT_EXT 
  50. C  ClearBufferMask 
  51. C       GL_COLOR_BUFFER_BIT 
  52. C       GL_ACCUM_BUFFER_BIT 
  53. C       GL_STENCIL_BUFFER_BIT 
  54. C       GL_DEPTH_BUFFER_BIT 
  55. C  Boolean 
  56.        integer*4   GL_FALSE
  57.        parameter ( GL_FALSE = 0 ) 
  58.        integer*4   GL_TRUE
  59.        parameter ( GL_TRUE = 1 ) 
  60. C  BeginMode 
  61.        integer*4   GL_POINTS
  62.        parameter ( GL_POINTS = 0 ) 
  63.        integer*4   GL_LINES
  64.        parameter ( GL_LINES = 1 ) 
  65.        integer*4   GL_LINE_LOOP
  66.        parameter ( GL_LINE_LOOP = 2 ) 
  67.        integer*4   GL_LINE_STRIP
  68.        parameter ( GL_LINE_STRIP = 3 ) 
  69.        integer*4   GL_TRIANGLES
  70.        parameter ( GL_TRIANGLES = 4 ) 
  71.        integer*4   GL_TRIANGLE_STRIP
  72.        parameter ( GL_TRIANGLE_STRIP = 5 ) 
  73.        integer*4   GL_TRIANGLE_FAN
  74.        parameter ( GL_TRIANGLE_FAN = 6 ) 
  75.        integer*4   GL_QUADS
  76.        parameter ( GL_QUADS = 7 ) 
  77.        integer*4   GL_QUAD_STRIP
  78.        parameter ( GL_QUAD_STRIP = 8 ) 
  79.        integer*4   GL_POLYGON
  80.        parameter ( GL_POLYGON = 9 ) 
  81. C  AccumOp 
  82.        integer*4   GL_ACCUM
  83.        parameter ( GL_ACCUM = 256 ) 
  84.        integer*4   GL_LOAD
  85.        parameter ( GL_LOAD = 257 ) 
  86.        integer*4   GL_RETURN
  87.        parameter ( GL_RETURN = 258 ) 
  88.        integer*4   GL_MULT
  89.        parameter ( GL_MULT = 259 ) 
  90.        integer*4   GL_ADD
  91.        parameter ( GL_ADD = 260 ) 
  92. C  AlphaFunction 
  93.        integer*4   GL_NEVER
  94.        parameter ( GL_NEVER = 512 ) 
  95.        integer*4   GL_LESS
  96.        parameter ( GL_LESS = 513 ) 
  97.        integer*4   GL_EQUAL
  98.        parameter ( GL_EQUAL = 514 ) 
  99.        integer*4   GL_LEQUAL
  100.        parameter ( GL_LEQUAL = 515 ) 
  101.        integer*4   GL_GREATER
  102.        parameter ( GL_GREATER = 516 ) 
  103.        integer*4   GL_NOTEQUAL
  104.        parameter ( GL_NOTEQUAL = 517 ) 
  105.        integer*4   GL_GEQUAL
  106.        parameter ( GL_GEQUAL = 518 ) 
  107.        integer*4   GL_ALWAYS
  108.        parameter ( GL_ALWAYS = 519 ) 
  109. C  BlendingFactorDest 
  110.        integer*4   GL_ZERO
  111.        parameter ( GL_ZERO = 0 ) 
  112.        integer*4   GL_ONE
  113.        parameter ( GL_ONE = 1 ) 
  114.        integer*4   GL_SRC_COLOR
  115.        parameter ( GL_SRC_COLOR = 768 ) 
  116.        integer*4   GL_ONE_MINUS_SRC_COLOR
  117.        parameter ( GL_ONE_MINUS_SRC_COLOR = 769 ) 
  118.        integer*4   GL_SRC_ALPHA
  119.        parameter ( GL_SRC_ALPHA = 770 ) 
  120.        integer*4   GL_ONE_MINUS_SRC_ALPHA
  121.        parameter ( GL_ONE_MINUS_SRC_ALPHA = 771 ) 
  122.        integer*4   GL_DST_ALPHA
  123.        parameter ( GL_DST_ALPHA = 772 ) 
  124.        integer*4   GL_ONE_MINUS_DST_ALPHA
  125.        parameter ( GL_ONE_MINUS_DST_ALPHA = 773 ) 
  126. C       GL_CONSTANT_COLOR_EXT 
  127. C       GL_ONE_MINUS_CONSTANT_COLOR_EXT 
  128. C       GL_CONSTANT_ALPHA_EXT 
  129. C       GL_ONE_MINUS_CONSTANT_ALPHA_EXT 
  130. C  BlendingFactorSrc 
  131. C       GL_ZERO 
  132. C       GL_ONE 
  133.        integer*4   GL_DST_COLOR
  134.        parameter ( GL_DST_COLOR = 774 ) 
  135.        integer*4   GL_ONE_MINUS_DST_COLOR
  136.        parameter ( GL_ONE_MINUS_DST_COLOR = 775 ) 
  137.        integer*4   GL_SRC_ALPHA_SATURATE
  138.        parameter ( GL_SRC_ALPHA_SATURATE = 776 ) 
  139. C       GL_SRC_ALPHA 
  140. C       GL_ONE_MINUS_SRC_ALPHA 
  141. C       GL_DST_ALPHA 
  142. C       GL_ONE_MINUS_DST_ALPHA 
  143. C       GL_CONSTANT_COLOR_EXT 
  144. C       GL_ONE_MINUS_CONSTANT_COLOR_EXT 
  145. C       GL_CONSTANT_ALPHA_EXT 
  146. C       GL_ONE_MINUS_CONSTANT_ALPHA_EXT 
  147. C  BlendingMode 
  148. C       GL_LOGIC_OP 
  149. C       GL_FUNC_ADD_EXT 
  150. C       GL_MIN_EXT 
  151. C       GL_MAX_EXT 
  152. C       GL_FUNC_SUBTRACT_EXT 
  153. C       GL_FUNC_REVERSE_SUBTRACT_EXT 
  154. C  ColorMaterialFace 
  155. C       GL_FRONT 
  156. C       GL_BACK 
  157. C       GL_FRONT_AND_BACK 
  158. C  ColorMaterialParameter 
  159. C       GL_AMBIENT 
  160. C       GL_DIFFUSE 
  161. C       GL_SPECULAR 
  162. C       GL_EMISSION 
  163. C       GL_AMBIENT_AND_DIFFUSE 
  164. C  ConvolutionBorderMode 
  165. C       GL_REDUCE_EXT 
  166. C  ConvolutionParameter 
  167. C       GL_CONVOLUTION_BORDER_MODE_EXT 
  168. C       GL_CONVOLUTION_FILTER_SCALE_EXT 
  169. C       GL_CONVOLUTION_FILTER_BIAS_EXT 
  170. C  ConvolutionTarget 
  171. C       GL_CONVOLUTION_1D_EXT 
  172. C       GL_CONVOLUTION_2D_EXT 
  173. C  CullFaceMode 
  174. C       GL_FRONT 
  175. C       GL_BACK 
  176. C       GL_FRONT_AND_BACK 
  177. C  DepthFunction 
  178. C       GL_NEVER 
  179. C       GL_LESS 
  180. C       GL_EQUAL 
  181. C       GL_LEQUAL 
  182. C       GL_GREATER 
  183. C       GL_NOTEQUAL 
  184. C       GL_GEQUAL 
  185. C       GL_ALWAYS 
  186. C  DrawBufferMode 
  187.        integer*4   GL_NONE
  188.        parameter ( GL_NONE = 0 ) 
  189.        integer*4   GL_FRONT_LEFT
  190.        parameter ( GL_FRONT_LEFT = 1024 ) 
  191.        integer*4   GL_FRONT_RIGHT
  192.        parameter ( GL_FRONT_RIGHT = 1025 ) 
  193.        integer*4   GL_BACK_LEFT
  194.        parameter ( GL_BACK_LEFT = 1026 ) 
  195.        integer*4   GL_BACK_RIGHT
  196.        parameter ( GL_BACK_RIGHT = 1027 ) 
  197.        integer*4   GL_FRONT
  198.        parameter ( GL_FRONT = 1028 ) 
  199.        integer*4   GL_BACK
  200.        parameter ( GL_BACK = 1029 ) 
  201.        integer*4   GL_LEFT
  202.        parameter ( GL_LEFT = 1030 ) 
  203.        integer*4   GL_RIGHT
  204.        parameter ( GL_RIGHT = 1031 ) 
  205.        integer*4   GL_FRONT_AND_BACK
  206.        parameter ( GL_FRONT_AND_BACK = 1032 ) 
  207.        integer*4   GL_AUX0
  208.        parameter ( GL_AUX0 = 1033 ) 
  209.        integer*4   GL_AUX1
  210.        parameter ( GL_AUX1 = 1034 ) 
  211.        integer*4   GL_AUX2
  212.        parameter ( GL_AUX2 = 1035 ) 
  213.        integer*4   GL_AUX3
  214.        parameter ( GL_AUX3 = 1036 ) 
  215. C  Enable 
  216. C       GL_FOG 
  217. C       GL_LIGHTING 
  218. C       GL_TEXTURE_1D 
  219. C       GL_TEXTURE_2D 
  220. C       GL_LINE_STIPPLE 
  221. C       GL_POLYGON_STIPPLE 
  222. C       GL_CULL_FACE 
  223. C       GL_ALPHA_TEST 
  224. C       GL_BLEND 
  225. C       GL_LOGIC_OP 
  226. C       GL_DITHER 
  227. C       GL_STENCIL_TEST 
  228. C       GL_DEPTH_TEST 
  229. C       GL_CLIP_PLANE0 
  230. C       GL_CLIP_PLANE1 
  231. C       GL_CLIP_PLANE2 
  232. C       GL_CLIP_PLANE3 
  233. C       GL_CLIP_PLANE4 
  234. C       GL_CLIP_PLANE5 
  235. C       GL_LIGHT0 
  236. C       GL_LIGHT1 
  237. C       GL_LIGHT2 
  238. C       GL_LIGHT3 
  239. C       GL_LIGHT4 
  240. C       GL_LIGHT5 
  241. C       GL_LIGHT6 
  242. C       GL_LIGHT7 
  243. C       GL_TEXTURE_GEN_S 
  244. C       GL_TEXTURE_GEN_T 
  245. C       GL_TEXTURE_GEN_R 
  246. C       GL_TEXTURE_GEN_Q 
  247. C       GL_MAP1_VERTEX_3 
  248. C       GL_MAP1_VERTEX_4 
  249. C       GL_MAP1_COLOR_4 
  250. C       GL_MAP1_INDEX 
  251. C       GL_MAP1_NORMAL 
  252. C       GL_MAP1_TEXTURE_COORD_1 
  253. C       GL_MAP1_TEXTURE_COORD_2 
  254. C       GL_MAP1_TEXTURE_COORD_3 
  255. C       GL_MAP1_TEXTURE_COORD_4 
  256. C       GL_MAP2_VERTEX_3 
  257. C       GL_MAP2_VERTEX_4 
  258. C       GL_MAP2_COLOR_4 
  259. C       GL_MAP2_INDEX 
  260. C       GL_MAP2_NORMAL 
  261. C       GL_MAP2_TEXTURE_COORD_1 
  262. C       GL_MAP2_TEXTURE_COORD_2 
  263. C       GL_MAP2_TEXTURE_COORD_3 
  264. C       GL_MAP2_TEXTURE_COORD_4 
  265. C       GL_POINT_SMOOTH 
  266. C       GL_LINE_SMOOTH 
  267. C       GL_POLYGON_SMOOTH 
  268. C       GL_SCISSOR_TEST 
  269. C       GL_COLOR_MATERIAL 
  270. C       GL_NORMALIZE 
  271. C       GL_AUTO_NORMAL 
  272. C       GL_CONVOLUTION_1D_EXT 
  273. C       GL_CONVOLUTION_2D_EXT 
  274. C       GL_SEPARABLE_2D_EXT 
  275. C       GL_HISTOGRAM_EXT 
  276. C       GL_MINMAX_EXT 
  277. C       GL_POLYGON_OFFSET_EXT 
  278. C       GL_TEXTURE_3D_EXT 
  279. C       GL_MULTISAMPLE_SGIS 
  280. C       GL_SAMPLE_ALPHA_TO_MASK_SGIS 
  281. C       GL_SAMPLE_ALPHA_TO_ONE_SGIS 
  282. C       GL_SAMPLE_MASK_SGIS 
  283. C  ErrorCode 
  284.        integer*4   GL_NO_ERROR
  285.        parameter ( GL_NO_ERROR = 0 ) 
  286.        integer*4   GL_INVALID_ENUM
  287.        parameter ( GL_INVALID_ENUM = 1280 ) 
  288.        integer*4   GL_INVALID_VALUE
  289.        parameter ( GL_INVALID_VALUE = 1281 ) 
  290.        integer*4   GL_INVALID_OPERATION
  291.        parameter ( GL_INVALID_OPERATION = 1282 ) 
  292.        integer*4   GL_STACK_OVERFLOW
  293.        parameter ( GL_STACK_OVERFLOW = 1283 ) 
  294.        integer*4   GL_STACK_UNDERFLOW
  295.        parameter ( GL_STACK_UNDERFLOW = 1284 ) 
  296.        integer*4   GL_OUT_OF_MEMORY
  297.        parameter ( GL_OUT_OF_MEMORY = 1285 ) 
  298. C       GL_TABLE_TOO_LARGE_EXT 
  299. C       GL_TEXTURE_TOO_LARGE_EXT 
  300. C  FeedBackMode 
  301.        integer*4   GL_2D
  302.        parameter ( GL_2D = 1536 ) 
  303.        integer*4   GL_3D
  304.        parameter ( GL_3D = 1537 ) 
  305.        integer*4   GL_3D_COLOR
  306.        parameter ( GL_3D_COLOR = 1538 ) 
  307.        integer*4   GL_3D_COLOR_TEXTURE
  308.        parameter ( GL_3D_COLOR_TEXTURE = 1539 ) 
  309.        integer*4   GL_4D_COLOR_TEXTURE
  310.        parameter ( GL_4D_COLOR_TEXTURE = 1540 ) 
  311. C  FeedBackToken 
  312.        integer*4   GL_PASS_THROUGH_TOKEN
  313.        parameter ( GL_PASS_THROUGH_TOKEN = 1792 ) 
  314.        integer*4   GL_POINT_TOKEN
  315.        parameter ( GL_POINT_TOKEN = 1793 ) 
  316.        integer*4   GL_LINE_TOKEN
  317.        parameter ( GL_LINE_TOKEN = 1794 ) 
  318.        integer*4   GL_POLYGON_TOKEN
  319.        parameter ( GL_POLYGON_TOKEN = 1795 ) 
  320.        integer*4   GL_BITMAP_TOKEN
  321.        parameter ( GL_BITMAP_TOKEN = 1796 ) 
  322.        integer*4   GL_DRAW_PIXEL_TOKEN
  323.        parameter ( GL_DRAW_PIXEL_TOKEN = 1797 ) 
  324.        integer*4   GL_COPY_PIXEL_TOKEN
  325.        parameter ( GL_COPY_PIXEL_TOKEN = 1798 ) 
  326.        integer*4   GL_LINE_RESET_TOKEN
  327.        parameter ( GL_LINE_RESET_TOKEN = 1799 ) 
  328. C  FogMode 
  329. C       GL_LINEAR 
  330.        integer*4   GL_EXP
  331.        parameter ( GL_EXP = 2048 ) 
  332.        integer*4   GL_EXP2
  333.        parameter ( GL_EXP2 = 2049 ) 
  334. C  FogParameter 
  335. C       GL_FOG_COLOR 
  336. C       GL_FOG_DENSITY 
  337. C       GL_FOG_END 
  338. C       GL_FOG_INDEX 
  339. C       GL_FOG_MODE 
  340. C       GL_FOG_START 
  341. C  FrontFaceDirection 
  342.        integer*4   GL_CW
  343.        parameter ( GL_CW = 2304 ) 
  344.        integer*4   GL_CCW
  345.        parameter ( GL_CCW = 2305 ) 
  346. C  GetConvolutionParameter 
  347. C       GL_CONVOLUTION_BORDER_MODE_EXT 
  348. C       GL_CONVOLUTION_FILTER_SCALE_EXT 
  349. C       GL_CONVOLUTION_FILTER_BIAS_EXT 
  350. C       GL_CONVOLUTION_FORMAT_EXT 
  351. C       GL_CONVOLUTION_WIDTH_EXT 
  352. C       GL_CONVOLUTION_HEIGHT_EXT 
  353. C       GL_MAX_CONVOLUTION_WIDTH_EXT 
  354. C       GL_MAX_CONVOLUTION_HEIGHT_EXT 
  355. C  GetHistogramParameter 
  356. C       GL_HISTOGRAM_WIDTH_EXT 
  357. C       GL_HISTOGRAM_FORMAT_EXT 
  358. C       GL_HISTOGRAM_RED_SIZE_EXT 
  359. C       GL_HISTOGRAM_GREEN_SIZE_EXT 
  360. C       GL_HISTOGRAM_BLUE_SIZE_EXT 
  361. C       GL_HISTOGRAM_ALPHA_SIZE_EXT 
  362. C       GL_HISTOGRAM_LUMINANCE_SIZE_EXT 
  363. C       GL_HISTOGRAM_SINK_EXT 
  364. C  GetMapTarget 
  365.        integer*4   GL_COEFF
  366.        parameter ( GL_COEFF = 2560 ) 
  367.        integer*4   GL_ORDER
  368.        parameter ( GL_ORDER = 2561 ) 
  369.        integer*4   GL_DOMAIN
  370.        parameter ( GL_DOMAIN = 2562 ) 
  371. C  GetMinmaxParameter 
  372. C       GL_MINMAX_FORMAT_EXT 
  373. C       GL_MINMAX_SINK_EXT 
  374. C  GetPixelMap 
  375.        integer*4   GL_PIXEL_MAP_I_TO_I
  376.        parameter ( GL_PIXEL_MAP_I_TO_I = 3184 ) 
  377.        integer*4   GL_PIXEL_MAP_S_TO_S
  378.        parameter ( GL_PIXEL_MAP_S_TO_S = 3185 ) 
  379.        integer*4   GL_PIXEL_MAP_I_TO_R
  380.        parameter ( GL_PIXEL_MAP_I_TO_R = 3186 ) 
  381.        integer*4   GL_PIXEL_MAP_I_TO_G
  382.        parameter ( GL_PIXEL_MAP_I_TO_G = 3187 ) 
  383.        integer*4   GL_PIXEL_MAP_I_TO_B
  384.        parameter ( GL_PIXEL_MAP_I_TO_B = 3188 ) 
  385.        integer*4   GL_PIXEL_MAP_I_TO_A
  386.        parameter ( GL_PIXEL_MAP_I_TO_A = 3189 ) 
  387.        integer*4   GL_PIXEL_MAP_R_TO_R
  388.        parameter ( GL_PIXEL_MAP_R_TO_R = 3190 ) 
  389.        integer*4   GL_PIXEL_MAP_G_TO_G
  390.        parameter ( GL_PIXEL_MAP_G_TO_G = 3191 ) 
  391.        integer*4   GL_PIXEL_MAP_B_TO_B
  392.        parameter ( GL_PIXEL_MAP_B_TO_B = 3192 ) 
  393.        integer*4   GL_PIXEL_MAP_A_TO_A
  394.        parameter ( GL_PIXEL_MAP_A_TO_A = 3193 ) 
  395. C  GetTarget 
  396.        integer*4   GL_CURRENT_COLOR
  397.        parameter ( GL_CURRENT_COLOR = 2816 ) 
  398.        integer*4   GL_CURRENT_INDEX
  399.        parameter ( GL_CURRENT_INDEX = 2817 ) 
  400.        integer*4   GL_CURRENT_NORMAL
  401.        parameter ( GL_CURRENT_NORMAL = 2818 ) 
  402.        integer*4   GL_CURRENT_TEXTURE_COORDS
  403.        parameter ( GL_CURRENT_TEXTURE_COORDS = 2819 ) 
  404.        integer*4   GL_CURRENT_RASTER_COLOR
  405.        parameter ( GL_CURRENT_RASTER_COLOR = 2820 ) 
  406.        integer*4   GL_CURRENT_RASTER_INDEX
  407.        parameter ( GL_CURRENT_RASTER_INDEX = 2821 ) 
  408.        integer*4   GL_CURRENT_RASTER_TEXTURE_COORDS
  409.        parameter ( GL_CURRENT_RASTER_TEXTURE_COORDS = 2822 ) 
  410.        integer*4   GL_CURRENT_RASTER_POSITION
  411.        parameter ( GL_CURRENT_RASTER_POSITION = 2823 ) 
  412.        integer*4   GL_CURRENT_RASTER_POSITION_VALID
  413.        parameter ( GL_CURRENT_RASTER_POSITION_VALID = 2824 ) 
  414.        integer*4   GL_CURRENT_RASTER_DISTANCE
  415.        parameter ( GL_CURRENT_RASTER_DISTANCE = 2825 ) 
  416.        integer*4   GL_POINT_SMOOTH
  417.        parameter ( GL_POINT_SMOOTH = 2832 ) 
  418.        integer*4   GL_POINT_SIZE
  419.        parameter ( GL_POINT_SIZE = 2833 ) 
  420.        integer*4   GL_POINT_SIZE_RANGE
  421.        parameter ( GL_POINT_SIZE_RANGE = 2834 ) 
  422.        integer*4   GL_POINT_SIZE_GRANULARITY
  423.        parameter ( GL_POINT_SIZE_GRANULARITY = 2835 ) 
  424.        integer*4   GL_LINE_SMOOTH
  425.        parameter ( GL_LINE_SMOOTH = 2848 ) 
  426.        integer*4   GL_LINE_WIDTH
  427.        parameter ( GL_LINE_WIDTH = 2849 ) 
  428.        integer*4   GL_LINE_WIDTH_RANGE
  429.        parameter ( GL_LINE_WIDTH_RANGE = 2850 ) 
  430.        integer*4   GL_LINE_WIDTH_GRANULARITY
  431.        parameter ( GL_LINE_WIDTH_GRANULARITY = 2851 ) 
  432.        integer*4   GL_LINE_STIPPLE
  433.        parameter ( GL_LINE_STIPPLE = 2852 ) 
  434.        integer*4   GL_LINE_STIPPLE_PATTERN
  435.        parameter ( GL_LINE_STIPPLE_PATTERN = 2853 ) 
  436.        integer*4   GL_LINE_STIPPLE_REPEAT
  437.        parameter ( GL_LINE_STIPPLE_REPEAT = 2854 ) 
  438.        integer*4   GL_LIST_MODE
  439.        parameter ( GL_LIST_MODE = 2864 ) 
  440.        integer*4   GL_MAX_LIST_NESTING
  441.        parameter ( GL_MAX_LIST_NESTING = 2865 ) 
  442.        integer*4   GL_LIST_BASE
  443.        parameter ( GL_LIST_BASE = 2866 ) 
  444.        integer*4   GL_LIST_INDEX
  445.        parameter ( GL_LIST_INDEX = 2867 ) 
  446.        integer*4   GL_POLYGON_MODE
  447.        parameter ( GL_POLYGON_MODE = 2880 ) 
  448.        integer*4   GL_POLYGON_SMOOTH
  449.        parameter ( GL_POLYGON_SMOOTH = 2881 ) 
  450.        integer*4   GL_POLYGON_STIPPLE
  451.        parameter ( GL_POLYGON_STIPPLE = 2882 ) 
  452.        integer*4   GL_EDGE_FLAG
  453.        parameter ( GL_EDGE_FLAG = 2883 ) 
  454.        integer*4   GL_CULL_FACE
  455.        parameter ( GL_CULL_FACE = 2884 ) 
  456.        integer*4   GL_CULL_FACE_MODE
  457.        parameter ( GL_CULL_FACE_MODE = 2885 ) 
  458.        integer*4   GL_FRONT_FACE
  459.        parameter ( GL_FRONT_FACE = 2886 ) 
  460.        integer*4   GL_LIGHTING
  461.        parameter ( GL_LIGHTING = 2896 ) 
  462.        integer*4   GL_LIGHT_MODEL_LOCAL_VIEWER
  463.        parameter ( GL_LIGHT_MODEL_LOCAL_VIEWER = 2897 ) 
  464.        integer*4   GL_LIGHT_MODEL_TWO_SIDE
  465.        parameter ( GL_LIGHT_MODEL_TWO_SIDE = 2898 ) 
  466.        integer*4   GL_LIGHT_MODEL_AMBIENT
  467.        parameter ( GL_LIGHT_MODEL_AMBIENT = 2899 ) 
  468.        integer*4   GL_SHADE_MODEL
  469.        parameter ( GL_SHADE_MODEL = 2900 ) 
  470.        integer*4   GL_COLOR_MATERIAL_FACE
  471.        parameter ( GL_COLOR_MATERIAL_FACE = 2901 ) 
  472.        integer*4   GL_COLOR_MATERIAL_PARAMETER
  473.        parameter ( GL_COLOR_MATERIAL_PARAMETER = 2902 ) 
  474.        integer*4   GL_COLOR_MATERIAL
  475.        parameter ( GL_COLOR_MATERIAL = 2903 ) 
  476.        integer*4   GL_FOG
  477.        parameter ( GL_FOG = 2912 ) 
  478.        integer*4   GL_FOG_INDEX
  479.        parameter ( GL_FOG_INDEX = 2913 ) 
  480.        integer*4   GL_FOG_DENSITY
  481.        parameter ( GL_FOG_DENSITY = 2914 ) 
  482.        integer*4   GL_FOG_START
  483.        parameter ( GL_FOG_START = 2915 ) 
  484.        integer*4   GL_FOG_END
  485.        parameter ( GL_FOG_END = 2916 ) 
  486.        integer*4   GL_FOG_MODE
  487.        parameter ( GL_FOG_MODE = 2917 ) 
  488.        integer*4   GL_FOG_COLOR
  489.        parameter ( GL_FOG_COLOR = 2918 ) 
  490.        integer*4   GL_DEPTH_RANGE
  491.        parameter ( GL_DEPTH_RANGE = 2928 ) 
  492.        integer*4   GL_DEPTH_TEST
  493.        parameter ( GL_DEPTH_TEST = 2929 ) 
  494.        integer*4   GL_DEPTH_WRITEMASK
  495.        parameter ( GL_DEPTH_WRITEMASK = 2930 ) 
  496.        integer*4   GL_DEPTH_CLEAR_VALUE
  497.        parameter ( GL_DEPTH_CLEAR_VALUE = 2931 ) 
  498.        integer*4   GL_DEPTH_FUNC
  499.        parameter ( GL_DEPTH_FUNC = 2932 ) 
  500.        integer*4   GL_ACCUM_CLEAR_VALUE
  501.        parameter ( GL_ACCUM_CLEAR_VALUE = 2944 ) 
  502.        integer*4   GL_STENCIL_TEST
  503.        parameter ( GL_STENCIL_TEST = 2960 ) 
  504.        integer*4   GL_STENCIL_CLEAR_VALUE
  505.        parameter ( GL_STENCIL_CLEAR_VALUE = 2961 ) 
  506.        integer*4   GL_STENCIL_FUNC
  507.        parameter ( GL_STENCIL_FUNC = 2962 ) 
  508.        integer*4   GL_STENCIL_VALUE_MASK
  509.        parameter ( GL_STENCIL_VALUE_MASK = 2963 ) 
  510.        integer*4   GL_STENCIL_FAIL
  511.        parameter ( GL_STENCIL_FAIL = 2964 ) 
  512.        integer*4   GL_STENCIL_PASS_DEPTH_FAIL
  513.        parameter ( GL_STENCIL_PASS_DEPTH_FAIL = 2965 ) 
  514.        integer*4   GL_STENCIL_PASS_DEPTH_PASS
  515.        parameter ( GL_STENCIL_PASS_DEPTH_PASS = 2966 ) 
  516.        integer*4   GL_STENCIL_REF
  517.        parameter ( GL_STENCIL_REF = 2967 ) 
  518.        integer*4   GL_STENCIL_WRITEMASK
  519.        parameter ( GL_STENCIL_WRITEMASK = 2968 ) 
  520.        integer*4   GL_MATRIX_MODE
  521.        parameter ( GL_MATRIX_MODE = 2976 ) 
  522.        integer*4   GL_NORMALIZE
  523.        parameter ( GL_NORMALIZE = 2977 ) 
  524.        integer*4   GL_VIEWPORT
  525.        parameter ( GL_VIEWPORT = 2978 ) 
  526.        integer*4   GL_MODELVIEW_STACK_DEPTH
  527.        parameter ( GL_MODELVIEW_STACK_DEPTH = 2979 ) 
  528.        integer*4   GL_PROJECTION_STACK_DEPTH
  529.        parameter ( GL_PROJECTION_STACK_DEPTH = 2980 ) 
  530.        integer*4   GL_TEXTURE_STACK_DEPTH
  531.        parameter ( GL_TEXTURE_STACK_DEPTH = 2981 ) 
  532.        integer*4   GL_MODELVIEW_MATRIX
  533.        parameter ( GL_MODELVIEW_MATRIX = 2982 ) 
  534.        integer*4   GL_PROJECTION_MATRIX
  535.        parameter ( GL_PROJECTION_MATRIX = 2983 ) 
  536.        integer*4   GL_TEXTURE_MATRIX
  537.        parameter ( GL_TEXTURE_MATRIX = 2984 ) 
  538.        integer*4   GL_ATTRIB_STACK_DEPTH
  539.        parameter ( GL_ATTRIB_STACK_DEPTH = 2992 ) 
  540.        integer*4   GL_ALPHA_TEST
  541.        parameter ( GL_ALPHA_TEST = 3008 ) 
  542.        integer*4   GL_ALPHA_TEST_FUNC
  543.        parameter ( GL_ALPHA_TEST_FUNC = 3009 ) 
  544.        integer*4   GL_ALPHA_TEST_REF
  545.        parameter ( GL_ALPHA_TEST_REF = 3010 ) 
  546.        integer*4   GL_DITHER
  547.        parameter ( GL_DITHER = 3024 ) 
  548.        integer*4   GL_BLEND_DST
  549.        parameter ( GL_BLEND_DST = 3040 ) 
  550.        integer*4   GL_BLEND_SRC
  551.        parameter ( GL_BLEND_SRC = 3041 ) 
  552.        integer*4   GL_BLEND
  553.        parameter ( GL_BLEND = 3042 ) 
  554.        integer*4   GL_LOGIC_OP_MODE
  555.        parameter ( GL_LOGIC_OP_MODE = 3056 ) 
  556.        integer*4   GL_LOGIC_OP
  557.        parameter ( GL_LOGIC_OP = 3057 ) 
  558.        integer*4   GL_AUX_BUFFERS
  559.        parameter ( GL_AUX_BUFFERS = 3072 ) 
  560.        integer*4   GL_DRAW_BUFFER
  561.        parameter ( GL_DRAW_BUFFER = 3073 ) 
  562.        integer*4   GL_READ_BUFFER
  563.        parameter ( GL_READ_BUFFER = 3074 ) 
  564.        integer*4   GL_SCISSOR_BOX
  565.        parameter ( GL_SCISSOR_BOX = 3088 ) 
  566.        integer*4   GL_SCISSOR_TEST
  567.        parameter ( GL_SCISSOR_TEST = 3089 ) 
  568.        integer*4   GL_INDEX_CLEAR_VALUE
  569.        parameter ( GL_INDEX_CLEAR_VALUE = 3104 ) 
  570.        integer*4   GL_INDEX_WRITEMASK
  571.        parameter ( GL_INDEX_WRITEMASK = 3105 ) 
  572.        integer*4   GL_COLOR_CLEAR_VALUE
  573.        parameter ( GL_COLOR_CLEAR_VALUE = 3106 ) 
  574.        integer*4   GL_COLOR_WRITEMASK
  575.        parameter ( GL_COLOR_WRITEMASK = 3107 ) 
  576.        integer*4   GL_INDEX_MODE
  577.        parameter ( GL_INDEX_MODE = 3120 ) 
  578.        integer*4   GL_RGBA_MODE
  579.        parameter ( GL_RGBA_MODE = 3121 ) 
  580.        integer*4   GL_DOUBLEBUFFER
  581.        parameter ( GL_DOUBLEBUFFER = 3122 ) 
  582.        integer*4   GL_STEREO
  583.        parameter ( GL_STEREO = 3123 ) 
  584.        integer*4   GL_RENDER_MODE
  585.        parameter ( GL_RENDER_MODE = 3136 ) 
  586.        integer*4   GL_PERSPECTIVE_CORRECTION_HINT
  587.        parameter ( GL_PERSPECTIVE_CORRECTION_HINT = 3152 ) 
  588.        integer*4   GL_POINT_SMOOTH_HINT
  589.        parameter ( GL_POINT_SMOOTH_HINT = 3153 ) 
  590.        integer*4   GL_LINE_SMOOTH_HINT
  591.        parameter ( GL_LINE_SMOOTH_HINT = 3154 ) 
  592.        integer*4   GL_POLYGON_SMOOTH_HINT
  593.        parameter ( GL_POLYGON_SMOOTH_HINT = 3155 ) 
  594.        integer*4   GL_FOG_HINT
  595.        parameter ( GL_FOG_HINT = 3156 ) 
  596.        integer*4   GL_TEXTURE_GEN_S
  597.        parameter ( GL_TEXTURE_GEN_S = 3168 ) 
  598.        integer*4   GL_TEXTURE_GEN_T
  599.        parameter ( GL_TEXTURE_GEN_T = 3169 ) 
  600.        integer*4   GL_TEXTURE_GEN_R
  601.        parameter ( GL_TEXTURE_GEN_R = 3170 ) 
  602.        integer*4   GL_TEXTURE_GEN_Q
  603.        parameter ( GL_TEXTURE_GEN_Q = 3171 ) 
  604.        integer*4   GL_PIXEL_MAP_I_TO_I_SIZE
  605.        parameter ( GL_PIXEL_MAP_I_TO_I_SIZE = 3248 ) 
  606.        integer*4   GL_PIXEL_MAP_S_TO_S_SIZE
  607.        parameter ( GL_PIXEL_MAP_S_TO_S_SIZE = 3249 ) 
  608.        integer*4   GL_PIXEL_MAP_I_TO_R_SIZE
  609.        parameter ( GL_PIXEL_MAP_I_TO_R_SIZE = 3250 ) 
  610.        integer*4   GL_PIXEL_MAP_I_TO_G_SIZE
  611.        parameter ( GL_PIXEL_MAP_I_TO_G_SIZE = 3251 ) 
  612.        integer*4   GL_PIXEL_MAP_I_TO_B_SIZE
  613.        parameter ( GL_PIXEL_MAP_I_TO_B_SIZE = 3252 ) 
  614.        integer*4   GL_PIXEL_MAP_I_TO_A_SIZE
  615.        parameter ( GL_PIXEL_MAP_I_TO_A_SIZE = 3253 ) 
  616.        integer*4   GL_PIXEL_MAP_R_TO_R_SIZE
  617.        parameter ( GL_PIXEL_MAP_R_TO_R_SIZE = 3254 ) 
  618.        integer*4   GL_PIXEL_MAP_G_TO_G_SIZE
  619.        parameter ( GL_PIXEL_MAP_G_TO_G_SIZE = 3255 ) 
  620.        integer*4   GL_PIXEL_MAP_B_TO_B_SIZE
  621.        parameter ( GL_PIXEL_MAP_B_TO_B_SIZE = 3256 ) 
  622.        integer*4   GL_PIXEL_MAP_A_TO_A_SIZE
  623.        parameter ( GL_PIXEL_MAP_A_TO_A_SIZE = 3257 ) 
  624.        integer*4   GL_UNPACK_SWAP_BYTES
  625.        parameter ( GL_UNPACK_SWAP_BYTES = 3312 ) 
  626.        integer*4   GL_UNPACK_LSB_FIRST
  627.        parameter ( GL_UNPACK_LSB_FIRST = 3313 ) 
  628.        integer*4   GL_UNPACK_ROW_LENGTH
  629.        parameter ( GL_UNPACK_ROW_LENGTH = 3314 ) 
  630.        integer*4   GL_UNPACK_SKIP_ROWS
  631.        parameter ( GL_UNPACK_SKIP_ROWS = 3315 ) 
  632.        integer*4   GL_UNPACK_SKIP_PIXELS
  633.        parameter ( GL_UNPACK_SKIP_PIXELS = 3316 ) 
  634.        integer*4   GL_UNPACK_ALIGNMENT
  635.        parameter ( GL_UNPACK_ALIGNMENT = 3317 ) 
  636.        integer*4   GL_PACK_SWAP_BYTES
  637.        parameter ( GL_PACK_SWAP_BYTES = 3328 ) 
  638.        integer*4   GL_PACK_LSB_FIRST
  639.        parameter ( GL_PACK_LSB_FIRST = 3329 ) 
  640.        integer*4   GL_PACK_ROW_LENGTH
  641.        parameter ( GL_PACK_ROW_LENGTH = 3330 ) 
  642.        integer*4   GL_PACK_SKIP_ROWS
  643.        parameter ( GL_PACK_SKIP_ROWS = 3331 ) 
  644.        integer*4   GL_PACK_SKIP_PIXELS
  645.        parameter ( GL_PACK_SKIP_PIXELS = 3332 ) 
  646.        integer*4   GL_PACK_ALIGNMENT
  647.        parameter ( GL_PACK_ALIGNMENT = 3333 ) 
  648.        integer*4   GL_MAP_COLOR
  649.        parameter ( GL_MAP_COLOR = 3344 ) 
  650.        integer*4   GL_MAP_STENCIL
  651.        parameter ( GL_MAP_STENCIL = 3345 ) 
  652.        integer*4   GL_INDEX_SHIFT
  653.        parameter ( GL_INDEX_SHIFT = 3346 ) 
  654.        integer*4   GL_INDEX_OFFSET
  655.        parameter ( GL_INDEX_OFFSET = 3347 ) 
  656.        integer*4   GL_RED_SCALE
  657.        parameter ( GL_RED_SCALE = 3348 ) 
  658.        integer*4   GL_RED_BIAS
  659.        parameter ( GL_RED_BIAS = 3349 ) 
  660.        integer*4   GL_ZOOM_X
  661.        parameter ( GL_ZOOM_X = 3350 ) 
  662.        integer*4   GL_ZOOM_Y
  663.        parameter ( GL_ZOOM_Y = 3351 ) 
  664.        integer*4   GL_GREEN_SCALE
  665.        parameter ( GL_GREEN_SCALE = 3352 ) 
  666.        integer*4   GL_GREEN_BIAS
  667.        parameter ( GL_GREEN_BIAS = 3353 ) 
  668.        integer*4   GL_BLUE_SCALE
  669.        parameter ( GL_BLUE_SCALE = 3354 ) 
  670.        integer*4   GL_BLUE_BIAS
  671.        parameter ( GL_BLUE_BIAS = 3355 ) 
  672.        integer*4   GL_ALPHA_SCALE
  673.        parameter ( GL_ALPHA_SCALE = 3356 ) 
  674.        integer*4   GL_ALPHA_BIAS
  675.        parameter ( GL_ALPHA_BIAS = 3357 ) 
  676.        integer*4   GL_DEPTH_SCALE
  677.        parameter ( GL_DEPTH_SCALE = 3358 ) 
  678.        integer*4   GL_DEPTH_BIAS
  679.        parameter ( GL_DEPTH_BIAS = 3359 ) 
  680.        integer*4   GL_MAX_EVAL_ORDER
  681.        parameter ( GL_MAX_EVAL_ORDER = 3376 ) 
  682.        integer*4   GL_MAX_LIGHTS
  683.        parameter ( GL_MAX_LIGHTS = 3377 ) 
  684.        integer*4   GL_MAX_CLIP_PLANES
  685.        parameter ( GL_MAX_CLIP_PLANES = 3378 ) 
  686.        integer*4   GL_MAX_TEXTURE_SIZE
  687.        parameter ( GL_MAX_TEXTURE_SIZE = 3379 ) 
  688.        integer*4   GL_MAX_PIXEL_MAP_TABLE
  689.        parameter ( GL_MAX_PIXEL_MAP_TABLE = 3380 ) 
  690.        integer*4   GL_MAX_ATTRIB_STACK_DEPTH
  691.        parameter ( GL_MAX_ATTRIB_STACK_DEPTH = 3381 ) 
  692.        integer*4   GL_MAX_MODELVIEW_STACK_DEPTH
  693.        parameter ( GL_MAX_MODELVIEW_STACK_DEPTH = 3382 ) 
  694.        integer*4   GL_MAX_NAME_STACK_DEPTH
  695.        parameter ( GL_MAX_NAME_STACK_DEPTH = 3383 ) 
  696.        integer*4   GL_MAX_PROJECTION_STACK_DEPTH
  697.        parameter ( GL_MAX_PROJECTION_STACK_DEPTH = 3384 ) 
  698.        integer*4   GL_MAX_TEXTURE_STACK_DEPTH
  699.        parameter ( GL_MAX_TEXTURE_STACK_DEPTH = 3385 ) 
  700.        integer*4   GL_MAX_VIEWPORT_DIMS
  701.        parameter ( GL_MAX_VIEWPORT_DIMS = 3386 ) 
  702.        integer*4   GL_SUBPIXEL_BITS
  703.        parameter ( GL_SUBPIXEL_BITS = 3408 ) 
  704.        integer*4   GL_INDEX_BITS
  705.        parameter ( GL_INDEX_BITS = 3409 ) 
  706.        integer*4   GL_RED_BITS
  707.        parameter ( GL_RED_BITS = 3410 ) 
  708.        integer*4   GL_GREEN_BITS
  709.        parameter ( GL_GREEN_BITS = 3411 ) 
  710.        integer*4   GL_BLUE_BITS
  711.        parameter ( GL_BLUE_BITS = 3412 ) 
  712.        integer*4   GL_ALPHA_BITS
  713.        parameter ( GL_ALPHA_BITS = 3413 ) 
  714.        integer*4   GL_DEPTH_BITS
  715.        parameter ( GL_DEPTH_BITS = 3414 ) 
  716.        integer*4   GL_STENCIL_BITS
  717.        parameter ( GL_STENCIL_BITS = 3415 ) 
  718.        integer*4   GL_ACCUM_RED_BITS
  719.        parameter ( GL_ACCUM_RED_BITS = 3416 ) 
  720.        integer*4   GL_ACCUM_GREEN_BITS
  721.        parameter ( GL_ACCUM_GREEN_BITS = 3417 ) 
  722.        integer*4   GL_ACCUM_BLUE_BITS
  723.        parameter ( GL_ACCUM_BLUE_BITS = 3418 ) 
  724.        integer*4   GL_ACCUM_ALPHA_BITS
  725.        parameter ( GL_ACCUM_ALPHA_BITS = 3419 ) 
  726.        integer*4   GL_NAME_STACK_DEPTH
  727.        parameter ( GL_NAME_STACK_DEPTH = 3440 ) 
  728.        integer*4   GL_AUTO_NORMAL
  729.        parameter ( GL_AUTO_NORMAL = 3456 ) 
  730.        integer*4   GL_MAP1_COLOR_4
  731.        parameter ( GL_MAP1_COLOR_4 = 3472 ) 
  732.        integer*4   GL_MAP1_INDEX
  733.        parameter ( GL_MAP1_INDEX = 3473 ) 
  734.        integer*4   GL_MAP1_NORMAL
  735.        parameter ( GL_MAP1_NORMAL = 3474 ) 
  736.        integer*4   GL_MAP1_TEXTURE_COORD_1
  737.        parameter ( GL_MAP1_TEXTURE_COORD_1 = 3475 ) 
  738.        integer*4   GL_MAP1_TEXTURE_COORD_2
  739.        parameter ( GL_MAP1_TEXTURE_COORD_2 = 3476 ) 
  740.        integer*4   GL_MAP1_TEXTURE_COORD_3
  741.        parameter ( GL_MAP1_TEXTURE_COORD_3 = 3477 ) 
  742.        integer*4   GL_MAP1_TEXTURE_COORD_4
  743.        parameter ( GL_MAP1_TEXTURE_COORD_4 = 3478 ) 
  744.        integer*4   GL_MAP1_VERTEX_3
  745.        parameter ( GL_MAP1_VERTEX_3 = 3479 ) 
  746.        integer*4   GL_MAP1_VERTEX_4
  747.        parameter ( GL_MAP1_VERTEX_4 = 3480 ) 
  748.        integer*4   GL_MAP2_COLOR_4
  749.        parameter ( GL_MAP2_COLOR_4 = 3504 ) 
  750.        integer*4   GL_MAP2_INDEX
  751.        parameter ( GL_MAP2_INDEX = 3505 ) 
  752.        integer*4   GL_MAP2_NORMAL
  753.        parameter ( GL_MAP2_NORMAL = 3506 ) 
  754.        integer*4   GL_MAP2_TEXTURE_COORD_1
  755.        parameter ( GL_MAP2_TEXTURE_COORD_1 = 3507 ) 
  756.        integer*4   GL_MAP2_TEXTURE_COORD_2
  757.        parameter ( GL_MAP2_TEXTURE_COORD_2 = 3508 ) 
  758.        integer*4   GL_MAP2_TEXTURE_COORD_3
  759.        parameter ( GL_MAP2_TEXTURE_COORD_3 = 3509 ) 
  760.        integer*4   GL_MAP2_TEXTURE_COORD_4
  761.        parameter ( GL_MAP2_TEXTURE_COORD_4 = 3510 ) 
  762.        integer*4   GL_MAP2_VERTEX_3
  763.        parameter ( GL_MAP2_VERTEX_3 = 3511 ) 
  764.        integer*4   GL_MAP2_VERTEX_4
  765.        parameter ( GL_MAP2_VERTEX_4 = 3512 ) 
  766.        integer*4   GL_MAP1_GRID_DOMAIN
  767.        parameter ( GL_MAP1_GRID_DOMAIN = 3536 ) 
  768.        integer*4   GL_MAP1_GRID_SEGMENTS
  769.        parameter ( GL_MAP1_GRID_SEGMENTS = 3537 ) 
  770.        integer*4   GL_MAP2_GRID_DOMAIN
  771.        parameter ( GL_MAP2_GRID_DOMAIN = 3538 ) 
  772.        integer*4   GL_MAP2_GRID_SEGMENTS
  773.        parameter ( GL_MAP2_GRID_SEGMENTS = 3539 ) 
  774.        integer*4   GL_TEXTURE_1D
  775.        parameter ( GL_TEXTURE_1D = 3552 ) 
  776.        integer*4   GL_TEXTURE_2D
  777.        parameter ( GL_TEXTURE_2D = 3553 ) 
  778. C       GL_BLEND_COLOR_EXT 
  779. C       GL_BLEND_EQUATION_EXT 
  780. C       GL_CONVOLUTION_1D_EXT 
  781. C       GL_CONVOLUTION_2D_EXT 
  782. C       GL_SEPARABLE_2D_EXT 
  783. C       GL_POST_CONVOLUTION_RED_SCALE_EXT 
  784. C       GL_POST_CONVOLUTION_GREEN_SCALE_EXT 
  785. C       GL_POST_CONVOLUTION_BLUE_SCALE_EXT 
  786. C       GL_POST_CONVOLUTION_ALPHA_SCALE_EXT 
  787. C       GL_POST_CONVOLUTION_RED_BIAS_EXT 
  788. C       GL_POST_CONVOLUTION_GREEN_BIAS_EXT 
  789. C       GL_POST_CONVOLUTION_BLUE_BIAS_EXT 
  790. C       GL_POST_CONVOLUTION_ALPHA_BIAS_EXT 
  791. C       GL_HISTOGRAM_EXT 
  792. C       GL_MINMAX_EXT 
  793. C       GL_POLYGON_OFFSET_EXT 
  794. C       GL_POLYGON_OFFSET_FACTOR_EXT 
  795. C       GL_POLYGON_OFFSET_BIAS_EXT 
  796. C       GL_PACK_SKIP_IMAGES_EXT 
  797. C       GL_PACK_IMAGE_HEIGHT_EXT 
  798. C       GL_UNPACK_SKIP_IMAGES_EXT 
  799. C       GL_UNPACK_IMAGE_HEIGHT_EXT 
  800. C       GL_TEXTURE_3D_EXT 
  801. C       GL_MAX_3D_TEXTURE_SIZE_EXT 
  802. C       GL_DETAIL_TEXTURE_2D_BINDING_SGIS 
  803. C       GL_MULTISAMPLE_SGIS 
  804. C       GL_SAMPLE_ALPHA_TO_MASK_SGIS 
  805. C       GL_SAMPLE_ALPHA_TO_ONE_SGIS 
  806. C       GL_SAMPLE_MASK_SGIS 
  807. C       GL_SAMPLE_BUFFERS_SGIS 
  808. C       GL_SAMPLES_SGIS 
  809. C       GL_SAMPLE_MASK_VALUE_SGIS 
  810. C       GL_SAMPLE_MASK_INVERT_SGIS 
  811. C       GL_SAMPLE_PATTERN_SGIS 
  812. C  GetTextureParameter 
  813. C       GL_TEXTURE_MAG_FILTER 
  814. C       GL_TEXTURE_MIN_FILTER 
  815. C       GL_TEXTURE_WRAP_S 
  816. C       GL_TEXTURE_WRAP_T 
  817.        integer*4   GL_TEXTURE_WIDTH
  818.        parameter ( GL_TEXTURE_WIDTH = 4096 ) 
  819.        integer*4   GL_TEXTURE_HEIGHT
  820.        parameter ( GL_TEXTURE_HEIGHT = 4097 ) 
  821.        integer*4   GL_TEXTURE_COMPONENTS
  822.        parameter ( GL_TEXTURE_COMPONENTS = 4099 ) 
  823.        integer*4   GL_TEXTURE_BORDER_COLOR
  824.        parameter ( GL_TEXTURE_BORDER_COLOR = 4100 ) 
  825.        integer*4   GL_TEXTURE_BORDER
  826.        parameter ( GL_TEXTURE_BORDER = 4101 ) 
  827. C       GL_TEXTURE_RED_SIZE_EXT 
  828. C       GL_TEXTURE_GREEN_SIZE_EXT 
  829. C       GL_TEXTURE_BLUE_SIZE_EXT 
  830. C       GL_TEXTURE_ALPHA_SIZE_EXT 
  831. C       GL_TEXTURE_LUMINANCE_SIZE_EXT 
  832. C       GL_TEXTURE_INTENSITY_SIZE_EXT 
  833. C       GL_TEXTURE_DEPTH_EXT 
  834. C       GL_TEXTURE_WRAP_R_EXT 
  835. C       GL_DETAIL_TEXTURE_LEVEL_SGIS 
  836. C       GL_DETAIL_TEXTURE_MODE_SGIS 
  837. C       GL_DETAIL_TEXTURE_FUNC_POINTS_SGIS 
  838. C       GL_SHARPEN_TEXTURE_FUNC_POINTS_SGIS 
  839. C  HintMode 
  840.        integer*4   GL_DONT_CARE
  841.        parameter ( GL_DONT_CARE = 4352 ) 
  842.        integer*4   GL_FASTEST
  843.        parameter ( GL_FASTEST = 4353 ) 
  844.        integer*4   GL_NICEST
  845.        parameter ( GL_NICEST = 4354 ) 
  846. C  HintTarget 
  847. C       GL_PERSPECTIVE_CORRECTION_HINT 
  848. C       GL_POINT_SMOOTH_HINT 
  849. C       GL_LINE_SMOOTH_HINT 
  850. C       GL_POLYGON_SMOOTH_HINT 
  851. C       GL_FOG_HINT 
  852. C  HistogramTarget 
  853. C       GL_HISTOGRAM_EXT 
  854. C       GL_PROXY_HISTOGRAM_EXT 
  855. C  LightModelParameter 
  856. C       GL_LIGHT_MODEL_AMBIENT 
  857. C       GL_LIGHT_MODEL_LOCAL_VIEWER 
  858. C       GL_LIGHT_MODEL_TWO_SIDE 
  859. C  LightParameter 
  860.        integer*4   GL_AMBIENT
  861.        parameter ( GL_AMBIENT = 4608 ) 
  862.        integer*4   GL_DIFFUSE
  863.        parameter ( GL_DIFFUSE = 4609 ) 
  864.        integer*4   GL_SPECULAR
  865.        parameter ( GL_SPECULAR = 4610 ) 
  866.        integer*4   GL_POSITION
  867.        parameter ( GL_POSITION = 4611 ) 
  868.        integer*4   GL_SPOT_DIRECTION
  869.        parameter ( GL_SPOT_DIRECTION = 4612 ) 
  870.        integer*4   GL_SPOT_EXPONENT
  871.        parameter ( GL_SPOT_EXPONENT = 4613 ) 
  872.        integer*4   GL_SPOT_CUTOFF
  873.        parameter ( GL_SPOT_CUTOFF = 4614 ) 
  874.        integer*4   GL_CONSTANT_ATTENUATION
  875.        parameter ( GL_CONSTANT_ATTENUATION = 4615 ) 
  876.        integer*4   GL_LINEAR_ATTENUATION
  877.        parameter ( GL_LINEAR_ATTENUATION = 4616 ) 
  878.        integer*4   GL_QUADRATIC_ATTENUATION
  879.        parameter ( GL_QUADRATIC_ATTENUATION = 4617 ) 
  880. C  ListMode 
  881.        integer*4   GL_COMPILE
  882.        parameter ( GL_COMPILE = 4864 ) 
  883.        integer*4   GL_COMPILE_AND_EXECUTE
  884.        parameter ( GL_COMPILE_AND_EXECUTE = 4865 ) 
  885. C  ListNameType 
  886.        integer*4   GL_BYTE
  887.        parameter ( GL_BYTE = 5120 ) 
  888.        integer*4   GL_UNSIGNED_BYTE
  889.        parameter ( GL_UNSIGNED_BYTE = 5121 ) 
  890.        integer*4   GL_SHORT
  891.        parameter ( GL_SHORT = 5122 ) 
  892.        integer*4   GL_UNSIGNED_SHORT
  893.        parameter ( GL_UNSIGNED_SHORT = 5123 ) 
  894.        integer*4   GL_INT
  895.        parameter ( GL_INT = 5124 ) 
  896.        integer*4   GL_UNSIGNED_INT
  897.        parameter ( GL_UNSIGNED_INT = 5125 ) 
  898.        integer*4   GL_FLOAT
  899.        parameter ( GL_FLOAT = 5126 ) 
  900.        integer*4   GL_2_BYTES
  901.        parameter ( GL_2_BYTES = 5127 ) 
  902.        integer*4   GL_3_BYTES
  903.        parameter ( GL_3_BYTES = 5128 ) 
  904.        integer*4   GL_4_BYTES
  905.        parameter ( GL_4_BYTES = 5129 ) 
  906. C  LogicOp 
  907.        integer*4   GL_CLEAR
  908.        parameter ( GL_CLEAR = 5376 ) 
  909.        integer*4   GL_AND
  910.        parameter ( GL_AND = 5377 ) 
  911.        integer*4   GL_AND_REVERSE
  912.        parameter ( GL_AND_REVERSE = 5378 ) 
  913.        integer*4   GL_COPY
  914.        parameter ( GL_COPY = 5379 ) 
  915.        integer*4   GL_AND_INVERTED
  916.        parameter ( GL_AND_INVERTED = 5380 ) 
  917.        integer*4   GL_NOOP
  918.        parameter ( GL_NOOP = 5381 ) 
  919.        integer*4   GL_XOR
  920.        parameter ( GL_XOR = 5382 ) 
  921.        integer*4   GL_OR
  922.        parameter ( GL_OR = 5383 ) 
  923.        integer*4   GL_NOR
  924.        parameter ( GL_NOR = 5384 ) 
  925.        integer*4   GL_EQUIV
  926.        parameter ( GL_EQUIV = 5385 ) 
  927.        integer*4   GL_INVERT
  928.        parameter ( GL_INVERT = 5386 ) 
  929.        integer*4   GL_OR_REVERSE
  930.        parameter ( GL_OR_REVERSE = 5387 ) 
  931.        integer*4   GL_COPY_INVERTED
  932.        parameter ( GL_COPY_INVERTED = 5388 ) 
  933.        integer*4   GL_OR_INVERTED
  934.        parameter ( GL_OR_INVERTED = 5389 ) 
  935.        integer*4   GL_NAND
  936.        parameter ( GL_NAND = 5390 ) 
  937.        integer*4   GL_SET
  938.        parameter ( GL_SET = 5391 ) 
  939. C  MapTarget 
  940. C       GL_MAP1_COLOR_4 
  941. C       GL_MAP1_INDEX 
  942. C       GL_MAP1_NORMAL 
  943. C       GL_MAP1_TEXTURE_COORD_1 
  944. C       GL_MAP1_TEXTURE_COORD_2 
  945. C       GL_MAP1_TEXTURE_COORD_3 
  946. C       GL_MAP1_TEXTURE_COORD_4 
  947. C       GL_MAP1_VERTEX_3 
  948. C       GL_MAP1_VERTEX_4 
  949. C       GL_MAP2_COLOR_4 
  950. C       GL_MAP2_INDEX 
  951. C       GL_MAP2_NORMAL 
  952. C       GL_MAP2_TEXTURE_COORD_1 
  953. C       GL_MAP2_TEXTURE_COORD_2 
  954. C       GL_MAP2_TEXTURE_COORD_3 
  955. C       GL_MAP2_TEXTURE_COORD_4 
  956. C       GL_MAP2_VERTEX_3 
  957. C       GL_MAP2_VERTEX_4 
  958. C  MaterialFace 
  959. C       GL_FRONT 
  960. C       GL_BACK 
  961. C       GL_FRONT_AND_BACK 
  962. C  MaterialParameter 
  963.        integer*4   GL_EMISSION
  964.        parameter ( GL_EMISSION = 5632 ) 
  965.        integer*4   GL_SHININESS
  966.        parameter ( GL_SHININESS = 5633 ) 
  967.        integer*4   GL_AMBIENT_AND_DIFFUSE
  968.        parameter ( GL_AMBIENT_AND_DIFFUSE = 5634 ) 
  969.        integer*4   GL_COLOR_INDEXES
  970.        parameter ( GL_COLOR_INDEXES = 5635 ) 
  971. C       GL_AMBIENT 
  972. C       GL_DIFFUSE 
  973. C       GL_SPECULAR 
  974. C  MatrixMode 
  975.        integer*4   GL_MODELVIEW
  976.        parameter ( GL_MODELVIEW = 5888 ) 
  977.        integer*4   GL_PROJECTION
  978.        parameter ( GL_PROJECTION = 5889 ) 
  979.        integer*4   GL_TEXTURE
  980.        parameter ( GL_TEXTURE = 5890 ) 
  981. C  MeshMode1 
  982. C       GL_POINT 
  983. C       GL_LINE 
  984. C  MeshMode2 
  985. C       GL_POINT 
  986. C       GL_LINE 
  987. C       GL_FILL 
  988. C  MinmaxTarget 
  989. C       GL_MINMAX_EXT 
  990. C  PixelCopyType 
  991.        integer*4   GL_COLOR
  992.        parameter ( GL_COLOR = 6144 ) 
  993.        integer*4   GL_DEPTH
  994.        parameter ( GL_DEPTH = 6145 ) 
  995.        integer*4   GL_STENCIL
  996.        parameter ( GL_STENCIL = 6146 ) 
  997. C  PixelFormat 
  998.        integer*4   GL_COLOR_INDEX
  999.        parameter ( GL_COLOR_INDEX = 6400 ) 
  1000.        integer*4   GL_STENCIL_INDEX
  1001.        parameter ( GL_STENCIL_INDEX = 6401 ) 
  1002.        integer*4   GL_DEPTH_COMPONENT
  1003.        parameter ( GL_DEPTH_COMPONENT = 6402 ) 
  1004.        integer*4   GL_RED
  1005.        parameter ( GL_RED = 6403 ) 
  1006.        integer*4   GL_GREEN
  1007.        parameter ( GL_GREEN = 6404 ) 
  1008.        integer*4   GL_BLUE
  1009.        parameter ( GL_BLUE = 6405 ) 
  1010.        integer*4   GL_ALPHA
  1011.        parameter ( GL_ALPHA = 6406 ) 
  1012.        integer*4   GL_RGB
  1013.        parameter ( GL_RGB = 6407 ) 
  1014.        integer*4   GL_RGBA
  1015.        parameter ( GL_RGBA = 6408 ) 
  1016.        integer*4   GL_LUMINANCE
  1017.        parameter ( GL_LUMINANCE = 6409 ) 
  1018.        integer*4   GL_LUMINANCE_ALPHA
  1019.        parameter ( GL_LUMINANCE_ALPHA = 6410 ) 
  1020. C       GL_ABGR_EXT 
  1021. C  PixelInternalFormat 
  1022. C       GL_ALPHA4_EXT 
  1023. C       GL_ALPHA8_EXT 
  1024. C       GL_ALPHA12_EXT 
  1025. C       GL_ALPHA16_EXT 
  1026. C       GL_LUMINANCE4_EXT 
  1027. C       GL_LUMINANCE8_EXT 
  1028. C       GL_LUMINANCE12_EXT 
  1029. C       GL_LUMINANCE16_EXT 
  1030. C       GL_LUMINANCE4_ALPHA4_EXT 
  1031. C       GL_LUMINANCE6_ALPHA2_EXT 
  1032. C       GL_LUMINANCE8_ALPHA8_EXT 
  1033. C       GL_LUMINANCE12_ALPHA4_EXT 
  1034. C       GL_LUMINANCE12_ALPHA12_EXT 
  1035. C       GL_LUMINANCE16_ALPHA16_EXT 
  1036. C       GL_INTENSITY_EXT 
  1037. C       GL_INTENSITY4_EXT 
  1038. C       GL_INTENSITY8_EXT 
  1039. C       GL_INTENSITY12_EXT 
  1040. C       GL_INTENSITY16_EXT 
  1041. C       GL_RGB2_EXT 
  1042. C       GL_RGB4_EXT 
  1043. C       GL_RGB5_EXT 
  1044. C       GL_RGB8_EXT 
  1045. C       GL_RGB10_EXT 
  1046. C       GL_RGB12_EXT 
  1047. C       GL_RGB16_EXT 
  1048. C       GL_RGBA2_EXT 
  1049. C       GL_RGBA4_EXT 
  1050. C       GL_RGB5_A1_EXT 
  1051. C       GL_RGBA8_EXT 
  1052. C       GL_RGB10_A2_EXT 
  1053. C       GL_RGBA12_EXT 
  1054. C       GL_RGBA16_EXT 
  1055. C  PixelMap 
  1056. C       GL_PIXEL_MAP_I_TO_I 
  1057. C       GL_PIXEL_MAP_S_TO_S 
  1058. C       GL_PIXEL_MAP_I_TO_R 
  1059. C       GL_PIXEL_MAP_I_TO_G 
  1060. C       GL_PIXEL_MAP_I_TO_B 
  1061. C       GL_PIXEL_MAP_I_TO_A 
  1062. C       GL_PIXEL_MAP_R_TO_R 
  1063. C       GL_PIXEL_MAP_G_TO_G 
  1064. C       GL_PIXEL_MAP_B_TO_B 
  1065. C       GL_PIXEL_MAP_A_TO_A 
  1066. C  PixelStore 
  1067. C       GL_UNPACK_SWAP_BYTES 
  1068. C       GL_UNPACK_LSB_FIRST 
  1069. C       GL_UNPACK_ROW_LENGTH 
  1070. C       GL_UNPACK_SKIP_ROWS 
  1071. C       GL_UNPACK_SKIP_PIXELS 
  1072. C       GL_UNPACK_ALIGNMENT 
  1073. C       GL_PACK_SWAP_BYTES 
  1074. C       GL_PACK_LSB_FIRST 
  1075. C       GL_PACK_ROW_LENGTH 
  1076. C       GL_PACK_SKIP_ROWS 
  1077. C       GL_PACK_SKIP_PIXELS 
  1078. C       GL_PACK_ALIGNMENT 
  1079. C       GL_PACK_SKIP_IMAGES_EXT 
  1080. C       GL_PACK_IMAGE_HEIGHT_EXT 
  1081. C       GL_UNPACK_SKIP_IMAGES_EXT 
  1082. C       GL_UNPACK_IMAGE_HEIGHT_EXT 
  1083. C  PixelTransfer 
  1084. C       GL_MAP_COLOR 
  1085. C       GL_MAP_STENCIL 
  1086. C       GL_INDEX_SHIFT 
  1087. C       GL_INDEX_OFFSET 
  1088. C       GL_RED_SCALE 
  1089. C       GL_RED_BIAS 
  1090. C       GL_GREEN_SCALE 
  1091. C       GL_GREEN_BIAS 
  1092. C       GL_BLUE_SCALE 
  1093. C       GL_BLUE_BIAS 
  1094. C       GL_ALPHA_SCALE 
  1095. C       GL_ALPHA_BIAS 
  1096. C       GL_DEPTH_SCALE 
  1097. C       GL_DEPTH_BIAS 
  1098. C       GL_POST_CONVOLUTION_RED_SCALE_EXT 
  1099. C       GL_POST_CONVOLUTION_GREEN_SCALE_EXT 
  1100. C       GL_POST_CONVOLUTION_BLUE_SCALE_EXT 
  1101. C       GL_POST_CONVOLUTION_ALPHA_SCALE_EXT 
  1102. C       GL_POST_CONVOLUTION_RED_BIAS_EXT 
  1103. C       GL_POST_CONVOLUTION_GREEN_BIAS_EXT 
  1104. C       GL_POST_CONVOLUTION_BLUE_BIAS_EXT 
  1105. C       GL_POST_CONVOLUTION_ALPHA_BIAS_EXT 
  1106. C  PixelType 
  1107.        integer*4   GL_BITMAP
  1108.        parameter ( GL_BITMAP = 6656 ) 
  1109. C       GL_BYTE 
  1110. C       GL_UNSIGNED_BYTE 
  1111. C       GL_SHORT 
  1112. C       GL_UNSIGNED_SHORT 
  1113. C       GL_INT 
  1114. C       GL_UNSIGNED_INT 
  1115. C       GL_FLOAT 
  1116. C  PolygonMode 
  1117.        integer*4   GL_POINT
  1118.        parameter ( GL_POINT = 6912 ) 
  1119.        integer*4   GL_LINE
  1120.        parameter ( GL_LINE = 6913 ) 
  1121.        integer*4   GL_FILL
  1122.        parameter ( GL_FILL = 6914 ) 
  1123. C  ReadBufferMode 
  1124. C       GL_FRONT_LEFT 
  1125. C       GL_FRONT_RIGHT 
  1126. C       GL_BACK_LEFT 
  1127. C       GL_BACK_RIGHT 
  1128. C       GL_FRONT 
  1129. C       GL_BACK 
  1130. C       GL_LEFT 
  1131. C       GL_RIGHT 
  1132. C       GL_AUX0 
  1133. C       GL_AUX1 
  1134. C       GL_AUX2 
  1135. C       GL_AUX3 
  1136. C  RenderingMode 
  1137.        integer*4   GL_RENDER
  1138.        parameter ( GL_RENDER = 7168 ) 
  1139.        integer*4   GL_FEEDBACK
  1140.        parameter ( GL_FEEDBACK = 7169 ) 
  1141.        integer*4   GL_SELECT
  1142.        parameter ( GL_SELECT = 7170 ) 
  1143. C  SamplePattern 
  1144. C       GL_1PASS_SGIS 
  1145. C       GL_2PASS_0_SGIS 
  1146. C       GL_2PASS_1_SGIS 
  1147. C       GL_4PASS_0_SGIS 
  1148. C       GL_4PASS_1_SGIS 
  1149. C       GL_4PASS_2_SGIS 
  1150. C       GL_4PASS_3_SGIS 
  1151. C  SeparableTarget 
  1152. C       GL_SEPARABLE_2D_EXT 
  1153. C  ShadingModel 
  1154.        integer*4   GL_FLAT
  1155.        parameter ( GL_FLAT = 7424 ) 
  1156.        integer*4   GL_SMOOTH
  1157.        parameter ( GL_SMOOTH = 7425 ) 
  1158. C  StencilFunction 
  1159. C       GL_NEVER 
  1160. C       GL_LESS 
  1161. C       GL_EQUAL 
  1162. C       GL_LEQUAL 
  1163. C       GL_GREATER 
  1164. C       GL_NOTEQUAL 
  1165. C       GL_GEQUAL 
  1166. C       GL_ALWAYS 
  1167. C  StencilOp 
  1168. C       GL_ZERO 
  1169.        integer*4   GL_KEEP
  1170.        parameter ( GL_KEEP = 7680 ) 
  1171.        integer*4   GL_REPLACE
  1172.        parameter ( GL_REPLACE = 7681 ) 
  1173.        integer*4   GL_INCR
  1174.        parameter ( GL_INCR = 7682 ) 
  1175.        integer*4   GL_DECR
  1176.        parameter ( GL_DECR = 7683 ) 
  1177. C       GL_INVERT 
  1178. C  StringName 
  1179.        integer*4   GL_VENDOR
  1180.        parameter ( GL_VENDOR = 7936 ) 
  1181.        integer*4   GL_RENDERER
  1182.        parameter ( GL_RENDERER = 7937 ) 
  1183.        integer*4   GL_VERSION
  1184.        parameter ( GL_VERSION = 7938 ) 
  1185.        integer*4   GL_EXTENSIONS
  1186.        parameter ( GL_EXTENSIONS = 7939 ) 
  1187. C  TextureCoordName 
  1188.        integer*4   GL_S
  1189.        parameter ( GL_S = 8192 ) 
  1190.        integer*4   GL_T
  1191.        parameter ( GL_T = 8193 ) 
  1192.        integer*4   GL_R
  1193.        parameter ( GL_R = 8194 ) 
  1194.        integer*4   GL_Q
  1195.        parameter ( GL_Q = 8195 ) 
  1196. C  TextureEnvMode 
  1197.        integer*4   GL_MODULATE
  1198.        parameter ( GL_MODULATE = 8448 ) 
  1199.        integer*4   GL_DECAL
  1200.        parameter ( GL_DECAL = 8449 ) 
  1201. C       GL_BLEND 
  1202. C       GL_REPLACE_EXT 
  1203. C  TextureEnvParameter 
  1204.        integer*4   GL_TEXTURE_ENV_MODE
  1205.        parameter ( GL_TEXTURE_ENV_MODE = 8704 ) 
  1206.        integer*4   GL_TEXTURE_ENV_COLOR
  1207.        parameter ( GL_TEXTURE_ENV_COLOR = 8705 ) 
  1208. C  TextureEnvTarget 
  1209.        integer*4   GL_TEXTURE_ENV
  1210.        parameter ( GL_TEXTURE_ENV = 8960 ) 
  1211. C  TextureGenMode 
  1212.        integer*4   GL_EYE_LINEAR
  1213.        parameter ( GL_EYE_LINEAR = 9216 ) 
  1214.        integer*4   GL_OBJECT_LINEAR
  1215.        parameter ( GL_OBJECT_LINEAR = 9217 ) 
  1216.        integer*4   GL_SPHERE_MAP
  1217.        parameter ( GL_SPHERE_MAP = 9218 ) 
  1218. C  TextureGenParameter 
  1219.        integer*4   GL_TEXTURE_GEN_MODE
  1220.        parameter ( GL_TEXTURE_GEN_MODE = 9472 ) 
  1221.        integer*4   GL_OBJECT_PLANE
  1222.        parameter ( GL_OBJECT_PLANE = 9473 ) 
  1223.        integer*4   GL_EYE_PLANE
  1224.        parameter ( GL_EYE_PLANE = 9474 ) 
  1225. C  TextureMagFilter 
  1226.        integer*4   GL_NEAREST
  1227.        parameter ( GL_NEAREST = 9728 ) 
  1228.        integer*4   GL_LINEAR
  1229.        parameter ( GL_LINEAR = 9729 ) 
  1230. C       GL_LINEAR_DETAIL_SGIS 
  1231. C       GL_LINEAR_DETAIL_ALPHA_SGIS 
  1232. C       GL_LINEAR_DETAIL_COLOR_SGIS 
  1233. C       GL_LINEAR_SHARPEN_SGIS 
  1234. C       GL_LINEAR_SHARPEN_ALPHA_SGIS 
  1235. C       GL_LINEAR_SHARPEN_COLOR_SGIS 
  1236. C  TextureMinFilter 
  1237. C       GL_NEAREST 
  1238. C       GL_LINEAR 
  1239.        integer*4   GL_NEAREST_MIPMAP_NEAREST
  1240.        parameter ( GL_NEAREST_MIPMAP_NEAREST = 9984 ) 
  1241.        integer*4   GL_LINEAR_MIPMAP_NEAREST
  1242.        parameter ( GL_LINEAR_MIPMAP_NEAREST = 9985 ) 
  1243.        integer*4   GL_NEAREST_MIPMAP_LINEAR
  1244.        parameter ( GL_NEAREST_MIPMAP_LINEAR = 9986 ) 
  1245.        integer*4   GL_LINEAR_MIPMAP_LINEAR
  1246.        parameter ( GL_LINEAR_MIPMAP_LINEAR = 9987 ) 
  1247. C  TextureParameterName 
  1248.        integer*4   GL_TEXTURE_MAG_FILTER
  1249.        parameter ( GL_TEXTURE_MAG_FILTER = 10240 ) 
  1250.        integer*4   GL_TEXTURE_MIN_FILTER
  1251.        parameter ( GL_TEXTURE_MIN_FILTER = 10241 ) 
  1252.        integer*4   GL_TEXTURE_WRAP_S
  1253.        parameter ( GL_TEXTURE_WRAP_S = 10242 ) 
  1254.        integer*4   GL_TEXTURE_WRAP_T
  1255.        parameter ( GL_TEXTURE_WRAP_T = 10243 ) 
  1256. C       GL_TEXTURE_BORDER_COLOR 
  1257. C       GL_TEXTURE_WRAP_R_EXT 
  1258. C       GL_DETAIL_TEXTURE_LEVEL_SGIS 
  1259. C       GL_DETAIL_TEXTURE_MODE_SGIS 
  1260. C  TextureTarget 
  1261. C       GL_TEXTURE_1D 
  1262. C       GL_TEXTURE_2D 
  1263. C       GL_PROXY_TEXTURE_1D_EXT 
  1264. C       GL_PROXY_TEXTURE_2D_EXT 
  1265. C       GL_TEXTURE_3D_EXT 
  1266. C       GL_PROXY_TEXTURE_3D_EXT 
  1267. C       GL_DETAIL_TEXTURE_2D_SGIS 
  1268. C  TextureWrapMode 
  1269.        integer*4   GL_CLAMP
  1270.        parameter ( GL_CLAMP = 10496 ) 
  1271.        integer*4   GL_REPEAT
  1272.        parameter ( GL_REPEAT = 10497 ) 
  1273. C  ClipPlaneName 
  1274.        integer*4   GL_CLIP_PLANE0
  1275.        parameter ( GL_CLIP_PLANE0 = 12288 ) 
  1276.        integer*4   GL_CLIP_PLANE1
  1277.        parameter ( GL_CLIP_PLANE1 = 12289 ) 
  1278.        integer*4   GL_CLIP_PLANE2
  1279.        parameter ( GL_CLIP_PLANE2 = 12290 ) 
  1280.        integer*4   GL_CLIP_PLANE3
  1281.        parameter ( GL_CLIP_PLANE3 = 12291 ) 
  1282.        integer*4   GL_CLIP_PLANE4
  1283.        parameter ( GL_CLIP_PLANE4 = 12292 ) 
  1284.        integer*4   GL_CLIP_PLANE5
  1285.        parameter ( GL_CLIP_PLANE5 = 12293 ) 
  1286. C  LightName 
  1287.        integer*4   GL_LIGHT0
  1288.        parameter ( GL_LIGHT0 = 16384 ) 
  1289.        integer*4   GL_LIGHT1
  1290.        parameter ( GL_LIGHT1 = 16385 ) 
  1291.        integer*4   GL_LIGHT2
  1292.        parameter ( GL_LIGHT2 = 16386 ) 
  1293.        integer*4   GL_LIGHT3
  1294.        parameter ( GL_LIGHT3 = 16387 ) 
  1295.        integer*4   GL_LIGHT4
  1296.        parameter ( GL_LIGHT4 = 16388 ) 
  1297.        integer*4   GL_LIGHT5
  1298.        parameter ( GL_LIGHT5 = 16389 ) 
  1299.        integer*4   GL_LIGHT6
  1300.        parameter ( GL_LIGHT6 = 16390 ) 
  1301.        integer*4   GL_LIGHT7
  1302.        parameter ( GL_LIGHT7 = 16391 ) 
  1303. C  Extensions 
  1304.        integer*4   GL_EXT_abgr
  1305.        parameter ( GL_EXT_abgr = 1 ) 
  1306.        integer*4   GL_EXT_blend_color
  1307.        parameter ( GL_EXT_blend_color = 1 ) 
  1308.        integer*4   GL_EXT_blend_logic_op
  1309.        parameter ( GL_EXT_blend_logic_op = 1 ) 
  1310.        integer*4   GL_EXT_blend_minmax
  1311.        parameter ( GL_EXT_blend_minmax = 1 ) 
  1312.        integer*4   GL_EXT_blend_subtract
  1313.        parameter ( GL_EXT_blend_subtract = 1 ) 
  1314.        integer*4   GL_EXT_convolution
  1315.        parameter ( GL_EXT_convolution = 1 ) 
  1316.        integer*4   GL_EXT_histogram
  1317.        parameter ( GL_EXT_histogram = 1 ) 
  1318.        integer*4   GL_EXT_polygon_offset
  1319.        parameter ( GL_EXT_polygon_offset = 1 ) 
  1320.        integer*4   GL_EXT_subtexture
  1321.        parameter ( GL_EXT_subtexture = 1 ) 
  1322.        integer*4   GL_EXT_texture
  1323.        parameter ( GL_EXT_texture = 1 ) 
  1324.        integer*4   GL_EXT_texture3D
  1325.        parameter ( GL_EXT_texture3D = 1 ) 
  1326.        integer*4   GL_SGIS_detail_texture
  1327.        parameter ( GL_SGIS_detail_texture = 1 ) 
  1328.        integer*4   GL_SGIS_multisample
  1329.        parameter ( GL_SGIS_multisample = 1 ) 
  1330.        integer*4   GL_SGIS_sharpen_texture
  1331.        parameter ( GL_SGIS_sharpen_texture = 1 ) 
  1332. C  EXT_abgr 
  1333.        integer*4   GL_ABGR_EXT
  1334.        parameter ( GL_ABGR_EXT = 32768 ) 
  1335. C  EXT_blend_color 
  1336.        integer*4   GL_CONSTANT_COLOR_EXT
  1337.        parameter ( GL_CONSTANT_COLOR_EXT = 32769 ) 
  1338.        integer*4   GL_ONE_MINUS_CONSTANT_COLOR_EXT
  1339.        parameter ( GL_ONE_MINUS_CONSTANT_COLOR_EXT = 32770 ) 
  1340.        integer*4   GL_CONSTANT_ALPHA_EXT
  1341.        parameter ( GL_CONSTANT_ALPHA_EXT = 32771 ) 
  1342.        integer*4   GL_ONE_MINUS_CONSTANT_ALPHA_EXT
  1343.        parameter ( GL_ONE_MINUS_CONSTANT_ALPHA_EXT = 32772 ) 
  1344.        integer*4   GL_BLEND_COLOR_EXT
  1345.        parameter ( GL_BLEND_COLOR_EXT = 32773 ) 
  1346. C  EXT_blend_minmax 
  1347.        integer*4   GL_FUNC_ADD_EXT
  1348.        parameter ( GL_FUNC_ADD_EXT = 32774 ) 
  1349.        integer*4   GL_MIN_EXT
  1350.        parameter ( GL_MIN_EXT = 32775 ) 
  1351.        integer*4   GL_MAX_EXT
  1352.        parameter ( GL_MAX_EXT = 32776 ) 
  1353.        integer*4   GL_BLEND_EQUATION_EXT
  1354.        parameter ( GL_BLEND_EQUATION_EXT = 32777 ) 
  1355. C  EXT_blend_subtract 
  1356.        integer*4   GL_FUNC_SUBTRACT_EXT
  1357.        parameter ( GL_FUNC_SUBTRACT_EXT = 32778 ) 
  1358.        integer*4   GL_FUNC_REVERSE_SUBTRACT_EXT
  1359.        parameter ( GL_FUNC_REVERSE_SUBTRACT_EXT = 32779 ) 
  1360. C  EXT_convolution 
  1361.        integer*4   GL_CONVOLUTION_1D_EXT
  1362.        parameter ( GL_CONVOLUTION_1D_EXT = 32784 ) 
  1363.        integer*4   GL_CONVOLUTION_2D_EXT
  1364.        parameter ( GL_CONVOLUTION_2D_EXT = 32785 ) 
  1365.        integer*4   GL_SEPARABLE_2D_EXT
  1366.        parameter ( GL_SEPARABLE_2D_EXT = 32786 ) 
  1367.        integer*4   GL_CONVOLUTION_BORDER_MODE_EXT
  1368.        parameter ( GL_CONVOLUTION_BORDER_MODE_EXT = 32787 ) 
  1369.        integer*4   GL_CONVOLUTION_FILTER_SCALE_EXT
  1370.        parameter ( GL_CONVOLUTION_FILTER_SCALE_EXT = 32788 ) 
  1371.        integer*4   GL_CONVOLUTION_FILTER_BIAS_EXT
  1372.        parameter ( GL_CONVOLUTION_FILTER_BIAS_EXT = 32789 ) 
  1373.        integer*4   GL_REDUCE_EXT
  1374.        parameter ( GL_REDUCE_EXT = 32790 ) 
  1375.        integer*4   GL_CONVOLUTION_FORMAT_EXT
  1376.        parameter ( GL_CONVOLUTION_FORMAT_EXT = 32791 ) 
  1377.        integer*4   GL_CONVOLUTION_WIDTH_EXT
  1378.        parameter ( GL_CONVOLUTION_WIDTH_EXT = 32792 ) 
  1379.        integer*4   GL_CONVOLUTION_HEIGHT_EXT
  1380.        parameter ( GL_CONVOLUTION_HEIGHT_EXT = 32793 ) 
  1381.        integer*4   GL_MAX_CONVOLUTION_WIDTH_EXT
  1382.        parameter ( GL_MAX_CONVOLUTION_WIDTH_EXT = 32794 ) 
  1383.        integer*4   GL_MAX_CONVOLUTION_HEIGHT_EXT
  1384.        parameter ( GL_MAX_CONVOLUTION_HEIGHT_EXT = 32795 ) 
  1385.        integer*4   GL_POST_CONVOLUTION_RED_SCALE_EX
  1386.        parameter ( GL_POST_CONVOLUTION_RED_SCALE_EX = 32796 ) 
  1387.        integer*4   GL_POST_CONVOLUTION_GREEN_SCALE_
  1388.        parameter ( GL_POST_CONVOLUTION_GREEN_SCALE_ = 32797 ) 
  1389.        integer*4   GL_POST_CONVOLUTION_BLUE_SCALE_E
  1390.        parameter ( GL_POST_CONVOLUTION_BLUE_SCALE_E = 32798 ) 
  1391.        integer*4   GL_POST_CONVOLUTION_ALPHA_SCALE_
  1392.        parameter ( GL_POST_CONVOLUTION_ALPHA_SCALE_ = 32799 ) 
  1393.        integer*4   GL_POST_CONVOLUTION_RED_BIAS_EXT
  1394.        parameter ( GL_POST_CONVOLUTION_RED_BIAS_EXT = 32800 ) 
  1395.        integer*4   GL_POST_CONVOLUTION_GREEN_BIAS_E
  1396.        parameter ( GL_POST_CONVOLUTION_GREEN_BIAS_E = 32801 ) 
  1397.        integer*4   GL_POST_CONVOLUTION_BLUE_BIAS_EX
  1398.        parameter ( GL_POST_CONVOLUTION_BLUE_BIAS_EX = 32802 ) 
  1399.        integer*4   GL_POST_CONVOLUTION_ALPHA_BIAS_E
  1400.        parameter ( GL_POST_CONVOLUTION_ALPHA_BIAS_E = 32803 ) 
  1401. C  EXT_histogram 
  1402.        integer*4   GL_HISTOGRAM_EXT
  1403.        parameter ( GL_HISTOGRAM_EXT = 32804 ) 
  1404.        integer*4   GL_PROXY_HISTOGRAM_EXT
  1405.        parameter ( GL_PROXY_HISTOGRAM_EXT = 32805 ) 
  1406.        integer*4   GL_HISTOGRAM_WIDTH_EXT
  1407.        parameter ( GL_HISTOGRAM_WIDTH_EXT = 32806 ) 
  1408.        integer*4   GL_HISTOGRAM_FORMAT_EXT
  1409.        parameter ( GL_HISTOGRAM_FORMAT_EXT = 32807 ) 
  1410.        integer*4   GL_HISTOGRAM_RED_SIZE_EXT
  1411.        parameter ( GL_HISTOGRAM_RED_SIZE_EXT = 32808 ) 
  1412.        integer*4   GL_HISTOGRAM_GREEN_SIZE_EXT
  1413.        parameter ( GL_HISTOGRAM_GREEN_SIZE_EXT = 32809 ) 
  1414.        integer*4   GL_HISTOGRAM_BLUE_SIZE_EXT
  1415.        parameter ( GL_HISTOGRAM_BLUE_SIZE_EXT = 32810 ) 
  1416.        integer*4   GL_HISTOGRAM_ALPHA_SIZE_EXT
  1417.        parameter ( GL_HISTOGRAM_ALPHA_SIZE_EXT = 32811 ) 
  1418.        integer*4   GL_HISTOGRAM_LUMINANCE_SIZE_EXT
  1419.        parameter ( GL_HISTOGRAM_LUMINANCE_SIZE_EXT = 32812 ) 
  1420.        integer*4   GL_HISTOGRAM_SINK_EXT
  1421.        parameter ( GL_HISTOGRAM_SINK_EXT = 32813 ) 
  1422.        integer*4   GL_MINMAX_EXT
  1423.        parameter ( GL_MINMAX_EXT = 32814 ) 
  1424.        integer*4   GL_MINMAX_FORMAT_EXT
  1425.        parameter ( GL_MINMAX_FORMAT_EXT = 32815 ) 
  1426.        integer*4   GL_MINMAX_SINK_EXT
  1427.        parameter ( GL_MINMAX_SINK_EXT = 32816 ) 
  1428.        integer*4   GL_TABLE_TOO_LARGE_EXT
  1429.        parameter ( GL_TABLE_TOO_LARGE_EXT = 32817 ) 
  1430. C  EXT_polygon_offset 
  1431.        integer*4   GL_POLYGON_OFFSET_EXT
  1432.        parameter ( GL_POLYGON_OFFSET_EXT = 32823 ) 
  1433.        integer*4   GL_POLYGON_OFFSET_FACTOR_EXT
  1434.        parameter ( GL_POLYGON_OFFSET_FACTOR_EXT = 32824 ) 
  1435.        integer*4   GL_POLYGON_OFFSET_BIAS_EXT
  1436.        parameter ( GL_POLYGON_OFFSET_BIAS_EXT = 32825 ) 
  1437. C  EXT_texture 
  1438.        integer*4   GL_ALPHA4_EXT
  1439.        parameter ( GL_ALPHA4_EXT = 32827 ) 
  1440.        integer*4   GL_ALPHA8_EXT
  1441.        parameter ( GL_ALPHA8_EXT = 32828 ) 
  1442.        integer*4   GL_ALPHA12_EXT
  1443.        parameter ( GL_ALPHA12_EXT = 32829 ) 
  1444.        integer*4   GL_ALPHA16_EXT
  1445.        parameter ( GL_ALPHA16_EXT = 32830 ) 
  1446.        integer*4   GL_LUMINANCE4_EXT
  1447.        parameter ( GL_LUMINANCE4_EXT = 32831 ) 
  1448.        integer*4   GL_LUMINANCE8_EXT
  1449.        parameter ( GL_LUMINANCE8_EXT = 32832 ) 
  1450.        integer*4   GL_LUMINANCE12_EXT
  1451.        parameter ( GL_LUMINANCE12_EXT = 32833 ) 
  1452.        integer*4   GL_LUMINANCE16_EXT
  1453.        parameter ( GL_LUMINANCE16_EXT = 32834 ) 
  1454.        integer*4   GL_LUMINANCE4_ALPHA4_EXT
  1455.        parameter ( GL_LUMINANCE4_ALPHA4_EXT = 32835 ) 
  1456.        integer*4   GL_LUMINANCE6_ALPHA2_EXT
  1457.        parameter ( GL_LUMINANCE6_ALPHA2_EXT = 32836 ) 
  1458.        integer*4   GL_LUMINANCE8_ALPHA8_EXT
  1459.        parameter ( GL_LUMINANCE8_ALPHA8_EXT = 32837 ) 
  1460.        integer*4   GL_LUMINANCE12_ALPHA4_EXT
  1461.        parameter ( GL_LUMINANCE12_ALPHA4_EXT = 32838 ) 
  1462.        integer*4   GL_LUMINANCE12_ALPHA12_EXT
  1463.        parameter ( GL_LUMINANCE12_ALPHA12_EXT = 32839 ) 
  1464.        integer*4   GL_LUMINANCE16_ALPHA16_EXT
  1465.        parameter ( GL_LUMINANCE16_ALPHA16_EXT = 32840 ) 
  1466.        integer*4   GL_INTENSITY_EXT
  1467.        parameter ( GL_INTENSITY_EXT = 32841 ) 
  1468.        integer*4   GL_INTENSITY4_EXT
  1469.        parameter ( GL_INTENSITY4_EXT = 32842 ) 
  1470.        integer*4   GL_INTENSITY8_EXT
  1471.        parameter ( GL_INTENSITY8_EXT = 32843 ) 
  1472.        integer*4   GL_INTENSITY12_EXT
  1473.        parameter ( GL_INTENSITY12_EXT = 32844 ) 
  1474.        integer*4   GL_INTENSITY16_EXT
  1475.        parameter ( GL_INTENSITY16_EXT = 32845 ) 
  1476.        integer*4   GL_RGB2_EXT
  1477.        parameter ( GL_RGB2_EXT = 32846 ) 
  1478.        integer*4   GL_RGB4_EXT
  1479.        parameter ( GL_RGB4_EXT = 32847 ) 
  1480.        integer*4   GL_RGB5_EXT
  1481.        parameter ( GL_RGB5_EXT = 32848 ) 
  1482.        integer*4   GL_RGB8_EXT
  1483.        parameter ( GL_RGB8_EXT = 32849 ) 
  1484.        integer*4   GL_RGB10_EXT
  1485.        parameter ( GL_RGB10_EXT = 32850 ) 
  1486.        integer*4   GL_RGB12_EXT
  1487.        parameter ( GL_RGB12_EXT = 32851 ) 
  1488.        integer*4   GL_RGB16_EXT
  1489.        parameter ( GL_RGB16_EXT = 32852 ) 
  1490.        integer*4   GL_RGBA2_EXT
  1491.        parameter ( GL_RGBA2_EXT = 32853 ) 
  1492.        integer*4   GL_RGBA4_EXT
  1493.        parameter ( GL_RGBA4_EXT = 32854 ) 
  1494.        integer*4   GL_RGB5_A1_EXT
  1495.        parameter ( GL_RGB5_A1_EXT = 32855 ) 
  1496.        integer*4   GL_RGBA8_EXT
  1497.        parameter ( GL_RGBA8_EXT = 32856 ) 
  1498.        integer*4   GL_RGB10_A2_EXT
  1499.        parameter ( GL_RGB10_A2_EXT = 32857 ) 
  1500.        integer*4   GL_RGBA12_EXT
  1501.        parameter ( GL_RGBA12_EXT = 32858 ) 
  1502.        integer*4   GL_RGBA16_EXT
  1503.        parameter ( GL_RGBA16_EXT = 32859 ) 
  1504.        integer*4   GL_TEXTURE_RED_SIZE_EXT
  1505.        parameter ( GL_TEXTURE_RED_SIZE_EXT = 32860 ) 
  1506.        integer*4   GL_TEXTURE_GREEN_SIZE_EXT
  1507.        parameter ( GL_TEXTURE_GREEN_SIZE_EXT = 32861 ) 
  1508.        integer*4   GL_TEXTURE_BLUE_SIZE_EXT
  1509.        parameter ( GL_TEXTURE_BLUE_SIZE_EXT = 32862 ) 
  1510.        integer*4   GL_TEXTURE_ALPHA_SIZE_EXT
  1511.        parameter ( GL_TEXTURE_ALPHA_SIZE_EXT = 32863 ) 
  1512.        integer*4   GL_TEXTURE_LUMINANCE_SIZE_EXT
  1513.        parameter ( GL_TEXTURE_LUMINANCE_SIZE_EXT = 32864 ) 
  1514.        integer*4   GL_TEXTURE_INTENSITY_SIZE_EXT
  1515.        parameter ( GL_TEXTURE_INTENSITY_SIZE_EXT = 32865 ) 
  1516.        integer*4   GL_REPLACE_EXT
  1517.        parameter ( GL_REPLACE_EXT = 32866 ) 
  1518.        integer*4   GL_PROXY_TEXTURE_1D_EXT
  1519.        parameter ( GL_PROXY_TEXTURE_1D_EXT = 32867 ) 
  1520.        integer*4   GL_PROXY_TEXTURE_2D_EXT
  1521.        parameter ( GL_PROXY_TEXTURE_2D_EXT = 32868 ) 
  1522.        integer*4   GL_TEXTURE_TOO_LARGE_EXT
  1523.        parameter ( GL_TEXTURE_TOO_LARGE_EXT = 32869 ) 
  1524. C  EXT_texture3D 
  1525.        integer*4   GL_PACK_SKIP_IMAGES_EXT
  1526.        parameter ( GL_PACK_SKIP_IMAGES_EXT = 32875 ) 
  1527.        integer*4   GL_PACK_IMAGE_HEIGHT_EXT
  1528.        parameter ( GL_PACK_IMAGE_HEIGHT_EXT = 32876 ) 
  1529.        integer*4   GL_UNPACK_SKIP_IMAGES_EXT
  1530.        parameter ( GL_UNPACK_SKIP_IMAGES_EXT = 32877 ) 
  1531.        integer*4   GL_UNPACK_IMAGE_HEIGHT_EXT
  1532.        parameter ( GL_UNPACK_IMAGE_HEIGHT_EXT = 32878 ) 
  1533.        integer*4   GL_TEXTURE_3D_EXT
  1534.        parameter ( GL_TEXTURE_3D_EXT = 32879 ) 
  1535.        integer*4   GL_PROXY_TEXTURE_3D_EXT
  1536.        parameter ( GL_PROXY_TEXTURE_3D_EXT = 32880 ) 
  1537.        integer*4   GL_TEXTURE_DEPTH_EXT
  1538.        parameter ( GL_TEXTURE_DEPTH_EXT = 32881 ) 
  1539.        integer*4   GL_TEXTURE_WRAP_R_EXT
  1540.        parameter ( GL_TEXTURE_WRAP_R_EXT = 32882 ) 
  1541.        integer*4   GL_MAX_3D_TEXTURE_SIZE_EXT
  1542.        parameter ( GL_MAX_3D_TEXTURE_SIZE_EXT = 32883 ) 
  1543. C  SGIS_detail_texture 
  1544.        integer*4   GL_DETAIL_TEXTURE_2D_SGIS
  1545.        parameter ( GL_DETAIL_TEXTURE_2D_SGIS = 32917 ) 
  1546.        integer*4   GL_DETAIL_TEXTURE_2D_BINDING_SGI
  1547.        parameter ( GL_DETAIL_TEXTURE_2D_BINDING_SGI = 32918 ) 
  1548.        integer*4   GL_LINEAR_DETAIL_SGIS
  1549.        parameter ( GL_LINEAR_DETAIL_SGIS = 32919 ) 
  1550.        integer*4   GL_LINEAR_DETAIL_ALPHA_SGIS
  1551.        parameter ( GL_LINEAR_DETAIL_ALPHA_SGIS = 32920 ) 
  1552.        integer*4   GL_LINEAR_DETAIL_COLOR_SGIS
  1553.        parameter ( GL_LINEAR_DETAIL_COLOR_SGIS = 32921 ) 
  1554.        integer*4   GL_DETAIL_TEXTURE_LEVEL_SGIS
  1555.        parameter ( GL_DETAIL_TEXTURE_LEVEL_SGIS = 32922 ) 
  1556.        integer*4   GL_DETAIL_TEXTURE_MODE_SGIS
  1557.        parameter ( GL_DETAIL_TEXTURE_MODE_SGIS = 32923 ) 
  1558.        integer*4   GL_DETAIL_TEXTURE_FUNC_POINTS_S
  1559.        parameter ( GL_DETAIL_TEXTURE_FUNC_POINTS_S = 32924 ) 
  1560. C  SGIS_multisample 
  1561.        integer*4   GL_MULTISAMPLE_BIT_EXT
  1562.        parameter ( GL_MULTISAMPLE_BIT_EXT = 536870912 ) 
  1563.        integer*4   GL_MULTISAMPLE_SGIS
  1564.        parameter ( GL_MULTISAMPLE_SGIS = 32925 ) 
  1565.        integer*4   GL_SAMPLE_ALPHA_TO_MASK_SGIS
  1566.        parameter ( GL_SAMPLE_ALPHA_TO_MASK_SGIS = 32926 ) 
  1567.        integer*4   GL_SAMPLE_ALPHA_TO_ONE_SGIS
  1568.        parameter ( GL_SAMPLE_ALPHA_TO_ONE_SGIS = 32927 ) 
  1569.        integer*4   GL_SAMPLE_MASK_SGIS
  1570.        parameter ( GL_SAMPLE_MASK_SGIS = 32928 ) 
  1571.        integer*4   GL_1PASS_SGIS
  1572.        parameter ( GL_1PASS_SGIS = 32929 ) 
  1573.        integer*4   GL_2PASS_0_SGIS
  1574.        parameter ( GL_2PASS_0_SGIS = 32930 ) 
  1575.        integer*4   GL_2PASS_1_SGIS
  1576.        parameter ( GL_2PASS_1_SGIS = 32931 ) 
  1577.        integer*4   GL_4PASS_0_SGIS
  1578.        parameter ( GL_4PASS_0_SGIS = 32932 ) 
  1579.        integer*4   GL_4PASS_1_SGIS
  1580.        parameter ( GL_4PASS_1_SGIS = 32933 ) 
  1581.        integer*4   GL_4PASS_2_SGIS
  1582.        parameter ( GL_4PASS_2_SGIS = 32934 ) 
  1583.        integer*4   GL_4PASS_3_SGIS
  1584.        parameter ( GL_4PASS_3_SGIS = 32935 ) 
  1585.        integer*4   GL_SAMPLE_BUFFERS_SGIS
  1586.        parameter ( GL_SAMPLE_BUFFERS_SGIS = 32936 ) 
  1587.        integer*4   GL_SAMPLES_SGIS
  1588.        parameter ( GL_SAMPLES_SGIS = 32937 ) 
  1589.        integer*4   GL_SAMPLE_MASK_VALUE_SGIS
  1590.        parameter ( GL_SAMPLE_MASK_VALUE_SGIS = 32938 ) 
  1591.        integer*4   GL_SAMPLE_MASK_INVERT_SGIS
  1592.        parameter ( GL_SAMPLE_MASK_INVERT_SGIS = 32939 ) 
  1593.        integer*4   GL_SAMPLE_PATTERN_SGIS
  1594.        parameter ( GL_SAMPLE_PATTERN_SGIS = 32940 ) 
  1595. C  SGIS_sharpen_texture 
  1596.        integer*4   GL_LINEAR_SHARPEN_SGIS
  1597.        parameter ( GL_LINEAR_SHARPEN_SGIS = 32941 ) 
  1598.        integer*4   GL_LINEAR_SHARPEN_ALPHA_SGIS
  1599.        parameter ( GL_LINEAR_SHARPEN_ALPHA_SGIS = 32942 ) 
  1600.        integer*4   GL_LINEAR_SHARPEN_COLOR_SGIS
  1601.        parameter ( GL_LINEAR_SHARPEN_COLOR_SGIS = 32943 ) 
  1602.        integer*4   GL_SHARPEN_TEXTURE_FUNC_POINTS_S
  1603.        parameter ( GL_SHARPEN_TEXTURE_FUNC_POINTS_S = 32944 ) 
  1604. C ***********************************************************
  1605.        character*128       fglGetString
  1606.        integer             fglGetError
  1607.        integer*4           fglRenderMode
  1608.        logical*1           fglAreTexturesResidentEXT
  1609.        logical*1           fglIsEnabled
  1610.        logical*1           fglIsList
  1611.        logical*1           fglIsTextureEXT
  1612.        logical*4           fglGenLists
  1613.        logical*4           fglGenTexturesEXT