Module Bonsai__.Compose

type Bonsai__.Import.Component.unpacked += C : {
t1 : ('i1, 'm1, 'a1, 'r1, 'incr, 'event) Bonsai__.Import.Component.unpacked;
model1 : 'm1 Bonsai__.Import.Component.Packed.model_info;
action_type_id1 : 'a1 Core_kernel.Type_equal.Id.t;
t2 : ('r1, 'm2, 'a2, 'r2, 'incr, 'event) Bonsai__.Import.Component.unpacked;
model2 : 'm2 Bonsai__.Import.Component.Packed.model_info;
action_type_id2 : 'a2 Core_kernel.Type_equal.Id.t;
} -> ('i1, 'm1 * 'm2, ('a1, 'a2) Core_kernel.Either.t, 'r2, 'incr, 'event) Bonsai__.Import.Component.unpacked
val compose : ('input, 'intermediate, 'incr, 'event) Bonsai__.Import.Component.Packed.t -> ('intermediate, 'result, 'incr, 'event) Bonsai__.Import.Component.Packed.t -> ('input, 'result, 'incr, 'event) Bonsai__.Import.Component.Packed.t