This file is indexed.

/usr/lib/ocaml/reins/dugProfile.mli is in libreins-ocaml-dev 0.1a-5.

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
(**************************************************************************)
(*  The OCaml Reins Library                                               *)
(*                                                                        *)
(*  Copyright 2007 Mike Furr.                                             *)
(*  All rights reserved.  This file is distributed under the terms of the  *)
(*  GNU Lesser General Public License version 2.1 with the linking        *)
(*  exception given in the COPYING file.                                  *)
(**************************************************************************)

(** Charactericists of a DUG *)

module Make : functor(DS : DugADT.S) -> sig

  type t = private {
      (* CDF for the different node types (not operation weights)
         i.e., union counts as 1, not 2
      *)
      gen_cdf : ((unit,unit) DS.generator * float) list;
      mut_cdf : ((unit,unit) DS.mutator * float) list;
      obs_cdf : ((unit,unit) DS.observer * float) list;

      (* ratio of generator nodes to total nodes *)
      gen_ratio : float;

      (* ratio of observations / mutations *)
      obs_mut_ratio : float;

      (* fraction of version nodes (gen or mut) that are never
	 mutated *)
      mortality : float;

      (* fraction of mutations that are persisent *)
      pmf : float;
      
      (* fraction of observations that are persisent *)
      pof : float;
    }
      
  val random_op : ('a * float) list -> 'a
    
  val to_string : t -> string
    
  val profile : 
    (('a,'b) DS.generator, ('a,'b) DS.mutator, ('a,'b) DS.observer) Dug.t
    -> t
end