Blas_gen (gsl.Gsl.Blas

type order = Blas.order =

| RowMajor
| ColMajor

type transpose = Blas.transpose =

| NoTrans
| Trans
| ConjTrans

type uplo = Blas.uplo =

| Upper
| Lower

type diag = Blas.diag =

| NonUnit
| Unit

type side = Blas.side =

| Left
| Right

val dot : [< Vectmat.vec ] -> [< Vectmat.vec ] -> float

val nrm2 : [< Vectmat.vec ] -> float

val asum : [< Vectmat.vec ] -> float

val iamax : [< Vectmat.vec ] -> int

val swap : [< Vectmat.vec ] -> [< Vectmat.vec ] -> unit

val copy : [< Vectmat.vec ] -> [< Vectmat.vec ] -> unit

val axpy : float -> [< Vectmat.vec ] -> [< Vectmat.vec ] -> unit

val rot : [< Vectmat.vec ] -> [< Vectmat.vec ] -> float -> float -> unit

val scal : float -> [< Vectmat.vec ] -> unit

val gemv : 
  transpose ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  x:[< Vectmat.vec ] ->
  beta:float ->
  y:[< Vectmat.vec ] ->
  unit

val trmv : 
  uplo ->
  transpose ->
  diag ->
  a:[< Vectmat.mat ] ->
  x:[< Vectmat.vec ] ->
  unit

val trsv : 
  uplo ->
  transpose ->
  diag ->
  a:[< Vectmat.mat ] ->
  x:[< Vectmat.vec ] ->
  unit

val symv : 
  uplo ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  x:[< Vectmat.vec ] ->
  beta:float ->
  y:[< Vectmat.vec ] ->
  unit

val dger : 
  alpha:float ->
  x:[< Vectmat.vec ] ->
  y:[< Vectmat.vec ] ->
  a:[< Vectmat.mat ] ->
  unit

val syr : 
  uplo ->
  alpha:float ->
  x:[< Vectmat.vec ] ->
  a:[< Vectmat.mat ] ->
  unit

val syr2 : 
  uplo ->
  alpha:float ->
  x:[< Vectmat.vec ] ->
  y:[< Vectmat.vec ] ->
  a:[< Vectmat.mat ] ->
  unit

val gemm : 
  ta:transpose ->
  tb:transpose ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  b:[< Vectmat.mat ] ->
  beta:float ->
  c:[< Vectmat.mat ] ->
  unit

val symm : 
  side ->
  uplo ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  b:[< Vectmat.mat ] ->
  beta:float ->
  c:[< Vectmat.mat ] ->
  unit

val trmm : 
  side ->
  uplo ->
  transpose ->
  diag ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  b:[< Vectmat.mat ] ->
  unit

val trsm : 
  side ->
  uplo ->
  transpose ->
  diag ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  b:[< Vectmat.mat ] ->
  unit

val syrk : 
  uplo ->
  transpose ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  beta:float ->
  c:[< Vectmat.mat ] ->
  unit

val syr2k : 
  uplo ->
  transpose ->
  alpha:float ->
  a:[< Vectmat.mat ] ->
  b:[< Vectmat.mat ] ->
  beta:float ->
  c:[< Vectmat.mat ] ->
  unit

module Complex : sig ... end