-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathusr.mli
More file actions
24 lines (19 loc) · 820 Bytes
/
usr.mli
File metadata and controls
24 lines (19 loc) · 820 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
type task = { id : int; work : float; fiab : float; }
type edge = { id1 : int; id2 : int; }
module V : Set.S with type elt = int
module VH1 : Set.S with type elt = int
module IntMap : Map.S with type key = int
type configuration = {
tabTask : task array array;
tabStartTime : (float * V.t) array array;
tabFinishTime : (float * V.t) array array;
tabSlowed : bool array array;
tabSlowedFreq : (float * float) array array;
}
module E : Set.S with type elt = edge
val matchRel : configuration -> Const.parameter -> float -> float -> int -> bool
val energy : int -> configuration -> int -> float
val energyTest : configuration -> float -> float -> int -> float
val computef1 : Const.parameter -> 'a -> float
val computef2 : Const.parameter -> 'a -> float
val heurFun1 : configuration -> int -> float -> float