Schedule.Variants_of_fragment_scope_violationval tile_replicated :
(fragment:Tn.t ->
tiles:Base.int ->
fragment_scope_violation)
Variantslib.Variant.tval scope_not_leading :
(fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.tval tile_unbracketed :
(fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.tval fold :
init:'acc__0 ->
tile_replicated:
('acc__0 ->
(fragment:Tn.t ->
tiles:Base.int ->
fragment_scope_violation)
Variantslib.Variant.t ->
'acc__1) ->
scope_not_leading:
('acc__1 ->
(fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
'acc__2) ->
tile_unbracketed:
('acc__2 ->
(fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
'acc__3) ->
'acc__3val iter :
tile_replicated:
((fragment:Tn.t ->
tiles:Base.int ->
fragment_scope_violation)
Variantslib.Variant.t ->
Base.unit) ->
scope_not_leading:
((fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
Base.unit) ->
tile_unbracketed:
((fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
Base.unit) ->
Base.unitval map :
fragment_scope_violation ->
tile_replicated:
((fragment:Tn.t ->
tiles:Base.int ->
fragment_scope_violation)
Variantslib.Variant.t ->
fragment:Tn.t ->
tiles:Base.int ->
'result__) ->
scope_not_leading:
((fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
fragment:Tn.t ->
'result__) ->
tile_unbracketed:
((fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
fragment:Tn.t ->
'result__) ->
'result__val make_matcher :
tile_replicated:
((fragment:Tn.t ->
tiles:Base.int ->
fragment_scope_violation)
Variantslib.Variant.t ->
'acc__0 ->
(fragment:Tn.t -> tiles:Base.int -> 'result__) * 'acc__1) ->
scope_not_leading:
((fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
'acc__1 ->
(fragment:Tn.t -> 'result__) * 'acc__2) ->
tile_unbracketed:
((fragment:Tn.t -> fragment_scope_violation) Variantslib.Variant.t ->
'acc__2 ->
(fragment:Tn.t -> 'result__) * 'acc__3) ->
'acc__0 ->
(fragment_scope_violation -> 'result__) * 'acc__3val to_rank : fragment_scope_violation -> Base.intval to_name : fragment_scope_violation -> Base.string