sihl-type 0.2.2 · OCaml Package

val names : string list

val created_at : 
  ([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm

val expires_at : 
  ([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm

val status : 
  ([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm

val kind : 
  ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm

val data : 
  ([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm

val value : 
  ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm

val id : ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm

val make_creator : 
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'a ->
      ('b -> string) * 'c) ->
  value:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'd ->
      ('e -> string) * 'f) ->
  data:
    (([< `Read | `Set_and_create ], t, string option)
       Fieldslib.Field.t_with_perm ->
      'g ->
      ('h -> string option) * 'i) ->
  kind:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'j ->
      ('k -> string) * 'l) ->
  status:
    (([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      'm ->
      ('n -> Status.t) * 'o) ->
  expires_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      'p ->
      ('q -> Ptime.t) * 'r) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      's ->
      ('t -> Ptime.t) * 'u) ->
  'v ->
  ('w -> t) * 'x

val create : 
  id:string ->
  value:string ->
  data:string option ->
  kind:string ->
  status:Status.t ->
  expires_at:Ptime.t ->
  created_at:Ptime.t ->
  t

val map : 
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      string) ->
  value:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      string) ->
  data:
    (([< `Read | `Set_and_create ], t, string option)
       Fieldslib.Field.t_with_perm ->
      string option) ->
  kind:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      string) ->
  status:
    (([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      Status.t) ->
  expires_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      Ptime.t) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      Ptime.t) ->
  t

val iter : 
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      unit) ->
  value:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      unit) ->
  data:
    (([< `Read | `Set_and_create ], t, string option)
       Fieldslib.Field.t_with_perm ->
      unit) ->
  kind:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      unit) ->
  status:
    (([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      unit) ->
  expires_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      unit) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      unit) ->
  unit

val fold : 
  init:'a ->
  id:
    ('b ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'c) ->
  value:
    ('d ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'e) ->
  data:
    ('f ->
      ([< `Read | `Set_and_create ], t, string option)
        Fieldslib.Field.t_with_perm ->
      'g) ->
  kind:
    ('h ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'i) ->
  status:
    ('j ->
      ([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      'k) ->
  expires_at:
    ('l ->
      ([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      'm) ->
  created_at:
    ('n ->
      ([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      'o) ->
  'p

val map_poly : 
  ([< `Read | `Set_and_create ], t, 'a) Fieldslib.Field.user ->
  'b list

val for_all : 
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  value:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  data:
    (([< `Read | `Set_and_create ], t, string option)
       Fieldslib.Field.t_with_perm ->
      bool) ->
  kind:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  status:
    (([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      bool) ->
  expires_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      bool) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      bool) ->
  bool

val exists : 
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  value:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  data:
    (([< `Read | `Set_and_create ], t, string option)
       Fieldslib.Field.t_with_perm ->
      bool) ->
  kind:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  status:
    (([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      bool) ->
  expires_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      bool) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      bool) ->
  bool

val to_list : 
  id:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'a) ->
  value:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'b) ->
  data:
    (([< `Read | `Set_and_create ], t, string option)
       Fieldslib.Field.t_with_perm ->
      'c) ->
  kind:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'd) ->
  status:
    (([< `Read | `Set_and_create ], t, Status.t) Fieldslib.Field.t_with_perm ->
      'e) ->
  expires_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      'f) ->
  created_at:
    (([< `Read | `Set_and_create ], t, Ptime.t) Fieldslib.Field.t_with_perm ->
      'g) ->
  'h list

module Direct : sig ... end

package sihl-type