(* gsl-ocaml - OCaml interface to GSL                       *)
(* Copyright (©) 2002-2012 - Olivier Andrieu                *)
(* Distributed under the terms of the GPL version 3         *)

(** Vector of complex numbers implemented with a [Bigarray] *)

open Bigarray
open Gsl_complex

type complex_double_vector_bigarr =
  (Complex.t, complex64_elt, c_layout) Array1.t

type vector = complex_double_vector_bigarr

val create : ?init:complex -> int -> vector
val of_array : complex array -> vector
val to_array : vector -> complex array
val of_complex_array : complex_array -> vector
val to_complex_array : vector -> complex_array
val length : vector -> int
val get : vector -> int -> complex
val set : vector -> int -> complex -> unit
val set_all : vector -> complex -> unit
val set_zero : vector -> unit
val set_basis : vector -> int -> unit
val memcpy : src:vector -> dst:vector -> unit
val copy : vector -> vector
val swap_element : vector -> int -> int -> unit
val reverse : vector -> unit
val subvector : vector -> off:int -> len:int -> vector

module Single : sig
  type complex_float_vector_bigarr =
    (Complex.t, complex32_elt, c_layout) Array1.t

  type vector = complex_float_vector_bigarr

  val create : ?init:complex -> int -> vector
  val of_array : complex array -> vector
  val to_array : vector -> complex array
  val of_complex_array : complex_array -> vector
  val to_complex_array : vector -> complex_array
  val length : vector -> int
  val get : vector -> int -> complex
  val set : vector -> int -> complex -> unit
  val set_all : vector -> complex -> unit
  val set_zero : vector -> unit
  val set_basis : vector -> int -> unit
  val memcpy : src:vector -> dst:vector -> unit
  val copy : vector -> vector
  val swap_element : vector -> int -> int -> unit
  val reverse : vector -> unit
  val subvector : vector -> off:int -> len:int -> vector
end
