Values.WaypointOptimizationRestCyclesSourceResting phase of the cycle.
type nonrec t = {longCycle : WaypointOptimizationRestCycleDurations.t;Long cycle for a driver work-rest schedule.
*)shortCycle : WaypointOptimizationRestCycleDurations.t;Short cycle for a driver work-rest schedule
*)}val make :
longCycle:WaypointOptimizationRestCycleDurations.t ->
shortCycle:WaypointOptimizationRestCycleDurations.t ->
unit ->
tval to_value :
t ->
[> `Structure of
(string
* [> `Structure of (string * [> `Long of DurationSeconds.t ]) list ])
list ]