daypack-lib 0.0.5 · OCaml Package

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

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

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

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

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

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

val unpack_task_seg_uncompleted_list : 
  (((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 ->
  task_seg_store

val unpack_task_seg_completed_list : 
  (((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 ->
  task_seg_store

val unpack_task_seg_discarded_list : 
  (((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 ->
  task_seg_store

val unpack_sched_req_pending_list : 
  ((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 ->
  sched_req_store

val unpack_sched_req_record_list : 
  ((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 ->
  sched_req_record_store

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

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

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

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

val unpack_task_seg_id_to_progress : 
  (((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 ->
  Task_.progress Task_seg_id_map.t

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

val unpack_indexed_by_task_seg_id : 
  (((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 ->
  (int64 * int64) Task_seg_id_map.t

val unpack_indexed_by_end_exc : 
  ((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 ->
  task_seg_place_map

val unpack_indexed_by_start : 
  ((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 ->
  task_seg_place_map

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

val unpack_sched : (int * Daypack_lib__.Sched_t.sched_data) -> sched

val unpack_sched_diff : 
  (int * int * Daypack_lib__.Sched_t.sched_data_diff) ->
  sched_diff

val sched_of_json_string : string -> sched

val sched_diff_of_json_string : string -> sched_diff

package daypack-lib