type 'a t = {
accs : ('a * 'a) array; |
bits : 'a array; |
ss : 'a array; |
base : 'a * 'a; |
n_prev : 'a; |
n_next : 'a; |
}
val bin_shape_t : Core_kernel.Bin_prot.Shape.t -> Core_kernel.Bin_prot.Shape.t
val bin_size_t :
'a. 'a Core_kernel.Bin_prot.Size.sizer ->
'a t Core_kernel.Bin_prot.Size.sizer
val bin_write_t :
'a. 'a Core_kernel.Bin_prot.Write.writer ->
'a t Core_kernel.Bin_prot.Write.writer
val bin_writer_t :
'a Core_kernel.Bin_prot.Type_class.writer ->
'b t Core_kernel.Bin_prot.Type_class.writer
val __bin_read_t__ :
'a. 'a Core_kernel.Bin_prot.Read.reader ->
( int -> 'a t ) Core_kernel.Bin_prot.Read.reader
val bin_read_t :
'a. 'a Core_kernel.Bin_prot.Read.reader ->
'a t Core_kernel.Bin_prot.Read.reader
val bin_reader_t :
'a Core_kernel.Bin_prot.Type_class.reader ->
'b t Core_kernel.Bin_prot.Type_class.reader
val bin_t :
'a Core_kernel.Bin_prot.Type_class.t ->
'b t Core_kernel.Bin_prot.Type_class.t
val t_of_sexp :
'a. ( Ppx_sexp_conv_lib.Sexp.t -> 'a ) ->
Ppx_sexp_conv_lib.Sexp.t ->
'a t
val sexp_of_t :
'a. ( 'a -> Ppx_sexp_conv_lib.Sexp.t ) ->
'a t ->
Ppx_sexp_conv_lib.Sexp.t
val base : 'a t -> 'a * 'a
val ss : 'a t -> 'a array
val bits : 'a t -> 'a array
val accs : 'a t -> ('a * 'a) array
val to_hlist :
'a t ->
( unit,
('a * 'a) array ->
'a array ->
'a array ->
('a * 'a) ->
'a ->
'a ->
unit )
H_list.t
val of_hlist :
( unit,
('a * 'a) array ->
'a array ->
'a array ->
('a * 'a) ->
'a ->
'a ->
unit )
H_list.t ->
'a t