daypack-lib 0.0.5 · OCaml Package

val pack_task_uncompleted_store : 
  task_store ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t)) * Daypack_lib__.Task_t.task_data)
    list

val pack_task_completed_store : 
  task_store ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t)) * Daypack_lib__.Task_t.task_data)
    list

val pack_task_discarded_store : 
  task_store ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t)) * Daypack_lib__.Task_t.task_data)
    list

val pack_task_inst_uncompleted_store : 
  task_inst_store ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
   * Daypack_lib__.Task_t.task_inst_data)
    list

val pack_task_inst_completed_store : 
  task_inst_store ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
   * Daypack_lib__.Task_t.task_inst_data)
    list

val pack_task_inst_discarded_store : 
  task_inst_store ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
   * Daypack_lib__.Task_t.task_inst_data)
    list

val pack_task_seg_uncompleted_store : 
  task_seg_store ->
  (((Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t) option)
   * (Int32.t * Int32.t))
    list

val pack_task_seg_completed_store : 
  task_seg_store ->
  (((Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t) option)
   * (Int32.t * Int32.t))
    list

val pack_task_seg_discarded_store : 
  task_seg_store ->
  (((Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t) option)
   * (Int32.t * Int32.t))
    list

val pack_sched_req_pending_store : 
  sched_req_store ->
  ((Int32.t * Int32.t)
   * [ `Fixed of
         (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
          * (Int32.t * Int32.t),
           Int32.t * Int32.t)
           Daypack_lib__.Sched_req_data_unit_skeleton_t.fixed
     | `Shift of
       (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.shift
     | `Split_and_shift of
       (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.split_and_shift
     | `Split_even of
       (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.split_even
     | `Time_share of
       (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.time_share
     | `Push_toward of
       (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
        * (Int32.t * Int32.t),
         Int32.t * Int32.t,
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.push_toward ]
       list)
    list

val pack_sched_req_record_store : 
  sched_req_record_store ->
  ((Int32.t * Int32.t)
   * [ `Fixed of
         (((Int32.t * Int32.t)
           * (Int32.t * Int32.t)
           * (Int32.t * Int32.t)
           * (Int32.t * Int32.t)
           * (Int32.t * Int32.t) option)
          * (Int32.t * Int32.t),
           Int32.t * Int32.t)
           Daypack_lib__.Sched_req_data_unit_skeleton_t.fixed
     | `Shift of
       (((Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t) option)
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.shift
     | `Split_and_shift of
       (((Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t) option)
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.split_and_shift
     | `Split_even of
       (((Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t) option)
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.split_even
     | `Time_share of
       (((Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t) option)
        * (Int32.t * Int32.t),
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.time_share
     | `Push_toward of
       (((Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t)
         * (Int32.t * Int32.t) option)
        * (Int32.t * Int32.t),
         Int32.t * Int32.t,
         (Int32.t * Int32.t) * (Int32.t * Int32.t))
         Daypack_lib__.Sched_req_data_unit_skeleton_t.push_toward ]
       list)
    list

val pack_quota : 
  int64 Task_inst_id_map.t ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
   * (int32 * int32))
    list

val pack_user_id_to_task_ids : 
  Int64_set.t User_id_map.t ->
  ((Int32.t * Int32.t) * (int32 * int32) list) list

val pack_task_id_to_task_inst_ids : 
  Int64_set.t Task_id_map.t ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t)) * (int32 * int32) list) list

val pack_task_inst_id_to_task_seg_ids : 
  Int64_int64_option_set.t Task_inst_id_map.t ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
   * ((int32 * int32) * (int32 * int32) option) list)
    list

val pack_task_seg_id_to_progress : 
  Task_.progress Task_seg_id_map.t ->
  (((Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t) option)
   * Daypack_lib__.Task_t.progress)
    list

val pack_task_inst_id_to_progress : 
  Task_.progress Task_inst_id_map.t ->
  (((Int32.t * Int32.t) * (Int32.t * Int32.t) * (Int32.t * Int32.t))
   * Daypack_lib__.Task_t.progress)
    list

val pack_indexed_by_task_seg_id : 
  (int64 * int64) Task_seg_id_map.t ->
  (((Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t)
    * (Int32.t * Int32.t) option)
   * ((int32 * int32) * (int32 * int32)))
    list

val pack_indexed_by_start : 
  task_seg_place_map ->
  ((int32 * int32)
   * ((Int32.t * Int32.t)
      * (Int32.t * Int32.t)
      * (Int32.t * Int32.t)
      * (Int32.t * Int32.t)
      * (Int32.t * Int32.t) option)
       list)
    list

val pack_indexed_by_end_exc : 
  task_seg_place_map ->
  ((int32 * int32)
   * ((Int32.t * Int32.t)
      * (Int32.t * Int32.t)
      * (Int32.t * Int32.t)
      * (Int32.t * Int32.t)
      * (Int32.t * Int32.t) option)
       list)
    list

val pack_sched_req_ids : Int64_set.t -> (int32 * int32) list

val pack_sched : sched -> int * Daypack_lib__.Sched_t.sched_data

val pack_sched_diff : 
  sched_diff ->
  int * int * Daypack_lib__.Sched_t.sched_data_diff

val json_string_of_sched : sched -> string

val json_string_of_sched_diff : sched_diff -> string

package daypack-lib