/usr/lib/ocaml/lablgl/gluMat.ml is in liblablgl-ocaml-dev 1:1.05-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | (* $Id: gluMat.ml,v 1.2 2000-04-12 07:40:25 garrigue Exp $ *)
open Gl
external look_at :
eye:(float * float * float) ->
center:(float * float * float) ->
up:(float * float * float) -> unit
= "ml_gluLookAt"
external ortho2d :
left:float -> right:float -> bottom:float -> top:float -> unit
= "ml_gluOrtho2D"
let ortho2d ~x:(left,right) ~y:(bottom,top) =
ortho2d ~left ~right ~bottom ~top
external perspective :
fovy:float -> aspect:float -> znear:float -> zfar:float -> unit
= "ml_gluPerspective"
let perspective ~fovy ~aspect ~z:(znear,zfar) =
perspective ~fovy ~aspect ~znear ~zfar
external pick_matrix :
x:float -> y:float -> width:float -> height:float -> unit
= "ml_gluPickMatrix"
external project : point3 -> point3 = "ml_gluProject"
external unproject : point3 -> point3 = "ml_gluUnProject"
|