|
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345 |
- "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.state = exports.execState = exports.evalState = exports.sequenceArray = exports.traverseArray = exports.traverseArrayWithIndex = exports.traverseReadonlyArrayWithIndex = exports.traverseReadonlyNonEmptyArrayWithIndex = exports.apS = exports.bind = exports.let = exports.bindTo = exports.execute = exports.evaluate = exports.FromState = exports.chainFirst = exports.Monad = exports.Chain = exports.Applicative = exports.apSecond = exports.apFirst = exports.Apply = exports.Pointed = exports.flap = exports.Functor = exports.URI = exports.flatten = exports.chain = exports.of = exports.ap = exports.map = exports.gets = exports.modify = exports.put = exports.get = void 0;
- var Apply_1 = require("./Apply");
- var Chain_1 = require("./Chain");
- var function_1 = require("./function");
- var Functor_1 = require("./Functor");
- var _ = __importStar(require("./internal"));
- // -------------------------------------------------------------------------------------
- // constructors
- // -------------------------------------------------------------------------------------
- /**
- * Get the current state
- *
- * @category constructors
- * @since 2.0.0
- */
- var get = function () { return function (s) { return [s, s]; }; };
- exports.get = get;
- /**
- * Set the state
- *
- * @category constructors
- * @since 2.0.0
- */
- var put = function (s) { return function () { return [undefined, s]; }; };
- exports.put = put;
- /**
- * Modify the state by applying a function to the current state
- *
- * @category constructors
- * @since 2.0.0
- */
- var modify = function (f) { return function (s) { return [undefined, f(s)]; }; };
- exports.modify = modify;
- /**
- * Get a value which depends on the current state
- *
- * @category constructors
- * @since 2.0.0
- */
- var gets = function (f) { return function (s) { return [f(s), s]; }; };
- exports.gets = gets;
- /* istanbul ignore next */
- var _map = function (fa, f) { return (0, function_1.pipe)(fa, (0, exports.map)(f)); };
- /* istanbul ignore next */
- var _ap = function (fab, fa) { return (0, function_1.pipe)(fab, (0, exports.ap)(fa)); };
- /* istanbul ignore next */
- var _chain = function (ma, f) { return (0, function_1.pipe)(ma, (0, exports.chain)(f)); };
- /**
- * `map` can be used to turn functions `(a: A) => B` into functions `(fa: F<A>) => F<B>` whose argument and return types
- * use the type constructor `F` to represent some computational context.
- *
- * @category mapping
- * @since 2.0.0
- */
- var map = function (f) { return function (fa) { return function (s1) {
- var _a = fa(s1), a = _a[0], s2 = _a[1];
- return [f(a), s2];
- }; }; };
- exports.map = map;
- /**
- * @since 2.0.0
- */
- var ap = function (fa) { return function (fab) { return function (s1) {
- var _a = fab(s1), f = _a[0], s2 = _a[1];
- var _b = fa(s2), a = _b[0], s3 = _b[1];
- return [f(a), s3];
- }; }; };
- exports.ap = ap;
- /**
- * @category constructors
- * @since 2.0.0
- */
- var of = function (a) { return function (s) { return [a, s]; }; };
- exports.of = of;
- /**
- * Composes computations in sequence, using the return value of one computation to determine the next computation.
- *
- * @category sequencing
- * @since 2.0.0
- */
- var chain = function (f) { return function (ma) { return function (s1) {
- var _a = ma(s1), a = _a[0], s2 = _a[1];
- return f(a)(s2);
- }; }; };
- exports.chain = chain;
- /**
- * @category sequencing
- * @since 2.0.0
- */
- exports.flatten = (0, exports.chain)(function_1.identity);
- /**
- * @category type lambdas
- * @since 2.0.0
- */
- exports.URI = 'State';
- /**
- * @category instances
- * @since 2.7.0
- */
- exports.Functor = {
- URI: exports.URI,
- map: _map
- };
- /**
- * @category mapping
- * @since 2.10.0
- */
- exports.flap = (0, Functor_1.flap)(exports.Functor);
- /**
- * @category instances
- * @since 2.10.0
- */
- exports.Pointed = {
- URI: exports.URI,
- of: exports.of
- };
- /**
- * @category instances
- * @since 2.10.0
- */
- exports.Apply = {
- URI: exports.URI,
- map: _map,
- ap: _ap
- };
- /**
- * Combine two effectful actions, keeping only the result of the first.
- *
- * @since 2.0.0
- */
- exports.apFirst = (0, Apply_1.apFirst)(exports.Apply);
- /**
- * Combine two effectful actions, keeping only the result of the second.
- *
- * @since 2.0.0
- */
- exports.apSecond = (0, Apply_1.apSecond)(exports.Apply);
- /**
- * @category instances
- * @since 2.7.0
- */
- exports.Applicative = {
- URI: exports.URI,
- map: _map,
- ap: _ap,
- of: exports.of
- };
- /**
- * @category instances
- * @since 2.10.0
- */
- exports.Chain = {
- URI: exports.URI,
- map: _map,
- ap: _ap,
- chain: _chain
- };
- /**
- * @category instances
- * @since 2.7.0
- */
- exports.Monad = {
- URI: exports.URI,
- map: _map,
- ap: _ap,
- of: exports.of,
- chain: _chain
- };
- /**
- * Composes computations in sequence, using the return value of one computation to determine the next computation and
- * keeping only the result of the first.
- *
- * @category sequencing
- * @since 2.0.0
- */
- exports.chainFirst =
- /*#__PURE__*/ (0, Chain_1.chainFirst)(exports.Chain);
- /**
- * @category instances
- * @since 2.11.0
- */
- exports.FromState = {
- URI: exports.URI,
- fromState: function_1.identity
- };
- // -------------------------------------------------------------------------------------
- // utils
- // -------------------------------------------------------------------------------------
- /**
- * Run a computation in the `State` monad, discarding the final state
- *
- * @since 2.8.0
- */
- var evaluate = function (s) {
- return function (ma) {
- return ma(s)[0];
- };
- };
- exports.evaluate = evaluate;
- /**
- * Run a computation in the `State` monad discarding the result
- *
- * @since 2.8.0
- */
- var execute = function (s) {
- return function (ma) {
- return ma(s)[1];
- };
- };
- exports.execute = execute;
- // -------------------------------------------------------------------------------------
- // do notation
- // -------------------------------------------------------------------------------------
- /**
- * @since 2.8.0
- */
- exports.bindTo = (0, Functor_1.bindTo)(exports.Functor);
- var let_ = /*#__PURE__*/ (0, Functor_1.let)(exports.Functor);
- exports.let = let_;
- /**
- * @since 2.8.0
- */
- exports.bind = (0, Chain_1.bind)(exports.Chain);
- // -------------------------------------------------------------------------------------
- // pipeable sequence S
- // -------------------------------------------------------------------------------------
- /**
- * @since 2.8.0
- */
- exports.apS = (0, Apply_1.apS)(exports.Apply);
- // -------------------------------------------------------------------------------------
- // array utils
- // -------------------------------------------------------------------------------------
- /**
- * Equivalent to `ReadonlyNonEmptyArray#traverseWithIndex(Applicative)`.
- *
- * @category traversing
- * @since 2.11.0
- */
- var traverseReadonlyNonEmptyArrayWithIndex = function (f) {
- return function (as) {
- return function (s) {
- var _a = f(0, _.head(as))(s), b = _a[0], s2 = _a[1];
- var bs = [b];
- var out = s2;
- for (var i = 1; i < as.length; i++) {
- var _b = f(i, as[i])(out), b_1 = _b[0], s2_1 = _b[1];
- bs.push(b_1);
- out = s2_1;
- }
- return [bs, out];
- };
- };
- };
- exports.traverseReadonlyNonEmptyArrayWithIndex = traverseReadonlyNonEmptyArrayWithIndex;
- /**
- * Equivalent to `ReadonlyArray#traverseWithIndex(Applicative)`.
- *
- * @category traversing
- * @since 2.11.0
- */
- var traverseReadonlyArrayWithIndex = function (f) {
- var g = (0, exports.traverseReadonlyNonEmptyArrayWithIndex)(f);
- return function (as) { return (_.isNonEmpty(as) ? g(as) : (0, exports.of)(_.emptyReadonlyArray)); };
- };
- exports.traverseReadonlyArrayWithIndex = traverseReadonlyArrayWithIndex;
- /**
- * Equivalent to `ReadonlyArray#traverseWithIndex(Applicative)`.
- *
- * @category traversing
- * @since 2.9.0
- */
- exports.traverseArrayWithIndex = exports.traverseReadonlyArrayWithIndex;
- /**
- * Equivalent to `ReadonlyArray#traverse(Applicative)`.
- *
- * @category traversing
- * @since 2.9.0
- */
- var traverseArray = function (f) { return (0, exports.traverseReadonlyArrayWithIndex)(function (_, a) { return f(a); }); };
- exports.traverseArray = traverseArray;
- /**
- * Equivalent to `ReadonlyArray#sequence(Applicative)`.
- *
- * @category traversing
- * @since 2.9.0
- */
- exports.sequenceArray =
- /*#__PURE__*/ (0, exports.traverseArray)(function_1.identity);
- // -------------------------------------------------------------------------------------
- // deprecated
- // -------------------------------------------------------------------------------------
- /**
- * Use [`evaluate`](#evaluate) instead
- *
- * @category zone of death
- * @since 2.0.0
- * @deprecated
- */
- var evalState = function (ma, s) { return ma(s)[0]; };
- exports.evalState = evalState;
- /**
- * Use [`execute`](#execute) instead
- *
- * @category zone of death
- * @since 2.0.0
- * @deprecated
- */
- var execState = function (ma, s) { return ma(s)[1]; };
- exports.execState = execState;
- /**
- * This instance is deprecated, use small, specific instances instead.
- * For example if a function needs a `Functor` instance, pass `S.Functor` instead of `S.state`
- * (where `S` is from `import S from 'fp-ts/State'`)
- *
- * @category zone of death
- * @since 2.0.0
- * @deprecated
- */
- exports.state = exports.Monad;
|