Chris_T avatar Chris_T committed 4eec01f

Introduced [int_vec] for vectors of standard OCaml ints. Used it in [Vec.perm] signatures.

Comments (0)

Files changed (4)

 
 exception InternalError of string
 
+type int_vec = (int, int_elt, fortran_layout) Array1.t
+
+let create_int_vec n = Array1.create int fortran_layout n
+
 type int32_vec = (int32, int32_elt, fortran_layout) Array1.t
 
 let create_int32_vec n = Array1.create int32 fortran_layout n
 (** [InternalError msg] gets raised when BLAS or LAPACK exhibit undefined
     behaviour. *)
 
+type int_vec = (int, int_elt, fortran_layout) Array1.t
+(** Type of OCaml integer vectors. *)
+
+val create_int_vec : int -> int_vec
+(** [create_int_vec n] @return an int-vector with [n] rows. *)
+
 type int32_vec = (int32, int32_elt, fortran_layout) Array1.t
 (** Type of 32bit Fortran integer vectors. *)
 
 val create_int32_vec : int -> int32_vec
-(** [create_int32_vec n] @return an int-vector with [n] rows. *)
+(** [create_int32_vec n] @return an int32-vector with [n] rows. *)
 
 val mat_from_vec : ('a, 'b, 'c) Array1.t -> ('a, 'b, 'c) Array2.t
 (** [mat_from_vec a] converts the vector [a] into a matrix with [Array1.dim a]
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *)
 
+open Printf
 open Bigarray
-open Printf
+open Numberxx
+open Common
 open Utils
-open Numberxx
 
 (* Creation of vectors and dimension accessor *)
 
   n : int ->
   ofsp : int ->
   incp : int ->
-  p : (int, int_elt, fortran_layout) Array1.t ->
+  p : int_vec ->
   ofsx : int ->
   incx : int ->
   x : vec ->
   n : int ->
   ofsp : int ->
   incp : int ->
-  p : (int, int_elt, fortran_layout) Array1.t ->
+  p : int_vec ->
   ofsx : int ->
   incx : int ->
   x : vec ->
   n : int ->
   ofsp : int ->
   incp : int ->
-  p : (int, int_elt, fortran_layout) Array1.t ->
+  p : int_vec ->
   ofsx : int ->
   incx : int ->
   x : vec ->
 *)
 
 open Bigarray
+open Common
 open Numberxx
 
 (** {6 Creation/conversion of vectors and dimension accessor} *)
   ?n : int ->
   ?ofsp : int ->
   ?incp : int ->
-  ?p : (int, int_elt, fortran_layout) Array1.t ->
+  ?p : int_vec ->
   ?ofsx : int ->
   ?incx : int ->
   vec
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.