/usr/lib/ocaml/gsl/gsl_eigen.mli is in libocamlgsl-ocaml-dev 1.19.1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 | (* gsl-ocaml - OCaml interface to GSL *)
(* Copyright (©) 2002-2012 - Olivier Andrieu *)
(* Distributed under the terms of the GPL version 3 *)
(** Eigensystems *)
open Gsl_vectmat
(** {3 Real Symmetric Matrices} *)
type symm_ws
val make_symm_ws : int -> symm_ws
external _symm : mat -> vec -> symm_ws -> unit
= "ml_gsl_eigen_symm"
val symm :
?protect:bool ->
[< `M of Gsl_matrix.matrix
| `MF of Gsl_matrix_flat.matrix
| `A of float array * int * int
| `AA of float array array] ->
Gsl_vector.vector
type symmv_ws
val make_symmv_ws : int -> symmv_ws
external _symmv : mat -> vec -> mat -> symmv_ws -> unit
= "ml_gsl_eigen_symmv"
val symmv :
?protect:bool ->
[< `M of Gsl_matrix.matrix
| `MF of Gsl_matrix_flat.matrix
| `A of float array * int * int
| `AA of float array array] ->
Gsl_vector.vector * Gsl_matrix.matrix
type sort =
| VAL_ASC
| VAL_DESC
| ABS_ASC
| ABS_DESC
external symmv_sort : Gsl_vector.vector * Gsl_matrix.matrix -> sort -> unit
= "ml_gsl_eigen_symmv_sort"
(** {3 Complex Hermitian Matrices} *)
type herm_ws
val make_herm_ws : int -> herm_ws
external _herm : cmat -> vec -> herm_ws -> unit
= "ml_gsl_eigen_herm"
val herm :
?protect:bool ->
[< `CM of Gsl_matrix_complex.matrix
| `CMF of Gsl_matrix_complex_flat.matrix
| `CA of Gsl_complex.complex_array * int * int ] ->
Gsl_vector.vector
type hermv_ws
val make_hermv_ws : int -> hermv_ws
external _hermv : cmat -> vec -> cmat -> hermv_ws -> unit
= "ml_gsl_eigen_hermv"
val hermv :
?protect:bool ->
[< `CM of Gsl_matrix_complex.matrix
| `CMF of Gsl_matrix_complex_flat.matrix
| `CA of Gsl_complex.complex_array * int * int ] ->
Gsl_vector.vector * Gsl_matrix_complex.matrix
external hermv_sort :
Gsl_vector.vector * Gsl_matrix_complex.matrix ->
sort -> unit
= "ml_gsl_eigen_hermv_sort"
(** {3 Real Nonsymmetric Matrices} *)
type nonsymm_ws
val make_nonsymm_ws : int -> nonsymm_ws
external _nonsymm : mat -> cvec -> nonsymm_ws -> unit
= "ml_gsl_eigen_nonsymm"
external _nonsymm_Z : mat -> cvec -> mat -> nonsymm_ws -> unit
= "ml_gsl_eigen_nonsymm_Z"
val nonsymm :
?protect:bool ->
[< `M of Gsl_matrix.matrix
| `MF of Gsl_matrix_flat.matrix
| `A of float array * int * int
| `AA of float array array] ->
Gsl_vector_complex.vector
type nonsymmv_ws
val make_nonsymmv_ws : int -> nonsymmv_ws
external _nonsymmv : mat -> cvec -> cmat -> nonsymmv_ws -> unit
= "ml_gsl_eigen_nonsymmv"
external _nonsymmv_Z : mat -> cvec -> cmat -> mat -> nonsymmv_ws -> unit
= "ml_gsl_eigen_nonsymmv_Z"
val nonsymmv :
?protect:bool ->
[< `M of Gsl_matrix.matrix
| `MF of Gsl_matrix_flat.matrix
| `A of float array * int * int
| `AA of float array array] ->
Gsl_vector_complex.vector * Gsl_matrix_complex.matrix
external nonsymmv_sort : Gsl_vector_complex.vector * Gsl_matrix_complex.matrix -> sort -> unit
= "ml_gsl_eigen_nonsymmv_sort"
|