val u : t Variantslib.Variant.tval x : t Variantslib.Variant.tval l0 : t Variantslib.Variant.tval l1 : t Variantslib.Variant.tval z : t Variantslib.Variant.tval w : t Variantslib.Variant.tval l : t Variantslib.Variant.tval h : t Variantslib.Variant.tval don't_care : t Variantslib.Variant.tval fold :
init:'acc__ ->
u:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
x:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
l0:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
l1:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
z:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
w:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
l:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
h:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
don't_care:('acc__ -> t Variantslib.Variant.t -> 'acc__) ->
'acc__val iter :
u:(t Variantslib.Variant.t -> Base.Unit.t) ->
x:(t Variantslib.Variant.t -> Base.Unit.t) ->
l0:(t Variantslib.Variant.t -> Base.Unit.t) ->
l1:(t Variantslib.Variant.t -> Base.Unit.t) ->
z:(t Variantslib.Variant.t -> Base.Unit.t) ->
w:(t Variantslib.Variant.t -> Base.Unit.t) ->
l:(t Variantslib.Variant.t -> Base.Unit.t) ->
h:(t Variantslib.Variant.t -> Base.Unit.t) ->
don't_care:(t Variantslib.Variant.t -> Base.Unit.t) ->
Base.Unit.tval map :
t ->
u:(t Variantslib.Variant.t -> 'result__) ->
x:(t Variantslib.Variant.t -> 'result__) ->
l0:(t Variantslib.Variant.t -> 'result__) ->
l1:(t Variantslib.Variant.t -> 'result__) ->
z:(t Variantslib.Variant.t -> 'result__) ->
w:(t Variantslib.Variant.t -> 'result__) ->
l:(t Variantslib.Variant.t -> 'result__) ->
h:(t Variantslib.Variant.t -> 'result__) ->
don't_care:(t Variantslib.Variant.t -> 'result__) ->
'result__val make_matcher :
u:
(t Variantslib.Variant.t ->
'acc__0 ->
(Base.Unit.t -> 'result__) * 'acc__1) ->
x:
(t Variantslib.Variant.t ->
'acc__1 ->
(Base.Unit.t -> 'result__) * 'acc__2) ->
l0:
(t Variantslib.Variant.t ->
'acc__2 ->
(Base.Unit.t -> 'result__) * 'acc__3) ->
l1:
(t Variantslib.Variant.t ->
'acc__3 ->
(Base.Unit.t -> 'result__) * 'acc__4) ->
z:
(t Variantslib.Variant.t ->
'acc__4 ->
(Base.Unit.t -> 'result__) * 'acc__5) ->
w:
(t Variantslib.Variant.t ->
'acc__5 ->
(Base.Unit.t -> 'result__) * 'acc__6) ->
l:
(t Variantslib.Variant.t ->
'acc__6 ->
(Base.Unit.t -> 'result__) * 'acc__7) ->
h:
(t Variantslib.Variant.t ->
'acc__7 ->
(Base.Unit.t -> 'result__) * 'acc__8) ->
don't_care:
(t Variantslib.Variant.t ->
'acc__8 ->
(Base.Unit.t -> 'result__) * 'acc__9) ->
'acc__0 ->
(t -> 'result__) * 'acc__9val to_rank : t -> Base.Int.tval to_name : t -> Base.String.tval descriptions : (Base.String.t * Base.Int.t) Base.List.t