sig
  type complex_mat_flat = private {
    data : float array;
    off : int;
    dim1 : int;
    dim2 : int;
    tda : int;
  }
  type matrix = Matrix_complex_flat.complex_mat_flat
  val create :
    ?init:Gsl_complex.complex -> int -> int -> Matrix_complex_flat.matrix
  val dims : Matrix_complex_flat.matrix -> int * int
  val of_arrays :
    Gsl_complex.complex array array -> Matrix_complex_flat.matrix
  val of_array :
    Gsl_complex.complex array -> int -> int -> Matrix_complex_flat.matrix
  val to_arrays :
    Matrix_complex_flat.matrix -> Gsl_complex.complex array array
  val to_array : Matrix_complex_flat.matrix -> Gsl_complex.complex array
  val of_complex_array :
    float array -> int -> int -> Matrix_complex_flat.matrix
  val to_complex_array :
    Matrix_complex_flat.matrix -> Gsl_complex.complex_array
  val get : Matrix_complex_flat.matrix -> int -> int -> Gsl_complex.complex
  val set :
    Matrix_complex_flat.matrix -> int -> int -> Gsl_complex.complex -> unit
  val set_all : Matrix_complex_flat.matrix -> Gsl_complex.complex -> unit
  val set_zero : Matrix_complex_flat.matrix -> unit
  val set_id : Matrix_complex_flat.matrix -> unit
  val memcpy :
    src:Matrix_complex_flat.matrix -> dst:Matrix_complex_flat.matrix -> unit
  val copy : Matrix_complex_flat.matrix -> Matrix_complex_flat.matrix
  external add :
    Matrix_complex_flat.matrix -> Matrix_complex_flat.matrix -> unit
    = "ml_gsl_matrix_complex_add"
  external sub :
    Matrix_complex_flat.matrix -> Matrix_complex_flat.matrix -> unit
    = "ml_gsl_matrix_complex_sub"
  external mul_elements :
    Matrix_complex_flat.matrix -> Matrix_complex_flat.matrix -> unit
    = "ml_gsl_matrix_complex_mul"
  external div_elements :
    Matrix_complex_flat.matrix -> Matrix_complex_flat.matrix -> unit
    = "ml_gsl_matrix_complex_div"
  external scale : Matrix_complex_flat.matrix -> float -> unit
    = "ml_gsl_matrix_complex_scale"
  external add_constant : Matrix_complex_flat.matrix -> float -> unit
    = "ml_gsl_matrix_complex_add_constant"
  external add_diagonal :
    Matrix_complex_flat.matrix -> Gsl_complex.complex -> unit
    = "ml_gsl_matrix_complex_add_diagonal"
  external is_null : Matrix_complex_flat.matrix -> bool
    = "ml_gsl_matrix_complex_isnull"
  external swap_rows : Matrix_complex_flat.matrix -> int -> int -> unit
    = "ml_gsl_matrix_complex_swap_rows"
  external swap_columns : Matrix_complex_flat.matrix -> int -> int -> unit
    = "ml_gsl_matrix_complex_swap_columns"
  external swap_rowcol : Matrix_complex_flat.matrix -> int -> int -> unit
    = "ml_gsl_matrix_complex_swap_rowcol"
  external transpose :
    Matrix_complex_flat.matrix -> Matrix_complex_flat.matrix -> unit
    = "ml_gsl_matrix_complex_transpose_memcpy"
  external transpose_in_place : Matrix_complex_flat.matrix -> unit
    = "ml_gsl_matrix_complex_transpose"
  val submatrix :
    Matrix_complex_flat.matrix ->
    k1:int -> k2:int -> n1:int -> n2:int -> Matrix_complex_flat.matrix
  val row : Matrix_complex_flat.matrix -> int -> Vector_complex_flat.vector
  val column :
    Matrix_complex_flat.matrix -> int -> Vector_complex_flat.vector
  val diagonal : Matrix_complex_flat.matrix -> Vector_complex_flat.vector
  val subdiagonal :
    Matrix_complex_flat.matrix -> int -> Vector_complex_flat.vector
  val superdiagonal :
    Matrix_complex_flat.matrix -> int -> Vector_complex_flat.vector
  val view_complex_array :
    Gsl_complex.complex_array ->
    ?off:int -> int -> ?tda:int -> int -> Matrix_complex_flat.matrix
  val view_vector :
    Vector_complex_flat.vector ->
    ?off:int -> int -> ?tda:int -> int -> Matrix_complex_flat.matrix
end