fp-ts
Version:
Functional programming in TypeScript
20 lines (19 loc) • 686 B
JavaScript
;
Object.defineProperty(exports, "__esModule", { value: true });
exports.chainFirst = chainFirst;
exports.tap = tap;
exports.bind = bind;
function chainFirst(M) {
var tapM = tap(M);
return function (f) { return function (first) { return tapM(first, f); }; };
}
/** @internal */
function tap(M) {
return function (first, f) { return M.chain(first, function (a) { return M.map(f(a), function () { return a; }); }); };
}
function bind(M) {
return function (name, f) { return function (ma) { return M.chain(ma, function (a) { return M.map(f(a), function (b) {
var _a;
return Object.assign({}, a, (_a = {}, _a[name] = b, _a));
}); }); }; };
}