Innovenergy_trunk/frontend/node_modules/fp-ts/lib/FromReader.js

56 lines
2.0 KiB
JavaScript

"use strict";
var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
if (k2 === undefined) k2 = k;
var desc = Object.getOwnPropertyDescriptor(m, k);
if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
desc = { enumerable: true, get: function() { return m[k]; } };
}
Object.defineProperty(o, k2, desc);
}) : (function(o, m, k, k2) {
if (k2 === undefined) k2 = k;
o[k2] = m[k];
}));
var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) {
Object.defineProperty(o, "default", { enumerable: true, value: v });
}) : function(o, v) {
o["default"] = v;
});
var __importStar = (this && this.__importStar) || function (mod) {
if (mod && mod.__esModule) return mod;
var result = {};
if (mod != null) for (var k in mod) if (k !== "default" && Object.prototype.hasOwnProperty.call(mod, k)) __createBinding(result, mod, k);
__setModuleDefault(result, mod);
return result;
};
Object.defineProperty(exports, "__esModule", { value: true });
exports.chainFirstReaderK = exports.chainReaderK = exports.fromReaderK = exports.asks = exports.ask = void 0;
/**
* Lift a computation from the `Reader` monad.
*
* @since 2.11.0
*/
var Chain_1 = require("./Chain");
var function_1 = require("./function");
var R = __importStar(require("./Reader"));
function ask(F) {
return function () { return F.fromReader(R.ask()); };
}
exports.ask = ask;
function asks(F) {
return F.fromReader;
}
exports.asks = asks;
function fromReaderK(F) {
return function (f) { return (0, function_1.flow)(f, F.fromReader); };
}
exports.fromReaderK = fromReaderK;
function chainReaderK(F, M) {
var fromReaderKF = fromReaderK(F);
return function (f) { return function (ma) { return M.chain(ma, fromReaderKF(f)); }; };
}
exports.chainReaderK = chainReaderK;
function chainFirstReaderK(F, M) {
return (0, function_1.flow)(fromReaderK(F), (0, Chain_1.chainFirst)(M));
}
exports.chainFirstReaderK = chainFirstReaderK;