Commit 429e36eb authored by Felipe Cerqueira's avatar Felipe Cerqueira
Browse files

Leave base schedule arbitrary during construction

parent 8c68c87a
......@@ -20,8 +20,8 @@ Module ScheduleConstruction.
Variable build_schedule:
schedule arr_seq -> time -> option (JobIn arr_seq).
(* Then, starting from the empty schedule as a base, ... *)
Definition empty_schedule : schedule arr_seq := fun t => None.
(* Then, starting from a base schedule, ... *)
Variable base_sched: schedule arr_seq.
(* ...we can update individual times using the build_schedule function, ... *)
Definition update_schedule (prev_sched: schedule arr_seq)
......@@ -36,7 +36,7 @@ Module ScheduleConstruction.
if t_max is t_prev.+1 then
update_schedule (schedule_prefix t_prev) t_prev.+1
update_schedule empty_schedule 0.
update_schedule base_sched 0.
(* Based on the schedule prefixes, we construct a complete schedule. *)
Definition build_schedule_from_prefixes := fun t => schedule_prefix t t.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment