32 lines
955 B
MiniZinc
32 lines
955 B
MiniZinc
enum JOB;
|
|
enum TASK;
|
|
TASK: last = max(TASK);
|
|
array [JOB,TASK] of int: d; % task durations
|
|
int: total = sum(i in JOB, j in TASK)(d[i,j]);% total duration
|
|
int: digs = ceil(log(10.0,int2float(total))); % digits for output
|
|
array [JOB,TASK] of var 0..total: s; % start times
|
|
var 0..total: end; % total end time
|
|
|
|
|
|
constraint %% ensure the tasks occur in sequence
|
|
forall(i in JOB) (
|
|
forall(j in TASK where j < last)
|
|
(s[i,j] + d[i,j] <= s[i,enum_next(TASK,j)]) /\
|
|
s[i,last] + d[i,last] <= end
|
|
);
|
|
|
|
constraint %% ensure no overlap of tasks
|
|
forall(j in TASK) (
|
|
forall(i,k in JOB where i < k) (
|
|
s[i,j] + d[i,j] <= s[k,j] \/
|
|
s[k,j] + d[k,j] <= s[i,j]
|
|
)
|
|
);
|
|
|
|
solve minimize end;
|
|
|
|
output ["end = \(end)\n"] ++
|
|
[ show_int(digs,s[i,j]) ++ " " ++
|
|
if j == last then "\n" else "" endif |
|
|
i in JOB, j in TASK ];
|