class [['a, 'b]] seq_engine : 'a #engine -> ('a -> 'b #engine) -> ['b] engine
[['a, 'b]]
'a #engine -> ('a -> 'b #engine) ->
['b]
engine