sig
type double_mat_flat = private {
data : float array;
off : int;
dim1 : int;
dim2 : int;
tda : int;
}
type matrix = Matrix_flat.double_mat_flat
val create : ?init:float -> int -> int -> Matrix_flat.matrix
val dims : Matrix_flat.matrix -> int * int
val of_array : float array -> int -> int -> Matrix_flat.matrix
val of_arrays : float array array -> Matrix_flat.matrix
val to_arrays : Matrix_flat.matrix -> float array array
val to_array : Matrix_flat.matrix -> float array
val get : Matrix_flat.matrix -> int -> int -> float
val set : Matrix_flat.matrix -> int -> int -> float -> unit
val set_all : Matrix_flat.matrix -> float -> unit
val set_zero : Matrix_flat.matrix -> unit
val set_id : Matrix_flat.matrix -> unit
val memcpy : src:Matrix_flat.matrix -> dst:Matrix_flat.matrix -> unit
val copy : Matrix_flat.matrix -> Matrix_flat.matrix
external add : Matrix_flat.matrix -> Matrix_flat.matrix -> unit
= "ml_gsl_matrix_add"
external sub : Matrix_flat.matrix -> Matrix_flat.matrix -> unit
= "ml_gsl_matrix_sub"
external mul_elements : Matrix_flat.matrix -> Matrix_flat.matrix -> unit
= "ml_gsl_matrix_mul"
external div_elements : Matrix_flat.matrix -> Matrix_flat.matrix -> unit
= "ml_gsl_matrix_div"
external scale : Matrix_flat.matrix -> float -> unit
= "ml_gsl_matrix_scale"
external add_constant : Matrix_flat.matrix -> float -> unit
= "ml_gsl_matrix_add_constant"
external add_diagonal : Matrix_flat.matrix -> float -> unit
= "ml_gsl_matrix_add_diagonal"
external is_null : Matrix_flat.matrix -> bool = "ml_gsl_matrix_isnull"
external swap_rows : Matrix_flat.matrix -> int -> int -> unit
= "ml_gsl_matrix_swap_rows"
external swap_columns : Matrix_flat.matrix -> int -> int -> unit
= "ml_gsl_matrix_swap_columns"
external swap_rowcol : Matrix_flat.matrix -> int -> int -> unit
= "ml_gsl_matrix_swap_rowcol"
external transpose : Matrix_flat.matrix -> Matrix_flat.matrix -> unit
= "ml_gsl_matrix_transpose_memcpy"
external transpose_in_place : Matrix_flat.matrix -> unit
= "ml_gsl_matrix_transpose"
val submatrix :
Matrix_flat.matrix ->
k1:int -> k2:int -> n1:int -> n2:int -> Matrix_flat.matrix
val row : Matrix_flat.matrix -> int -> Vector_flat.vector
val column : Matrix_flat.matrix -> int -> Vector_flat.vector
val diagonal : Matrix_flat.matrix -> Vector_flat.vector
val subdiagonal : Matrix_flat.matrix -> int -> Vector_flat.vector
val superdiagonal : Matrix_flat.matrix -> int -> Vector_flat.vector
val view_array :
float array -> ?off:int -> int -> ?tda:int -> int -> Matrix_flat.matrix
val view_vector :
Vector_flat.vector ->
?off:int -> int -> ?tda:int -> int -> Matrix_flat.matrix
end