sig
  type order = Gsl_blas.order = RowMajor | ColMajor
  type transpose = Gsl_blas.transpose = NoTrans | Trans | ConjTrans
  type uplo = Gsl_blas.uplo = Upper | Lower
  type diag = Gsl_blas.diag = NonUnit | Unit
  type side = Gsl_blas.side = Left | Right
  external dot : Gsl_vector_flat.vector -> Gsl_vector_flat.vector -> float
    = "ml_gsl_blas_ddot"
  external nrm2 : Gsl_vector_flat.vector -> float = "ml_gsl_blas_dnrm2"
  external asum : Gsl_vector_flat.vector -> float = "ml_gsl_blas_dasum"
  external iamax : Gsl_vector_flat.vector -> int = "ml_gsl_blas_idamax"
  external swap : Gsl_vector_flat.vector -> Gsl_vector_flat.vector -> unit
    = "ml_gsl_blas_dswap"
  external copy : Gsl_vector_flat.vector -> Gsl_vector_flat.vector -> unit
    = "ml_gsl_blas_dcopy"
  external axpy :
    float -> Gsl_vector_flat.vector -> Gsl_vector_flat.vector -> unit
    = "ml_gsl_blas_daxpy"
  external rot :
    Gsl_vector_flat.vector ->
    Gsl_vector_flat.vector -> float -> float -> unit = "ml_gsl_blas_drot"
  external scal : float -> Gsl_vector_flat.vector -> unit
    = "ml_gsl_blas_dscal"
  external gemv :
    Gsl_blas_flat.transpose ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix ->
    x:Gsl_vector_flat.vector ->
    beta:float -> y:Gsl_vector_flat.vector -> unit = "ml_gsl_blas_dgemv_bc"
    "ml_gsl_blas_dgemv"
  external trmv :
    Gsl_blas_flat.uplo ->
    Gsl_blas_flat.transpose ->
    Gsl_blas_flat.diag ->
    a:Gsl_matrix_flat.matrix -> x:Gsl_vector_flat.vector -> unit
    = "ml_gsl_blas_dtrmv"
  external trsv :
    Gsl_blas_flat.uplo ->
    Gsl_blas_flat.transpose ->
    Gsl_blas_flat.diag ->
    a:Gsl_matrix_flat.matrix -> x:Gsl_vector_flat.vector -> unit
    = "ml_gsl_blas_dtrsv"
  external symv :
    Gsl_blas_flat.uplo ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix ->
    x:Gsl_vector_flat.vector ->
    beta:float -> y:Gsl_vector_flat.vector -> unit = "ml_gsl_blas_dsymv_bc"
    "ml_gsl_blas_dsymv"
  external dger :
    alpha:float ->
    x:Gsl_vector_flat.vector ->
    y:Gsl_vector_flat.vector -> a:Gsl_matrix_flat.matrix -> unit
    = "ml_gsl_blas_dger"
  external syr :
    Gsl_blas_flat.uplo ->
    alpha:float ->
    x:Gsl_vector_flat.vector -> a:Gsl_matrix_flat.matrix -> unit
    = "ml_gsl_blas_dsyr"
  external syr2 :
    Gsl_blas_flat.uplo ->
    alpha:float ->
    x:Gsl_vector_flat.vector ->
    y:Gsl_vector_flat.vector -> a:Gsl_matrix_flat.matrix -> unit
    = "ml_gsl_blas_dsyr2"
  external gemm :
    ta:Gsl_blas_flat.transpose ->
    tb:Gsl_blas_flat.transpose ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix ->
    b:Gsl_matrix_flat.matrix ->
    beta:float -> c:Gsl_matrix_flat.matrix -> unit = "ml_gsl_blas_dgemm_bc"
    "ml_gsl_blas_dgemm"
  external symm :
    Gsl_blas_flat.side ->
    Gsl_blas_flat.uplo ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix ->
    b:Gsl_matrix_flat.matrix ->
    beta:float -> c:Gsl_matrix_flat.matrix -> unit = "ml_gsl_blas_dsymm_bc"
    "ml_gsl_blas_dsymm"
  external trmm :
    Gsl_blas_flat.side ->
    Gsl_blas_flat.uplo ->
    Gsl_blas_flat.transpose ->
    Gsl_blas_flat.diag ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix -> b:Gsl_matrix_flat.matrix -> unit
    = "ml_gsl_blas_dtrmm_bc" "ml_gsl_blas_dtrmm"
  external trsm :
    Gsl_blas_flat.side ->
    Gsl_blas_flat.uplo ->
    Gsl_blas_flat.transpose ->
    Gsl_blas_flat.diag ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix -> b:Gsl_matrix_flat.matrix -> unit
    = "ml_gsl_blas_dtrsm_bc" "ml_gsl_blas_dtrsm"
  external syrk :
    Gsl_blas_flat.uplo ->
    Gsl_blas_flat.transpose ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix ->
    beta:float -> c:Gsl_matrix_flat.matrix -> unit = "ml_gsl_blas_dsyrk_bc"
    "ml_gsl_blas_dsyrk"
  external syr2k :
    Gsl_blas_flat.uplo ->
    Gsl_blas_flat.transpose ->
    alpha:float ->
    a:Gsl_matrix_flat.matrix ->
    b:Gsl_matrix_flat.matrix ->
    beta:float -> c:Gsl_matrix_flat.matrix -> unit = "ml_gsl_blas_dsyr2k_bc"
    "ml_gsl_blas_dsyr2k"
  module Complex :
    sig
      external dotu :
        Gsl_vector_complex_flat.vector ->
        Gsl_vector_complex_flat.vector -> Gsl_complex.complex
        = "ml_gsl_blas_zdotu"
      external dotc :
        Gsl_vector_complex_flat.vector ->
        Gsl_vector_complex_flat.vector -> Gsl_complex.complex
        = "ml_gsl_blas_zdotc"
      external nrm2 : Gsl_vector_complex_flat.vector -> float
        = "ml_gsl_blas_znrm2"
      external asum : Gsl_vector_complex_flat.vector -> float
        = "ml_gsl_blas_zasum"
      external iamax : Gsl_vector_complex_flat.vector -> int
        = "ml_gsl_blas_izamax"
      external swap :
        Gsl_vector_complex_flat.vector ->
        Gsl_vector_complex_flat.vector -> unit = "ml_gsl_blas_zswap"
      external copy :
        Gsl_vector_complex_flat.vector ->
        Gsl_vector_complex_flat.vector -> unit = "ml_gsl_blas_zcopy"
      external axpy :
        Gsl_complex.complex ->
        Gsl_vector_complex_flat.vector ->
        Gsl_vector_complex_flat.vector -> unit = "ml_gsl_blas_zaxpy"
      external scal :
        Gsl_complex.complex -> Gsl_vector_complex_flat.vector -> unit
        = "ml_gsl_blas_zscal"
      external zdscal : float -> Gsl_vector_complex_flat.vector -> unit
        = "ml_gsl_blas_zdscal"
      external gemv :
        Gsl_blas_flat.transpose ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        x:Gsl_vector_complex_flat.vector ->
        beta:Gsl_complex.complex -> y:Gsl_vector_complex_flat.vector -> unit
        = "ml_gsl_blas_zgemv_bc" "ml_gsl_blas_zgemv"
      external trmv :
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        Gsl_blas_flat.diag ->
        a:Gsl_matrix_complex_flat.matrix ->
        x:Gsl_vector_complex_flat.vector -> unit = "ml_gsl_blas_ztrmv"
      external trsv :
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        Gsl_blas_flat.diag ->
        a:Gsl_matrix_complex_flat.matrix ->
        x:Gsl_vector_complex_flat.vector -> unit = "ml_gsl_blas_ztrsv"
      external hemv :
        Gsl_blas_flat.uplo ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        x:Gsl_vector_complex_flat.vector ->
        beta:Gsl_complex.complex -> y:Gsl_vector_complex_flat.vector -> unit
        = "ml_gsl_blas_zhemv_bc" "ml_gsl_blas_zhemv"
      external geru :
        alpha:Gsl_complex.complex ->
        x:Gsl_vector_complex_flat.vector ->
        y:Gsl_vector_complex_flat.vector ->
        a:Gsl_matrix_complex_flat.matrix -> unit = "ml_gsl_blas_zgeru"
      external gerc :
        alpha:Gsl_complex.complex ->
        x:Gsl_vector_complex_flat.vector ->
        y:Gsl_vector_complex_flat.vector ->
        a:Gsl_matrix_complex_flat.matrix -> unit = "ml_gsl_blas_zgerc"
      external her :
        Gsl_blas_flat.uplo ->
        alpha:float ->
        x:Gsl_vector_complex_flat.vector ->
        a:Gsl_matrix_complex_flat.matrix -> unit = "ml_gsl_blas_zher"
      external her2 :
        Gsl_blas_flat.uplo ->
        alpha:Gsl_complex.complex ->
        x:Gsl_vector_complex_flat.vector ->
        y:Gsl_vector_complex_flat.vector ->
        a:Gsl_matrix_complex_flat.matrix -> unit = "ml_gsl_blas_zher2"
      external gemm :
        ta:Gsl_blas_flat.transpose ->
        tb:Gsl_blas_flat.transpose ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix ->
        beta:Gsl_complex.complex -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zgemm_bc" "ml_gsl_blas_zgemm"
      external symm :
        Gsl_blas_flat.side ->
        Gsl_blas_flat.uplo ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix ->
        beta:Gsl_complex.complex -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zsymm_bc" "ml_gsl_blas_zsymm"
      external syrk :
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        beta:Gsl_complex.complex -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zsyrk_bc" "ml_gsl_blas_zsyrk"
      external syr2k :
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix ->
        beta:Gsl_complex.complex -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zsyr2k_bc" "ml_gsl_blas_zsyr2k"
      external trmm :
        Gsl_blas_flat.side ->
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        Gsl_blas_flat.diag ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix -> unit = "ml_gsl_blas_ztrmm_bc"
        "ml_gsl_blas_ztrmm"
      external trsm :
        Gsl_blas_flat.side ->
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        Gsl_blas_flat.diag ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix -> unit = "ml_gsl_blas_ztrsm_bc"
        "ml_gsl_blas_ztrsm"
      external hemm :
        Gsl_blas_flat.side ->
        Gsl_blas_flat.uplo ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix ->
        beta:Gsl_complex.complex -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zhemm_bc" "ml_gsl_blas_zhemm"
      external herk :
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        alpha:float ->
        a:Gsl_matrix_complex_flat.matrix ->
        beta:float -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zherk_bc" "ml_gsl_blas_zherk"
      external her2k :
        Gsl_blas_flat.uplo ->
        Gsl_blas_flat.transpose ->
        alpha:Gsl_complex.complex ->
        a:Gsl_matrix_complex_flat.matrix ->
        b:Gsl_matrix_complex_flat.matrix ->
        beta:float -> c:Gsl_matrix_complex_flat.matrix -> unit
        = "ml_gsl_blas_zher2k_bc" "ml_gsl_blas_zher2k"
    end
end