package tezos-protocol-alpha
val return : 'a -> ('a, 'e) Pervasives.result
val return_unit : (unit, 'e) Pervasives.result
val return_none : ('a option, 'e) Pervasives.result
val return_some : 'a -> ('a option, 'e) Pervasives.result
val return_nil : ('a list, 'e) Pervasives.result
val return_true : (bool, 'e) Pervasives.result
val return_false : (bool, 'e) Pervasives.result
val fail : 'e -> ('a, 'e) Pervasives.result
val let* :
('a, 'e) Pervasives.result ->
('a -> ('b, 'e) Pervasives.result) ->
('b, 'e) Pervasives.result
val let+ :
('a, 'e) Pervasives.result ->
('a -> 'b) ->
('b, 'e) Pervasives.result
val join :
(unit, 'e) Pervasives.result list ->
(unit, 'e list) Pervasives.result
val all :
('a, 'e) Pervasives.result list ->
('a list, 'e list) Pervasives.result
val both :
('a, 'e) Pervasives.result ->
('b, 'e) Pervasives.result ->
('a * 'b, 'e list) Pervasives.result
val tzfail : 'error -> ('a, 'error trace) Pervasives.result
val and* :
('a, 'e trace) Pervasives.result ->
('b, 'e trace) Pervasives.result ->
('a * 'b, 'e trace) Pervasives.result
val and+ :
('a, 'e trace) Pervasives.result ->
('b, 'e trace) Pervasives.result ->
('a * 'b, 'e trace) Pervasives.result
val tzjoin :
(unit, 'error trace) Pervasives.result list ->
(unit, 'error trace) Pervasives.result
val tzall :
('a, 'error trace) Pervasives.result list ->
('a list, 'error trace) Pervasives.result
val tzboth :
('a, 'error trace) Pervasives.result ->
('b, 'error trace) Pervasives.result ->
('a * 'b, 'error trace) Pervasives.result
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>