Fields (group_map.Group_map.Spec.Fields)

val names : string list

val b : ( 'f t, 'f ) Fieldslib.Field.t

val a : ( 'f t, 'f ) Fieldslib.Field.t

val fold : 
  init:'acc__0 ->
  a:( 'acc__0 -> ( 'f t, 'f ) Fieldslib.Field.t -> 'acc__1 ) ->
  b:( 'acc__1 -> ( 'f t, 'f ) Fieldslib.Field.t -> 'acc__2 ) ->
  'acc__2

val make_creator : 
  a:
    ( ( 'f t, 'f ) Fieldslib.Field.t ->
      'acc__0 ->
      ( 'input__ -> 'f ) * 'acc__1 ) ->
  b:
    ( ( 'f t, 'f ) Fieldslib.Field.t ->
      'acc__1 ->
      ( 'input__ -> 'f ) * 'acc__2 ) ->
  'acc__0 ->
  ( 'input__ -> 'f t ) * 'acc__2

val create : a:'f -> b:'f -> 'f t

val map : 
  a:( ( 'f t, 'f ) Fieldslib.Field.t -> 'f ) ->
  b:( ( 'f t, 'f ) Fieldslib.Field.t -> 'f ) ->
  'f t

val iter : 
  a:( ( 'f t, 'f ) Fieldslib.Field.t -> unit ) ->
  b:( ( 'f t, 'f ) Fieldslib.Field.t -> unit ) ->
  unit

val for_all : 
  a:( ( 'f t, 'f ) Fieldslib.Field.t -> bool ) ->
  b:( ( 'f t, 'f ) Fieldslib.Field.t -> bool ) ->
  bool

val exists : 
  a:( ( 'f t, 'f ) Fieldslib.Field.t -> bool ) ->
  b:( ( 'f t, 'f ) Fieldslib.Field.t -> bool ) ->
  bool

val to_list : 
  a:( ( 'f t, 'f ) Fieldslib.Field.t -> 'elem__ ) ->
  b:( ( 'f t, 'f ) Fieldslib.Field.t -> 'elem__ ) ->
  'elem__ list

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

module Direct : sig ... end