624 lines
15 KiB
JavaScript
624 lines
15 KiB
JavaScript
/**
|
|
* @since 2.3.0
|
|
*/
|
|
import { getApplicativeMonoid } from './Applicative';
|
|
import { apFirst as apFirst_, apS as apS_, apSecond as apSecond_, getApplySemigroup as getApplySemigroup_ } from './Apply';
|
|
import { bind as bind_, chainFirst as chainFirst_ } from './Chain';
|
|
import { chainFirstIOK as chainFirstIOK_, chainIOK as chainIOK_, fromIOK as fromIOK_ } from './FromIO';
|
|
import { ask as ask_, asks as asks_, chainFirstReaderK as chainFirstReaderK_, chainReaderK as chainReaderK_, fromReaderK as fromReaderK_ } from './FromReader';
|
|
import { chainFirstTaskK as chainFirstTaskK_, chainTaskK as chainTaskK_, fromTaskK as fromTaskK_ } from './FromTask';
|
|
import { flow, identity, pipe, SK } from './function';
|
|
import { let as let__, bindTo as bindTo_, flap as flap_ } from './Functor';
|
|
import * as _ from './internal';
|
|
import * as R from './Reader';
|
|
import * as RT from './ReaderT';
|
|
import * as T from './Task';
|
|
// -------------------------------------------------------------------------------------
|
|
// conversions
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* @category conversions
|
|
* @since 2.3.0
|
|
*/
|
|
export var fromReader = /*#__PURE__*/ RT.fromReader(T.Pointed);
|
|
/**
|
|
* @category conversions
|
|
* @since 2.3.0
|
|
*/
|
|
export var fromTask = /*#__PURE__*/ R.of;
|
|
/**
|
|
* @category conversions
|
|
* @since 2.3.0
|
|
*/
|
|
export var fromIO = /*#__PURE__*/ flow(T.fromIO, fromTask);
|
|
/**
|
|
* @category conversions
|
|
* @since 2.13.0
|
|
*/
|
|
export var fromReaderIO = R.map(T.fromIO);
|
|
// -------------------------------------------------------------------------------------
|
|
// combinators
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* Changes the value of the local context during the execution of the action `ma` (similar to `Contravariant`'s
|
|
* `contramap`).
|
|
*
|
|
* @since 2.3.0
|
|
*/
|
|
export var local = R.local;
|
|
/**
|
|
* Less strict version of [`asksReaderTask`](#asksreadertask).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category constructors
|
|
* @since 2.11.0
|
|
*/
|
|
export var asksReaderTaskW = R.asksReaderW;
|
|
/**
|
|
* Effectfully accesses the environment.
|
|
*
|
|
* @category constructors
|
|
* @since 2.11.0
|
|
*/
|
|
export var asksReaderTask = asksReaderTaskW;
|
|
var _map = function (fa, f) { return pipe(fa, map(f)); };
|
|
var _apPar = function (fab, fa) { return pipe(fab, ap(fa)); };
|
|
var _apSeq = function (fab, fa) {
|
|
return pipe(fab, chain(function (f) { return pipe(fa, map(f)); }));
|
|
};
|
|
var _chain = function (ma, f) { return pipe(ma, 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.3.0
|
|
*/
|
|
export var map = /*#__PURE__*/ RT.map(T.Functor);
|
|
/**
|
|
* @since 2.3.0
|
|
*/
|
|
export var ap =
|
|
/*#__PURE__*/ RT.ap(T.ApplyPar);
|
|
/**
|
|
* Less strict version of [`ap`](#ap).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @since 2.8.0
|
|
*/
|
|
export var apW = ap;
|
|
/**
|
|
* @category constructors
|
|
* @since 2.3.0
|
|
*/
|
|
export var of = /*#__PURE__*/ RT.of(T.Pointed);
|
|
/**
|
|
* Composes computations in sequence, using the return value of one computation to determine the next computation.
|
|
*
|
|
* @category sequencing
|
|
* @since 2.3.0
|
|
*/
|
|
export var chain =
|
|
/*#__PURE__*/ RT.chain(T.Monad);
|
|
/**
|
|
* Less strict version of [`chain`](#chain).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category sequencing
|
|
* @since 2.6.7
|
|
*/
|
|
export var chainW = chain;
|
|
/**
|
|
* Less strict version of [`flatten`](#flatten).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category sequencing
|
|
* @since 2.11.0
|
|
*/
|
|
export var flattenW =
|
|
/*#__PURE__*/ chainW(identity);
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.3.0
|
|
*/
|
|
export var flatten = flattenW;
|
|
/**
|
|
* @category type lambdas
|
|
* @since 2.3.0
|
|
*/
|
|
export var URI = 'ReaderTask';
|
|
/**
|
|
* @category instances
|
|
* @since 2.7.0
|
|
*/
|
|
export var Functor = {
|
|
URI: URI,
|
|
map: _map
|
|
};
|
|
/**
|
|
* @category mapping
|
|
* @since 2.10.0
|
|
*/
|
|
export var flap = /*#__PURE__*/ flap_(Functor);
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var Pointed = {
|
|
URI: URI,
|
|
of: of
|
|
};
|
|
/**
|
|
* Runs computations in parallel.
|
|
*
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var ApplyPar = {
|
|
URI: URI,
|
|
map: _map,
|
|
ap: _apPar
|
|
};
|
|
/**
|
|
* Combine two effectful actions, keeping only the result of the first.
|
|
*
|
|
* @since 2.3.0
|
|
*/
|
|
export var apFirst = /*#__PURE__*/ apFirst_(ApplyPar);
|
|
/**
|
|
* Combine two effectful actions, keeping only the result of the second.
|
|
*
|
|
* @since 2.3.0
|
|
*/
|
|
export var apSecond = /*#__PURE__*/ apSecond_(ApplyPar);
|
|
/**
|
|
* Runs computations in parallel.
|
|
*
|
|
* @category instances
|
|
* @since 2.7.0
|
|
*/
|
|
export var ApplicativePar = {
|
|
URI: URI,
|
|
map: _map,
|
|
ap: _apPar,
|
|
of: of
|
|
};
|
|
/**
|
|
* Runs computations sequentially.
|
|
*
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var ApplySeq = {
|
|
URI: URI,
|
|
map: _map,
|
|
ap: _apSeq
|
|
};
|
|
/**
|
|
* Runs computations sequentially.
|
|
*
|
|
* @category instances
|
|
* @since 2.7.0
|
|
*/
|
|
export var ApplicativeSeq = {
|
|
URI: URI,
|
|
map: _map,
|
|
ap: _apSeq,
|
|
of: of
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var Chain = {
|
|
URI: URI,
|
|
map: _map,
|
|
ap: _apPar,
|
|
chain: _chain
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var Monad = {
|
|
URI: URI,
|
|
map: _map,
|
|
of: of,
|
|
ap: _apPar,
|
|
chain: _chain
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var MonadIO = {
|
|
URI: URI,
|
|
map: _map,
|
|
of: of,
|
|
ap: _apPar,
|
|
chain: _chain,
|
|
fromIO: fromIO
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var MonadTask = {
|
|
URI: URI,
|
|
map: _map,
|
|
of: of,
|
|
ap: _apPar,
|
|
chain: _chain,
|
|
fromIO: fromIO,
|
|
fromTask: fromTask
|
|
};
|
|
/**
|
|
* 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.3.0
|
|
*/
|
|
export var chainFirst =
|
|
/*#__PURE__*/ chainFirst_(Chain);
|
|
/**
|
|
* Less strict version of [`chainFirst`](#chainfirst).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category sequencing
|
|
* @since 2.11.0
|
|
*/
|
|
export var chainFirstW = chainFirst;
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var FromIO = {
|
|
URI: URI,
|
|
fromIO: fromIO
|
|
};
|
|
/**
|
|
* @category lifting
|
|
* @since 2.4.0
|
|
*/
|
|
export var fromIOK = /*#__PURE__*/ fromIOK_(FromIO);
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.4.0
|
|
*/
|
|
export var chainIOK =
|
|
/*#__PURE__*/ chainIOK_(FromIO, Chain);
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.10.0
|
|
*/
|
|
export var chainFirstIOK =
|
|
/*#__PURE__*/ chainFirstIOK_(FromIO, Chain);
|
|
/**
|
|
* @category instances
|
|
* @since 2.11.0
|
|
*/
|
|
export var FromReader = {
|
|
URI: URI,
|
|
fromReader: fromReader
|
|
};
|
|
/**
|
|
* Reads the current context.
|
|
*
|
|
* @category constructors
|
|
* @since 2.3.0
|
|
*/
|
|
export var ask = /*#__PURE__*/ ask_(FromReader);
|
|
/**
|
|
* Projects a value from the global context in a `ReaderTask`.
|
|
*
|
|
* @category constructors
|
|
* @since 2.3.0
|
|
*/
|
|
export var asks = /*#__PURE__*/ asks_(FromReader);
|
|
/**
|
|
* @category lifting
|
|
* @since 2.11.0
|
|
*/
|
|
export var fromReaderK = /*#__PURE__*/ fromReaderK_(FromReader);
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.11.0
|
|
*/
|
|
export var chainReaderK =
|
|
/*#__PURE__*/ chainReaderK_(FromReader, Chain);
|
|
/**
|
|
* Less strict version of [`chainReaderK`](#chainreaderk).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category sequencing
|
|
* @since 2.11.0
|
|
*/
|
|
export var chainReaderKW = chainReaderK;
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.11.0
|
|
*/
|
|
export var chainFirstReaderK =
|
|
/*#__PURE__*/ chainFirstReaderK_(FromReader, Chain);
|
|
/**
|
|
* Less strict version of [`chainFirstReaderK`](#chainfirstreaderk).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category sequencing
|
|
* @since 2.11.0
|
|
*/
|
|
export var chainFirstReaderKW = chainFirstReaderK;
|
|
/**
|
|
* @category lifting
|
|
* @since 2.13.0
|
|
*/
|
|
export var fromReaderIOK = function (f) {
|
|
return function () {
|
|
var a = [];
|
|
for (var _i = 0; _i < arguments.length; _i++) {
|
|
a[_i] = arguments[_i];
|
|
}
|
|
return fromReaderIO(f.apply(void 0, a));
|
|
};
|
|
};
|
|
/**
|
|
* Less strict version of [`chainReaderIOK`](#chainreaderiok).
|
|
*
|
|
* @category sequencing
|
|
* @since 2.13.0
|
|
*/
|
|
export var chainReaderIOKW = function (f) { return chainW(fromReaderIOK(f)); };
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.13.0
|
|
*/
|
|
export var chainReaderIOK = chainReaderIOKW;
|
|
/**
|
|
* Less strict version of [`chainFirstReaderIOK`](#chainfirstreaderiok).
|
|
*
|
|
* @category sequencing
|
|
* @since 2.13.0
|
|
*/
|
|
export var chainFirstReaderIOKW = function (f) { return chainFirstW(fromReaderIOK(f)); };
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.13.0
|
|
*/
|
|
export var chainFirstReaderIOK = chainFirstReaderIOKW;
|
|
/**
|
|
* @category instances
|
|
* @since 2.10.0
|
|
*/
|
|
export var FromTask = {
|
|
URI: URI,
|
|
fromIO: fromIO,
|
|
fromTask: fromTask
|
|
};
|
|
/**
|
|
* @category lifting
|
|
* @since 2.4.0
|
|
*/
|
|
export var fromTaskK = /*#__PURE__*/ fromTaskK_(FromTask);
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.4.0
|
|
*/
|
|
export var chainTaskK =
|
|
/*#__PURE__*/ chainTaskK_(FromTask, Chain);
|
|
/**
|
|
* @category sequencing
|
|
* @since 2.10.0
|
|
*/
|
|
export var chainFirstTaskK =
|
|
/*#__PURE__*/ chainFirstTaskK_(FromTask, Chain);
|
|
// -------------------------------------------------------------------------------------
|
|
// do notation
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* @category do notation
|
|
* @since 2.9.0
|
|
*/
|
|
export var Do = /*#__PURE__*/ of(_.emptyRecord);
|
|
/**
|
|
* @category do notation
|
|
* @since 2.8.0
|
|
*/
|
|
export var bindTo = /*#__PURE__*/ bindTo_(Functor);
|
|
var let_ = /*#__PURE__*/ let__(Functor);
|
|
export {
|
|
/**
|
|
* @category do notation
|
|
* @since 2.13.0
|
|
*/
|
|
let_ as let };
|
|
/**
|
|
* @category do notation
|
|
* @since 2.8.0
|
|
*/
|
|
export var bind = /*#__PURE__*/ bind_(Chain);
|
|
/**
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category do notation
|
|
* @since 2.8.0
|
|
*/
|
|
export var bindW = bind;
|
|
/**
|
|
* @category do notation
|
|
* @since 2.8.0
|
|
*/
|
|
export var apS = /*#__PURE__*/ apS_(ApplyPar);
|
|
/**
|
|
* Less strict version of [`apS`](#aps).
|
|
*
|
|
* The `W` suffix (short for **W**idening) means that the environment types will be merged.
|
|
*
|
|
* @category do notation
|
|
* @since 2.8.0
|
|
*/
|
|
export var apSW = apS;
|
|
/**
|
|
* @since 2.11.0
|
|
*/
|
|
export var ApT = /*#__PURE__*/ of(_.emptyReadonlyArray);
|
|
// -------------------------------------------------------------------------------------
|
|
// array utils
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* Equivalent to `ReadonlyNonEmptyArray#traverseWithIndex(Applicative)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.11.0
|
|
*/
|
|
export var traverseReadonlyNonEmptyArrayWithIndex = function (f) {
|
|
return flow(R.traverseReadonlyNonEmptyArrayWithIndex(f), R.map(T.traverseReadonlyNonEmptyArrayWithIndex(SK)));
|
|
};
|
|
/**
|
|
* Equivalent to `ReadonlyArray#traverseWithIndex(Applicative)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.11.0
|
|
*/
|
|
export var traverseReadonlyArrayWithIndex = function (f) {
|
|
var g = traverseReadonlyNonEmptyArrayWithIndex(f);
|
|
return function (as) { return (_.isNonEmpty(as) ? g(as) : ApT); };
|
|
};
|
|
/**
|
|
* Equivalent to `ReadonlyNonEmptyArray#traverseWithIndex(ApplicativeSeq)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.11.0
|
|
*/
|
|
export var traverseReadonlyNonEmptyArrayWithIndexSeq = function (f) {
|
|
return flow(R.traverseReadonlyNonEmptyArrayWithIndex(f), R.map(T.traverseReadonlyNonEmptyArrayWithIndexSeq(SK)));
|
|
};
|
|
/**
|
|
* Equivalent to `ReadonlyArray#traverseWithIndex(ApplicativeSeq)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.11.0
|
|
*/
|
|
export var traverseReadonlyArrayWithIndexSeq = function (f) {
|
|
var g = traverseReadonlyNonEmptyArrayWithIndexSeq(f);
|
|
return function (as) { return (_.isNonEmpty(as) ? g(as) : ApT); };
|
|
};
|
|
/**
|
|
* Equivalent to `ReadonlyArray#traverseWithIndex(Applicative)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.9.0
|
|
*/
|
|
export var traverseArrayWithIndex = traverseReadonlyArrayWithIndex;
|
|
/**
|
|
* Equivalent to `ReadonlyArray#traverseWithIndex(Applicative)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.9.0
|
|
*/
|
|
export var traverseArray = function (f) { return traverseReadonlyArrayWithIndex(function (_, a) { return f(a); }); };
|
|
/**
|
|
* Equivalent to `ReadonlyArray#sequence(Applicative)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.9.0
|
|
*/
|
|
export var sequenceArray =
|
|
/*#__PURE__*/ traverseArray(identity);
|
|
/**
|
|
* Equivalent to `ReadonlyArray#traverseWithIndex(ApplicativeSeq)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.10.0
|
|
*/
|
|
export var traverseSeqArrayWithIndex = traverseReadonlyArrayWithIndexSeq;
|
|
/**
|
|
* Equivalent to `ReadonlyArray#traverse(ApplicativeSeq)`.
|
|
*
|
|
* @category traversing
|
|
* @since 2.10.0
|
|
*/
|
|
export var traverseSeqArray = function (f) { return traverseReadonlyArrayWithIndexSeq(function (_, a) { return f(a); }); };
|
|
// -------------------------------------------------------------------------------------
|
|
// deprecated
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* Use `traverseReadonlyArrayWithIndexSeq` instead.
|
|
*
|
|
* @category zone of death
|
|
* @since 2.10.0
|
|
* @deprecated
|
|
*/
|
|
export var sequenceSeqArray =
|
|
/*#__PURE__*/ traverseSeqArray(identity);
|
|
/**
|
|
* This instance is deprecated, use small, specific instances instead.
|
|
* For example if a function needs a `Functor` instance, pass `RT.Functor` instead of `RT.readerTask`
|
|
* (where `RT` is from `import RT from 'fp-ts/ReaderTask'`)
|
|
*
|
|
* @category zone of death
|
|
* @since 2.3.0
|
|
* @deprecated
|
|
*/
|
|
export var readerTask = {
|
|
URI: URI,
|
|
map: _map,
|
|
of: of,
|
|
ap: _apPar,
|
|
chain: _chain,
|
|
fromIO: fromIO,
|
|
fromTask: fromTask
|
|
};
|
|
/**
|
|
* This instance is deprecated, use small, specific instances instead.
|
|
* For example if a function needs a `Functor` instance, pass `RT.Functor` instead of `RT.readerTaskSeq`
|
|
* (where `RT` is from `import RT from 'fp-ts/ReaderTask'`)
|
|
*
|
|
* @category zone of death
|
|
* @since 2.3.0
|
|
* @deprecated
|
|
*/
|
|
export var readerTaskSeq = {
|
|
URI: URI,
|
|
map: _map,
|
|
of: of,
|
|
ap: _apSeq,
|
|
chain: _chain,
|
|
fromIO: fromIO,
|
|
fromTask: fromTask
|
|
};
|
|
/**
|
|
* Use [`getApplySemigroup`](./Apply.ts.html#getapplysemigroup) instead.
|
|
*
|
|
* @category zone of death
|
|
* @since 2.3.0
|
|
* @deprecated
|
|
*/
|
|
export var getSemigroup =
|
|
/*#__PURE__*/ getApplySemigroup_(ApplySeq);
|
|
/**
|
|
* Use [`getApplicativeMonoid`](./Applicative.ts.html#getapplicativemonoid) instead.
|
|
*
|
|
* @category zone of death
|
|
* @since 2.3.0
|
|
* @deprecated
|
|
*/
|
|
export var getMonoid =
|
|
/*#__PURE__*/ getApplicativeMonoid(ApplicativeSeq);
|
|
/**
|
|
* @category zone of death
|
|
* @since 2.4.0
|
|
* @deprecated
|
|
*/
|
|
/* istanbul ignore next */
|
|
export function run(ma, r) {
|
|
return ma(r)();
|
|
}
|