ask-integrator 0.2.0 · OCaml Package

val iter : 
  t ->
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'a) ->
  member_id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'b) ->
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'c) ->
  questionnaires:
    (([< `Read | `Set_and_create ],
       t,
       (string * Ask.Model.Questionnaire.t) list)
       Fieldslib.Field.t_with_perm ->
      t ->
      (string * Ask.Model.Questionnaire.t) list ->
      'd) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      'e) ->
  updated_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      'f) ->
  'f

val fold : 
  t ->
  init:'a ->
  id:
    ('a ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'b) ->
  member_id:
    ('b ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'c) ->
  label:
    ('c ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'd) ->
  questionnaires:
    ('d ->
      ([< `Read | `Set_and_create ],
        t,
        (string * Ask.Model.Questionnaire.t) list)
        Fieldslib.Field.t_with_perm ->
      t ->
      (string * Ask.Model.Questionnaire.t) list ->
      'e) ->
  created_at:
    ('e ->
      ([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      'f) ->
  updated_at:
    ('f ->
      ([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      'g) ->
  'g

val for_all : 
  t ->
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      bool) ->
  member_id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      bool) ->
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      bool) ->
  questionnaires:
    (([< `Read | `Set_and_create ],
       t,
       (string * Ask.Model.Questionnaire.t) list)
       Fieldslib.Field.t_with_perm ->
      t ->
      (string * Ask.Model.Questionnaire.t) list ->
      bool) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      bool) ->
  updated_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      bool) ->
  bool

val exists : 
  t ->
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      bool) ->
  member_id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      bool) ->
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      bool) ->
  questionnaires:
    (([< `Read | `Set_and_create ],
       t,
       (string * Ask.Model.Questionnaire.t) list)
       Fieldslib.Field.t_with_perm ->
      t ->
      (string * Ask.Model.Questionnaire.t) list ->
      bool) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      bool) ->
  updated_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      bool) ->
  bool

val to_list : 
  t ->
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'a) ->
  member_id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'a) ->
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      'a) ->
  questionnaires:
    (([< `Read | `Set_and_create ],
       t,
       (string * Ask.Model.Questionnaire.t) list)
       Fieldslib.Field.t_with_perm ->
      t ->
      (string * Ask.Model.Questionnaire.t) list ->
      'a) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      'a) ->
  updated_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      'a) ->
  'a list

val map : 
  t ->
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      string) ->
  member_id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      string) ->
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      t ->
      string ->
      string) ->
  questionnaires:
    (([< `Read | `Set_and_create ],
       t,
       (string * Ask.Model.Questionnaire.t) list)
       Fieldslib.Field.t_with_perm ->
      t ->
      (string * Ask.Model.Questionnaire.t) list ->
      (string * Ask.Model.Questionnaire.t) list) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      Ptime.t) ->
  updated_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      t ->
      Ptime.t ->
      Ptime.t) ->
  t

val set_all_mutable_fields : 'a -> unit

package ask-integrator