sig
type trans2 = [ `N | `T ]
type side = [ `L | `R ]
type diag = [ `N | `U ]
type norm2 = [ `I | `O ]
type norm4 = [ `F | `I | `M | `O ]
type svd_job = [ `A | `N | `O | `S ]
exception InternalError of string
type int_vec =
(int, Bigarray.int_elt, Bigarray.fortran_layout) Bigarray.Array1.t
val create_int_vec : int -> int_vec
type int32_vec =
(int32, Bigarray.int32_elt, Bigarray.fortran_layout) Bigarray.Array1.t
val create_int32_vec : int -> int32_vec
val mat_from_vec :
('a, 'b, 'c) Bigarray.Array1.t -> ('a, 'b, 'c) Bigarray.Array2.t
end