|
- import { apFirst as apFirst_, apS as apS_, apSecond as apSecond_ } from './Apply';
- import { bind as bind_, chainFirst as chainFirst_ } from './Chain';
- import { tailRec } from './ChainRec';
- import { identity as id, pipe } from './function';
- import { let as let__, bindTo as bindTo_, flap as flap_ } from './Functor';
- import * as _ from './internal';
- var _map = function (fa, f) { return pipe(fa, map(f)); };
- var _ap = function (fab, fa) { return pipe(fab, ap(fa)); };
- var _chain = function (ma, f) { return pipe(ma, chain(f)); };
- /* istanbul ignore next */
- var _reduce = function (fa, b, f) { return pipe(fa, reduce(b, f)); };
- /* istanbul ignore next */
- var _foldMap = function (M) { return function (fa, f) { return pipe(fa, foldMap(M)(f)); }; };
- /* istanbul ignore next */
- var _reduceRight = function (fa, b, f) { return pipe(fa, reduceRight(b, f)); };
- /* istanbul ignore next */
- var _alt = function (fa, that) { return pipe(fa, alt(that)); };
- /* istanbul ignore next */
- var _extend = function (wa, f) { return pipe(wa, extend(f)); };
- /* istanbul ignore next */
- var _traverse = function (F) {
- var traverseF = traverse(F);
- return function (ta, f) { return pipe(ta, traverseF(f)); };
- };
- var _chainRec = tailRec;
- /**
- * `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
- */
- export var map = function (f) { return function (fa) { return f(fa); }; };
- /**
- * @since 2.0.0
- */
- export var ap = function (fa) { return function (fab) { return fab(fa); }; };
- /**
- * @category constructors
- * @since 2.0.0
- */
- export var of = id;
- /**
- * Composes computations in sequence, using the return value of one computation to determine the next computation.
- *
- * @category sequencing
- * @since 2.0.0
- */
- export var chain = function (f) { return function (ma) { return f(ma); }; };
- /**
- * @since 2.0.0
- */
- export var extend = function (f) { return function (wa) { return f(wa); }; };
- /**
- * @category Extract
- * @since 2.6.2
- */
- export var extract = id;
- /**
- * @since 2.0.0
- */
- export var duplicate = /*#__PURE__*/ extend(id);
- /**
- * @category sequencing
- * @since 2.0.0
- */
- export var flatten = /*#__PURE__*/ chain(id);
- /**
- * @category folding
- * @since 2.0.0
- */
- export var reduce = function (b, f) { return function (fa) { return f(b, fa); }; };
- /**
- * @category folding
- * @since 2.0.0
- */
- export var foldMap = function () { return function (f) { return function (fa) { return f(fa); }; }; };
- /**
- * @category folding
- * @since 2.0.0
- */
- export var reduceRight = function (b, f) { return function (fa) { return f(fa, b); }; };
- /**
- * @category traversing
- * @since 2.6.3
- */
- export var traverse = function (F) {
- return function (f) {
- return function (ta) {
- return F.map(f(ta), id);
- };
- };
- };
- /**
- * @category traversing
- * @since 2.6.3
- */
- export var sequence = function (F) {
- return function (ta) {
- return F.map(ta, id);
- };
- };
- /**
- * Less strict version of [`alt`](#alt).
- *
- * The `W` suffix (short for **W**idening) means that the return types will be merged.
- *
- * @category error handling
- * @since 2.9.0
- */
- export var altW = function () { return id; };
- /**
- * Identifies an associative operation on a type constructor. It is similar to `Semigroup`, except that it applies to
- * types of kind `* -> *`.
- *
- * @category error handling
- * @since 2.0.0
- */
- export var alt = altW;
- /**
- * @category type lambdas
- * @since 2.0.0
- */
- export var URI = 'Identity';
- /**
- * @category instances
- * @since 2.0.0
- */
- export var getShow = id;
- /**
- * @category instances
- * @since 2.0.0
- */
- export var getEq = id;
- /**
- * @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
- };
- /**
- * @category instances
- * @since 2.10.0
- */
- export var Apply = {
- URI: URI,
- map: _map,
- ap: _ap
- };
- /**
- * Combine two effectful actions, keeping only the result of the first.
- *
- * @since 2.0.0
- */
- export var apFirst = /*#__PURE__*/ apFirst_(Apply);
- /**
- * Combine two effectful actions, keeping only the result of the second.
- *
- * @since 2.0.0
- */
- export var apSecond = /*#__PURE__*/ apSecond_(Apply);
- /**
- * @category instances
- * @since 2.7.0
- */
- export var Applicative = {
- URI: URI,
- map: _map,
- ap: _ap,
- of: of
- };
- /**
- * @category instances
- * @since 2.10.0
- */
- export var Chain = {
- URI: URI,
- map: _map,
- ap: _ap,
- chain: _chain
- };
- /**
- * @category instances
- * @since 2.7.0
- */
- export var Monad = {
- URI: URI,
- map: _map,
- ap: _ap,
- of: 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
- */
- export var chainFirst = /*#__PURE__*/ chainFirst_(Chain);
- /**
- * @category instances
- * @since 2.7.0
- */
- export var Foldable = {
- URI: URI,
- reduce: _reduce,
- foldMap: _foldMap,
- reduceRight: _reduceRight
- };
- /**
- * @category instances
- * @since 2.7.0
- */
- export var Traversable = {
- URI: URI,
- map: _map,
- reduce: _reduce,
- foldMap: _foldMap,
- reduceRight: _reduceRight,
- traverse: _traverse,
- sequence: sequence
- };
- /**
- * @category instances
- * @since 2.7.0
- */
- export var Alt = {
- URI: URI,
- map: _map,
- alt: _alt
- };
- /**
- * @category instances
- * @since 2.7.0
- */
- export var Comonad = {
- URI: URI,
- map: _map,
- extend: _extend,
- extract: extract
- };
- /**
- * @category instances
- * @since 2.7.0
- */
- export var ChainRec = {
- URI: URI,
- map: _map,
- ap: _ap,
- chain: _chain,
- chainRec: _chainRec
- };
- // -------------------------------------------------------------------------------------
- // 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);
- /**
- * @category do notation
- * @since 2.8.0
- */
- export var apS = /*#__PURE__*/ apS_(Apply);
- // -------------------------------------------------------------------------------------
- // deprecated
- // -------------------------------------------------------------------------------------
- /**
- * This instance is deprecated, use small, specific instances instead.
- * For example if a function needs a `Functor` instance, pass `I.Functor` instead of `I.identity`
- * (where `I` is from `import I from 'fp-ts/Identity'`)
- *
- * @category zone of death
- * @since 2.0.0
- * @deprecated
- */
- export var identity = {
- URI: URI,
- map: _map,
- ap: _ap,
- of: of,
- chain: _chain,
- reduce: _reduce,
- foldMap: _foldMap,
- reduceRight: _reduceRight,
- traverse: _traverse,
- sequence: sequence,
- alt: _alt,
- extract: extract,
- extend: _extend,
- chainRec: _chainRec
- };
|