monocle-ts-esm
Version:
A porting of scala monocle library to TypeScript
279 lines (278 loc) • 8.47 kB
JavaScript
;
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.Category = exports.Semigroupoid = exports.Invariant = exports.URI = exports.imap = exports.findFirstNonEmpty = exports.findFirst = exports.traverse = exports.left = exports.right = exports.some = exports.atKey = exports.key = exports.indexNonEmpty = exports.index = exports.component = exports.props = exports.prop = exports.filter = exports.fromNullable = exports.modifyF = exports.modify = exports.composeTraversal = exports.composeOptional = exports.composePrism = exports.composeIso = exports.composeLens = exports.compose = exports.asTraversal = exports.asOptional = exports.id = exports.lens = void 0;
const function_1 = require("fp-ts-esm/function");
const pipeable_1 = require("fp-ts-esm/pipeable");
const _ = __importStar(require("./internal.js"));
// -------------------------------------------------------------------------------------
// constructors
// -------------------------------------------------------------------------------------
/**
* @category constructors
* @since 2.3.8
*/
exports.lens = _.lens;
/**
* @category constructors
* @since 2.3.0
*/
exports.id = _.lensId;
// -------------------------------------------------------------------------------------
// converters
// -------------------------------------------------------------------------------------
/**
* View a `Lens` as a `Optional`.
*
* @category converters
* @since 2.3.0
*/
exports.asOptional = _.lensAsOptional;
/**
* View a `Lens` as a `Traversal`.
*
* @category converters
* @since 2.3.0
*/
exports.asTraversal = _.lensAsTraversal;
// -------------------------------------------------------------------------------------
// compositions
// -------------------------------------------------------------------------------------
/**
* Compose a `Lens` with a `Lens`.
*
* @category compositions
* @since 2.3.0
*/
exports.compose = _.lensComposeLens;
/**
* Alias of `compose`.
*
* @category compositions
* @since 2.3.8
*/
exports.composeLens = exports.compose;
/**
* Compose a `Lens` with a `Iso`.
*
* @category compositions
* @since 2.3.8
*/
exports.composeIso =
/*#__PURE__*/
(0, function_1.flow)(_.isoAsLens, exports.compose);
/**
* Compose a `Lens` with a `Prism`.
*
* @category compositions
* @since 2.3.0
*/
exports.composePrism = _.lensComposePrism;
/**
* Compose a `Lens` with an `Optional`.
*
* @category compositions
* @since 2.3.0
*/
const composeOptional = (ab) => (0, function_1.flow)(exports.asOptional, _.optionalComposeOptional(ab));
exports.composeOptional = composeOptional;
/**
* Compose a `Lens` with an `Traversal`.
*
* @category compositions
* @since 2.3.8
*/
const composeTraversal = (ab) => (0, function_1.flow)(exports.asTraversal, _.traversalComposeTraversal(ab));
exports.composeTraversal = composeTraversal;
// -------------------------------------------------------------------------------------
// combinators
// -------------------------------------------------------------------------------------
/**
* @category combinators
* @since 2.3.0
*/
const modify = (f) => (sa) => (s) => {
const o = sa.get(s);
const n = f(o);
return o === n ? s : sa.set(n)(s);
};
exports.modify = modify;
function modifyF(F) {
// @ts-expect-error
return (f) => (sa) => (s) => (0, pipeable_1.pipe)(sa.get(s), f, (fa) => F.map(fa, (a) => sa.set(a)(s)));
}
exports.modifyF = modifyF;
/**
* Return a `Optional` from a `Lens` focused on a nullable value.
*
* @category combinators
* @since 2.3.0
*/
const fromNullable = (sa) => (0, exports.composePrism)(_.prismFromNullable())(sa);
exports.fromNullable = fromNullable;
function filter(predicate) {
return (0, exports.composePrism)(_.prismFromPredicate(predicate));
}
exports.filter = filter;
/**
* Return a `Lens` from a `Lens` and a prop.
*
* @category combinators
* @since 2.3.0
*/
exports.prop = _.lensProp;
/**
* Return a `Lens` from a `Lens` and a list of props.
*
* @category combinators
* @since 2.3.0
*/
exports.props = _.lensProps;
/**
* Return a `Lens` from a `Lens` focused on a component of a tuple.
*
* @category combinators
* @since 2.3.0
*/
exports.component = _.lensComponent;
/**
* Return a `Optional` from a `Lens` focused on an index of a `ReadonlyArray`.
*
* @category combinators
* @since 2.3.0
*/
const index = (i) => (0, function_1.flow)(exports.asOptional, _.optionalIndex(i));
exports.index = index;
/**
* Return a `Optional` from a `Lens` focused on an index of a `ReadonlyNonEmptyArray`.
*
* @category combinators
* @since 2.3.8
*/
const indexNonEmpty = (i) => (0, function_1.flow)(exports.asOptional, _.optionalIndexNonEmpty(i));
exports.indexNonEmpty = indexNonEmpty;
/**
* Return a `Optional` from a `Lens` focused on a key of a `ReadonlyRecord`.
*
* @category combinators
* @since 2.3.0
*/
const key = (key) => (0, function_1.flow)(exports.asOptional, _.optionalKey(key));
exports.key = key;
/**
* Return a `Lens` from a `Lens` focused on a required key of a `ReadonlyRecord`.
*
* @category combinators
* @since 2.3.0
*/
exports.atKey = _.lensAtKey;
/**
* Return a `Optional` from a `Lens` focused on the `Some` of a `Option` type.
*
* @category combinators
* @since 2.3.0
*/
exports.some =
/*#__PURE__*/
(0, exports.composePrism)(/*#__PURE__*/ _.prismSome());
/**
* Return a `Optional` from a `Lens` focused on the `Right` of a `Either` type.
*
* @category combinators
* @since 2.3.0
*/
exports.right =
/*#__PURE__*/
(0, exports.composePrism)(/*#__PURE__*/ _.prismRight());
/**
* Return a `Optional` from a `Lens` focused on the `Left` of a `Either` type.
*
* @category combinators
* @since 2.3.0
*/
exports.left =
/*#__PURE__*/
(0, exports.composePrism)(/*#__PURE__*/ _.prismLeft());
/**
* Return a `Traversal` from a `Lens` focused on a `Traversable`.
*
* @category combinators
* @since 2.3.0
*/
function traverse(T) {
return (0, function_1.flow)(exports.asTraversal, _.traversalTraverse(T));
}
exports.traverse = traverse;
function findFirst(predicate) {
return (0, exports.composeOptional)(_.optionalFindFirst(predicate));
}
exports.findFirst = findFirst;
function findFirstNonEmpty(predicate) {
return (0, exports.composeOptional)(_.optionalFindFirstNonEmpty(predicate));
}
exports.findFirstNonEmpty = findFirstNonEmpty;
// -------------------------------------------------------------------------------------
// pipeables
// -------------------------------------------------------------------------------------
/**
* @category Invariant
* @since 2.3.0
*/
const imap = (f, g) => (ea) => imap_(ea, f, g);
exports.imap = imap;
// -------------------------------------------------------------------------------------
// instances
// -------------------------------------------------------------------------------------
const imap_ = (ea, ab, ba) => (0, exports.lens)((0, function_1.flow)(ea.get, ab), (0, function_1.flow)(ba, ea.set));
/**
* @category instances
* @since 2.3.0
*/
exports.URI = 'monocle-ts/Lens';
/**
* @category instances
* @since 2.3.0
*/
exports.Invariant = {
URI: exports.URI,
imap: imap_
};
/**
* @category instances
* @since 2.3.8
*/
exports.Semigroupoid = {
URI: exports.URI,
compose: (ab, ea) => (0, exports.compose)(ab)(ea)
};
/**
* @category instances
* @since 2.3.0
*/
exports.Category = {
URI: exports.URI,
compose: exports.Semigroupoid.compose,
id: exports.id
};