let
fail x =
Deferred
.return (
Result
.fail x)