<html><head> <link rel="stylesheet" href="_style.css" type="text/css"> <meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> <link rel="Start" href="index.html"> <link title="Index of types" rel=Appendix href="index_types.html"> <link title="Index of values" rel=Appendix href="index_values.html"> <link title="Index of modules" rel=Appendix href="index_modules.html"> <link title="GL" rel="Chapter" href="GL.html"> <link title="Glu" rel="Chapter" href="Glu.html"> <link title="Glut" rel="Chapter" href="Glut.html"> <link title="VertArray" rel="Chapter" href="VertArray.html"> <link title="GLE" rel="Chapter" href="GLE.html"> <link title="Ftgl" rel="Chapter" href="Ftgl.html"> <link title="Jpeg_loader" rel="Chapter" href="Jpeg_loader.html"> <link title="Png_loader" rel="Chapter" href="Png_loader.html"> <link title="Svg_loader" rel="Chapter" href="Svg_loader.html"> <link title="Genimg_loader" rel="Chapter" href="Genimg_loader.html"> <link title="FunGL" rel="Chapter" href="FunGL.html"> <link title="FunGlut" rel="Chapter" href="FunGlut.html"><title>GLE</title> </head> <body> <code class="code"><span class="keyword">sig</span><br> <span class="keyword">type</span> join_style =<br> <span class="constructor">TUBE_JN_RAW</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_JN_ANGLE</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_JN_CUT</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_JN_ROUND</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_JN_CAP</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_NORM_FACET</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_NORM_EDGE</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_NORM_PATH_EDGE</span><br> <span class="keywordsign">|</span> <span class="constructor">TUBE_CONTOUR_CLOSED</span><br> <span class="keyword">external</span> gleSetJoinStyle : <span class="constructor">GLE</span>.join_style list <span class="keywordsign">-></span> unit<br> = <span class="string">"ml_glesetjoinstyle"</span><br> <span class="keyword">external</span> gleGetJoinStyle : unit <span class="keywordsign">-></span> <span class="constructor">GLE</span>.join_style list<br> = <span class="string">"ml_glegetjoinstyle"</span><br> <span class="keyword">external</span> gleDestroyGC : unit <span class="keywordsign">-></span> unit = <span class="string">"ml_gledestroygc"</span><br> <span class="keyword">type</span> gle_float<br> <span class="keyword">val</span> ba2_float32_of_array :<br> float array array <span class="keywordsign">-></span><br> (float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t<br> <span class="keyword">val</span> ba2_float32_create :<br> int <span class="keywordsign">-></span><br> int <span class="keywordsign">-></span> (float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t<br> <span class="keyword">val</span> ba2_glefloat_of_array :<br> float array array <span class="keywordsign">-></span><br> (float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t<br> <span class="keyword">val</span> ba2_glefloat_create :<br> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> (float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t<br> <span class="keyword">val</span> ba1_glefloat_of_array :<br> float array <span class="keywordsign">-></span><br> (float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array1</span>.t<br> <span class="keyword">val</span> ba1_glefloat_create :<br> int <span class="keywordsign">-></span> (float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array1</span>.t<br> <span class="keyword">val</span> colors_none :<br> (float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t<br> <span class="keyword">val</span> glePolyCylinder :<br> points:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> colors:(float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> radius:float <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> glePolyCone :<br> points:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> colors:(float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> radii:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array1</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> glePolyCone_c4f :<br> points:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> colors:(float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> radii:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array1</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> gleExtrusion :<br> contour:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> cont_normals:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> up:(float * float * float) option <span class="keywordsign">-></span><br> points:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> colors:(float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> unit<br> <span class="keyword">val</span> gleTwistExtrusion :<br> contour:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> cont_normals:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> up:(float * float * float) option <span class="keywordsign">-></span><br> points:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> colors:(float, <span class="constructor">Bigarray</span>.float32_elt, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t <span class="keywordsign">-></span><br> twist:(float, <span class="constructor">GLE</span>.gle_float, <span class="constructor">Bigarray</span>.c_layout) <span class="constructor">Bigarray</span>.<span class="constructor">Array1</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">end</span></code></body></html>