/usr/lib/ocaml/lablgl/glMap.mli is in liblablgl-ocaml-dev 1:1.05-2.
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 29 30 31 32 33 34 35 36 37 38 39 | (* $Id: glMap.mli,v 1.3 2000-04-12 07:40:24 garrigue Exp $ *)
type target =
[ `vertex_3
| `vertex_4
| `index
| `color_4
| `normal
| `texture_coord_1
| `texture_coord_2
| `texture_coord_3
| `texture_coord_4 ]
val map1 :
target:target -> float * float -> order:int -> [`double] Raw.t -> unit
(* [map1 :target (u1,u2) :order points] defines a 1-dimensional map.
[order] is the number of control points in [points] *)
val map2 :
target:target ->
float * float ->
order:int -> float * float -> order:int -> [`double] Raw.t -> unit
(* [map1 :target (u1,u2) order:uorder (v1,v2) order:vorder points]
defines a 2-dimensional map.
The number of control points in [points] is [uorder*vorder] *)
val eval_coord1 : float -> unit
val eval_coord2 : float -> float -> unit
(* Evaluate the maps at given coordinates *)
val grid1 : n:int -> range:float * float -> unit
val grid2 :
n1:int -> range1:float * float -> n2:int -> range2:float * float -> unit
(* Define 1- and 2-dimensional meshes to the maps *)
val eval_mesh1 : mode:[`line|`point] -> range:(int * int) -> unit
val eval_mesh2 :
mode:[`fill|`line|`point] -> range1:(int * int) -> range2:(int * int) -> unit
val eval_point1 : int -> unit
val eval_point2 : int -> int -> unit
(* Evaluate meshes at given coordinates *)
|