960 lines
25 KiB
JavaScript
960 lines
25 KiB
JavaScript
import { fromEquals } from './Eq';
|
|
import { pipe, SK } from './function';
|
|
import { flap as flap_ } from './Functor';
|
|
import * as _ from './internal';
|
|
import * as O from './Option';
|
|
import { separated } from './Separated';
|
|
import { wiltDefault, witherDefault } from './Witherable';
|
|
/**
|
|
* @category conversions
|
|
* @since 2.5.0
|
|
*/
|
|
export var fromMap = function (m) { return new Map(m); };
|
|
/**
|
|
* @category conversions
|
|
* @since 2.5.0
|
|
*/
|
|
export function toMap(m) {
|
|
return new Map(m);
|
|
}
|
|
/**
|
|
* @category instances
|
|
* @since 2.5.0
|
|
*/
|
|
export function getShow(SK, SA) {
|
|
return {
|
|
show: function (m) {
|
|
var entries = [];
|
|
m.forEach(function (a, k) {
|
|
entries.push("[".concat(SK.show(k), ", ").concat(SA.show(a), "]"));
|
|
});
|
|
return "new Map([".concat(entries.sort().join(', '), "])");
|
|
}
|
|
};
|
|
}
|
|
/**
|
|
* Calculate the number of key/value pairs in a map
|
|
*
|
|
* @since 2.5.0
|
|
*/
|
|
export var size = function (m) { return m.size; };
|
|
/**
|
|
* Test whether or not a map is empty
|
|
*
|
|
* @since 2.5.0
|
|
*/
|
|
export var isEmpty = function (m) { return m.size === 0; };
|
|
export function member(E) {
|
|
var lookupE = lookup(E);
|
|
return function (k, m) {
|
|
if (m === undefined) {
|
|
var memberE_1 = member(E);
|
|
return function (m) { return memberE_1(k, m); };
|
|
}
|
|
return _.isSome(lookupE(k, m));
|
|
};
|
|
}
|
|
export function elem(E) {
|
|
return function (a, m) {
|
|
if (m === undefined) {
|
|
var elemE_1 = elem(E);
|
|
return function (m) { return elemE_1(a, m); };
|
|
}
|
|
var values = m.values();
|
|
var e;
|
|
while (!(e = values.next()).done) {
|
|
var v = e.value;
|
|
if (E.equals(a, v)) {
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
};
|
|
}
|
|
/**
|
|
* Get a sorted `ReadonlyArray` of the keys contained in a `ReadonlyMap`.
|
|
*
|
|
* @since 2.5.0
|
|
*/
|
|
export var keys = function (O) {
|
|
return function (m) {
|
|
return Array.from(m.keys()).sort(O.compare);
|
|
};
|
|
};
|
|
/**
|
|
* Get a sorted `ReadonlyArray` of the values contained in a `ReadonlyMap`.
|
|
*
|
|
* @since 2.5.0
|
|
*/
|
|
export var values = function (O) {
|
|
return function (m) {
|
|
return Array.from(m.values()).sort(O.compare);
|
|
};
|
|
};
|
|
/**
|
|
* @since 2.5.0
|
|
*/
|
|
export function collect(O) {
|
|
var keysO = keys(O);
|
|
return function (f) {
|
|
return function (m) {
|
|
var out = [];
|
|
var ks = keysO(m);
|
|
for (var _i = 0, ks_1 = ks; _i < ks_1.length; _i++) {
|
|
var key = ks_1[_i];
|
|
out.push(f(key, m.get(key)));
|
|
}
|
|
return out;
|
|
};
|
|
};
|
|
}
|
|
/**
|
|
* Get a sorted `ReadonlyArray` of the key/value pairs contained in a `ReadonlyMap`.
|
|
*
|
|
* @category conversions
|
|
* @since 2.5.0
|
|
*/
|
|
export var toReadonlyArray = function (O) {
|
|
return collect(O)(function (k, a) { return [k, a]; });
|
|
};
|
|
export function toUnfoldable(ord, U) {
|
|
var toReadonlyArrayO = toReadonlyArray(ord);
|
|
return function (d) {
|
|
var kas = toReadonlyArrayO(d);
|
|
var len = kas.length;
|
|
return U.unfold(0, function (b) { return (b < len ? _.some([kas[b], b + 1]) : _.none); });
|
|
};
|
|
}
|
|
/**
|
|
* Insert or replace a key/value pair in a `ReadonlyMap`.
|
|
*
|
|
* @since 2.10.0
|
|
*/
|
|
export var upsertAt = function (E) {
|
|
var lookupWithKeyE = lookupWithKey(E);
|
|
return function (k, a) {
|
|
var lookupWithKeyEk = lookupWithKeyE(k);
|
|
return function (m) {
|
|
var found = lookupWithKeyEk(m);
|
|
if (_.isNone(found)) {
|
|
var out = new Map(m);
|
|
out.set(k, a);
|
|
return out;
|
|
}
|
|
else if (found.value[1] !== a) {
|
|
var out = new Map(m);
|
|
out.set(found.value[0], a);
|
|
return out;
|
|
}
|
|
return m;
|
|
};
|
|
};
|
|
};
|
|
/**
|
|
* Delete a key and value from a map
|
|
*
|
|
* @since 2.5.0
|
|
*/
|
|
export var deleteAt = function (E) {
|
|
var lookupWithKeyE = lookupWithKey(E);
|
|
return function (k) { return function (m) {
|
|
var found = lookupWithKeyE(k, m);
|
|
if (_.isSome(found)) {
|
|
var r = new Map(m);
|
|
r.delete(found.value[0]);
|
|
return r;
|
|
}
|
|
return m;
|
|
}; };
|
|
};
|
|
/**
|
|
* @since 2.5.0
|
|
*/
|
|
export var updateAt = function (E) {
|
|
var modifyAtE = modifyAt(E);
|
|
return function (k, a) { return modifyAtE(k, function () { return a; }); };
|
|
};
|
|
/**
|
|
* @since 2.5.0
|
|
*/
|
|
export var modifyAt = function (E) {
|
|
var lookupWithKeyE = lookupWithKey(E);
|
|
return function (k, f) { return function (m) {
|
|
var found = lookupWithKeyE(k, m);
|
|
if (_.isNone(found)) {
|
|
return _.none;
|
|
}
|
|
var _a = found.value, fk = _a[0], fv = _a[1];
|
|
var next = f(fv);
|
|
if (next === fv) {
|
|
return _.some(m);
|
|
}
|
|
var r = new Map(m);
|
|
r.set(fk, next);
|
|
return _.some(r);
|
|
}; };
|
|
};
|
|
/**
|
|
* Delete a key and value from a map, returning the value as well as the subsequent map
|
|
*
|
|
* @since 2.5.0
|
|
*/
|
|
export function pop(E) {
|
|
var lookupE = lookup(E);
|
|
var deleteAtE = deleteAt(E);
|
|
return function (k) {
|
|
var deleteAtEk = deleteAtE(k);
|
|
return function (m) {
|
|
return pipe(lookupE(k, m), O.map(function (a) { return [a, deleteAtEk(m)]; }));
|
|
};
|
|
};
|
|
}
|
|
export function lookupWithKey(E) {
|
|
return function (k, m) {
|
|
if (m === undefined) {
|
|
var lookupWithKeyE_1 = lookupWithKey(E);
|
|
return function (m) { return lookupWithKeyE_1(k, m); };
|
|
}
|
|
var entries = m.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, ka = _a[0], a = _a[1];
|
|
if (E.equals(ka, k)) {
|
|
return _.some([ka, a]);
|
|
}
|
|
}
|
|
return _.none;
|
|
};
|
|
}
|
|
export function lookup(E) {
|
|
var lookupWithKeyE = lookupWithKey(E);
|
|
return function (k, m) {
|
|
if (m === undefined) {
|
|
var lookupE_1 = lookup(E);
|
|
return function (m) { return lookupE_1(k, m); };
|
|
}
|
|
return pipe(lookupWithKeyE(k, m), O.map(function (_a) {
|
|
var _ = _a[0], a = _a[1];
|
|
return a;
|
|
}));
|
|
};
|
|
}
|
|
export function isSubmap(SK, SA) {
|
|
var lookupWithKeyS = lookupWithKey(SK);
|
|
return function (me, that) {
|
|
if (that === undefined) {
|
|
var isSubmapSKSA_1 = isSubmap(SK, SA);
|
|
return function (that) { return isSubmapSKSA_1(that, me); };
|
|
}
|
|
var entries = me.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
var d2OptA = lookupWithKeyS(k, that);
|
|
if (_.isNone(d2OptA) || !SK.equals(k, d2OptA.value[0]) || !SA.equals(a, d2OptA.value[1])) {
|
|
return false;
|
|
}
|
|
}
|
|
return true;
|
|
};
|
|
}
|
|
/**
|
|
* @since 2.5.0
|
|
*/
|
|
export var empty =
|
|
// the type annotation here is intended (otherwise it doesn't type-check)
|
|
new Map();
|
|
/**
|
|
* @category instances
|
|
* @since 2.5.0
|
|
*/
|
|
export function getEq(SK, SA) {
|
|
var isSubmapSKSA = isSubmap(SK, SA);
|
|
return fromEquals(function (x, y) { return isSubmapSKSA(x, y) && isSubmapSKSA(y, x); });
|
|
}
|
|
/**
|
|
* Gets `Monoid` instance for Maps given `Semigroup` instance for their values
|
|
*
|
|
* @category instances
|
|
* @since 2.5.0
|
|
*/
|
|
export function getMonoid(SK, SA) {
|
|
var lookupWithKeyS = lookupWithKey(SK);
|
|
return {
|
|
concat: function (mx, my) {
|
|
if (isEmpty(mx)) {
|
|
return my;
|
|
}
|
|
if (isEmpty(my)) {
|
|
return mx;
|
|
}
|
|
var r = new Map(mx);
|
|
var entries = my.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
var mxOptA = lookupWithKeyS(k, mx);
|
|
if (_.isSome(mxOptA)) {
|
|
r.set(mxOptA.value[0], SA.concat(mxOptA.value[1], a));
|
|
}
|
|
else {
|
|
r.set(k, a);
|
|
}
|
|
}
|
|
return r;
|
|
},
|
|
empty: empty
|
|
};
|
|
}
|
|
/**
|
|
* Create a map with one key/value pair
|
|
*
|
|
* @category constructors
|
|
* @since 2.5.0
|
|
*/
|
|
export var singleton = function (k, a) { return new Map([[k, a]]); };
|
|
export function fromFoldable(E, M, F) {
|
|
return function (fka) {
|
|
var lookupWithKeyE = lookupWithKey(E);
|
|
return F.reduce(fka, new Map(), function (b, _a) {
|
|
var k = _a[0], a = _a[1];
|
|
var bOpt = lookupWithKeyE(k, b);
|
|
if (_.isSome(bOpt)) {
|
|
b.set(bOpt.value[0], M.concat(bOpt.value[1], a));
|
|
}
|
|
else {
|
|
b.set(k, a);
|
|
}
|
|
return b;
|
|
});
|
|
};
|
|
}
|
|
var _mapWithIndex = function (fa, f) {
|
|
var m = new Map();
|
|
var entries = fa.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, key = _a[0], a = _a[1];
|
|
m.set(key, f(key, a));
|
|
}
|
|
return m;
|
|
};
|
|
/**
|
|
* @since 2.10.0
|
|
*/
|
|
export var partitionMapWithIndex = function (f) {
|
|
return function (fa) {
|
|
var left = new Map();
|
|
var right = new Map();
|
|
var entries = fa.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
var ei = f(k, a);
|
|
if (_.isLeft(ei)) {
|
|
left.set(k, ei.left);
|
|
}
|
|
else {
|
|
right.set(k, ei.right);
|
|
}
|
|
}
|
|
return separated(left, right);
|
|
};
|
|
};
|
|
export function partitionWithIndex(predicateWithIndex) {
|
|
return function (m) {
|
|
var left = new Map();
|
|
var right = new Map();
|
|
var entries = m.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
if (predicateWithIndex(k, a)) {
|
|
right.set(k, a);
|
|
}
|
|
else {
|
|
left.set(k, a);
|
|
}
|
|
}
|
|
return separated(left, right);
|
|
};
|
|
}
|
|
/**
|
|
* @since 2.10.0
|
|
*/
|
|
export var filterMapWithIndex = function (f) {
|
|
return function (fa) {
|
|
var m = new Map();
|
|
var entries = fa.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
var o = f(k, a);
|
|
if (_.isSome(o)) {
|
|
m.set(k, o.value);
|
|
}
|
|
}
|
|
return m;
|
|
};
|
|
};
|
|
export function filterWithIndex(predicateWithIndex) {
|
|
return function (m) {
|
|
var out = new Map();
|
|
var entries = m.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
if (predicateWithIndex(k, a)) {
|
|
out.set(k, a);
|
|
}
|
|
}
|
|
return out;
|
|
};
|
|
}
|
|
var _map = function (fa, f) { return _mapWithIndex(fa, function (_, a) { return f(a); }); };
|
|
var _filter = function (fa, p) {
|
|
return _filterWithIndex(fa, function (_, a) { return p(a); });
|
|
};
|
|
var _filterMap = function (fa, f) { return _filterMapWithIndex(fa, function (_, a) { return f(a); }); };
|
|
var _partition = function (fa, predicate) {
|
|
return _partitionWithIndex(fa, function (_, a) { return predicate(a); });
|
|
};
|
|
var _partitionMap = function (fa, f) { return _partitionMapWithIndex(fa, function (_, a) { return f(a); }); };
|
|
var _filterWithIndex = function (fa, p) { return pipe(fa, filterWithIndex(p)); };
|
|
var _filterMapWithIndex = function (fa, f) {
|
|
return pipe(fa, filterMapWithIndex(f));
|
|
};
|
|
var _partitionWithIndex = function (fa, p) { return pipe(fa, partitionWithIndex(p)); };
|
|
var _partitionMapWithIndex = function (fa, f) {
|
|
return pipe(fa, partitionMapWithIndex(f));
|
|
};
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export var compact = function (fa) {
|
|
var m = new Map();
|
|
var entries = fa.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], oa = _a[1];
|
|
if (_.isSome(oa)) {
|
|
m.set(k, oa.value);
|
|
}
|
|
}
|
|
return m;
|
|
};
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export var filter = function (predicate) {
|
|
return function (fa) {
|
|
return _filter(fa, predicate);
|
|
};
|
|
};
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export var filterMap = function (f) { return function (fa) {
|
|
return _filterMap(fa, 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.5.0
|
|
*/
|
|
export var map = function (f) { return function (fa) { return _map(fa, f); }; };
|
|
/**
|
|
* @category mapping
|
|
* @since 2.7.1
|
|
*/
|
|
export var mapWithIndex = function (f) { return function (fa) {
|
|
return _mapWithIndex(fa, f);
|
|
}; };
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export var partition = function (predicate) {
|
|
return function (fa) {
|
|
return _partition(fa, predicate);
|
|
};
|
|
};
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export var partitionMap = function (f) { return function (fa) { return _partitionMap(fa, f); }; };
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export var separate = function (fa) {
|
|
var left = new Map();
|
|
var right = new Map();
|
|
var entries = fa.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], ei = _a[1];
|
|
if (_.isLeft(ei)) {
|
|
left.set(k, ei.left);
|
|
}
|
|
else {
|
|
right.set(k, ei.right);
|
|
}
|
|
}
|
|
return separated(left, right);
|
|
};
|
|
/**
|
|
* @category type lambdas
|
|
* @since 2.5.0
|
|
*/
|
|
export var URI = 'ReadonlyMap';
|
|
/**
|
|
* @category instances
|
|
* @since 2.11.0
|
|
*/
|
|
export var getUnionSemigroup = function (E, S) {
|
|
var unionES = union(E, S);
|
|
return {
|
|
concat: function (first, second) { return unionES(second)(first); }
|
|
};
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.11.0
|
|
*/
|
|
export var getUnionMonoid = function (E, S) { return ({
|
|
concat: getUnionSemigroup(E, S).concat,
|
|
empty: empty
|
|
}); };
|
|
/**
|
|
* @category instances
|
|
* @since 2.11.0
|
|
*/
|
|
export var getIntersectionSemigroup = function (E, S) {
|
|
var intersectionES = intersection(E, S);
|
|
return {
|
|
concat: function (first, second) { return intersectionES(second)(first); }
|
|
};
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.11.0
|
|
*/
|
|
export var getDifferenceMagma = function (E) {
|
|
return function () {
|
|
var differenceE = difference(E);
|
|
return {
|
|
concat: function (first, second) { return differenceE(second)(first); }
|
|
};
|
|
};
|
|
};
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export function getFilterableWithIndex() {
|
|
return {
|
|
URI: URI,
|
|
_E: undefined,
|
|
map: _map,
|
|
mapWithIndex: _mapWithIndex,
|
|
compact: compact,
|
|
separate: separate,
|
|
filter: _filter,
|
|
filterMap: _filterMap,
|
|
partition: _partition,
|
|
partitionMap: _partitionMap,
|
|
partitionMapWithIndex: _partitionMapWithIndex,
|
|
partitionWithIndex: _partitionWithIndex,
|
|
filterMapWithIndex: _filterMapWithIndex,
|
|
filterWithIndex: _filterWithIndex
|
|
};
|
|
}
|
|
/**
|
|
* @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 getFunctorWithIndex = function () { return ({
|
|
URI: URI,
|
|
_E: undefined,
|
|
map: _map,
|
|
mapWithIndex: _mapWithIndex
|
|
}); };
|
|
/**
|
|
* @category instances
|
|
* @since 2.7.0
|
|
*/
|
|
export var Compactable = {
|
|
URI: URI,
|
|
compact: compact,
|
|
separate: separate
|
|
};
|
|
/**
|
|
* @category instances
|
|
* @since 2.7.0
|
|
*/
|
|
export var Filterable = {
|
|
URI: URI,
|
|
map: _map,
|
|
compact: compact,
|
|
separate: separate,
|
|
filter: _filter,
|
|
filterMap: _filterMap,
|
|
partition: _partition,
|
|
partitionMap: _partitionMap
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.11.0
|
|
*/
|
|
export var reduce = function (O) {
|
|
var reduceWithIndexO = reduceWithIndex(O);
|
|
return function (b, f) { return reduceWithIndexO(b, function (_, b, a) { return f(b, a); }); };
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.11.0
|
|
*/
|
|
export var foldMap = function (O) {
|
|
var foldMapWithIndexO = foldMapWithIndex(O);
|
|
return function (M) {
|
|
var foldMapWithIndexOM = foldMapWithIndexO(M);
|
|
return function (f) { return foldMapWithIndexOM(function (_, a) { return f(a); }); };
|
|
};
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.11.0
|
|
*/
|
|
export var reduceRight = function (O) {
|
|
var reduceRightWithIndexO = reduceRightWithIndex(O);
|
|
return function (b, f) { return reduceRightWithIndexO(b, function (_, b, a) { return f(b, a); }); };
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.10.0
|
|
*/
|
|
export var getFoldable = function (O) {
|
|
var reduceO = reduce(O);
|
|
var foldMapO = foldMap(O);
|
|
var reduceRightO = reduceRight(O);
|
|
return {
|
|
URI: URI,
|
|
_E: undefined,
|
|
reduce: function (fa, b, f) { return pipe(fa, reduceO(b, f)); },
|
|
foldMap: function (M) {
|
|
var foldMapOM = foldMapO(M);
|
|
return function (fa, f) { return pipe(fa, foldMapOM(f)); };
|
|
},
|
|
reduceRight: function (fa, b, f) { return pipe(fa, reduceRightO(b, f)); }
|
|
};
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.11.0
|
|
*/
|
|
export var reduceWithIndex = function (O) {
|
|
var keysO = keys(O);
|
|
return function (b, f) { return function (m) {
|
|
var out = b;
|
|
for (var _i = 0, _a = keysO(m); _i < _a.length; _i++) {
|
|
var k = _a[_i];
|
|
out = f(k, out, m.get(k));
|
|
}
|
|
return out;
|
|
}; };
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.11.0
|
|
*/
|
|
export var foldMapWithIndex = function (O) {
|
|
var keysO = keys(O);
|
|
return function (M) { return function (f) { return function (m) {
|
|
var out = M.empty;
|
|
for (var _i = 0, _a = keysO(m); _i < _a.length; _i++) {
|
|
var k = _a[_i];
|
|
out = M.concat(out, f(k, m.get(k)));
|
|
}
|
|
return out;
|
|
}; }; };
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.11.0
|
|
*/
|
|
export var reduceRightWithIndex = function (O) {
|
|
var keysO = keys(O);
|
|
return function (b, f) { return function (m) {
|
|
var out = b;
|
|
var ks = keysO(m);
|
|
var len = ks.length;
|
|
for (var i = len - 1; i >= 0; i--) {
|
|
var k = ks[i];
|
|
out = f(k, m.get(k), out);
|
|
}
|
|
return out;
|
|
}; };
|
|
};
|
|
/**
|
|
* @category folding
|
|
* @since 2.10.0
|
|
*/
|
|
export var getFoldableWithIndex = function (O) {
|
|
var F = getFoldable(O);
|
|
var reduceWithIndexO = reduceWithIndex(O);
|
|
var foldMapWithIndexO = foldMapWithIndex(O);
|
|
var reduceRightWithIndexO = reduceRightWithIndex(O);
|
|
return {
|
|
URI: URI,
|
|
_E: undefined,
|
|
reduce: F.reduce,
|
|
foldMap: F.foldMap,
|
|
reduceRight: F.reduceRight,
|
|
reduceWithIndex: function (fa, b, f) { return pipe(fa, reduceWithIndexO(b, f)); },
|
|
foldMapWithIndex: function (M) {
|
|
var foldMapWithIndexOM = foldMapWithIndexO(M);
|
|
return function (fa, f) { return pipe(fa, foldMapWithIndexOM(f)); };
|
|
},
|
|
reduceRightWithIndex: function (fa, b, f) { return pipe(fa, reduceRightWithIndexO(b, f)); }
|
|
};
|
|
};
|
|
/**
|
|
* @category traversing
|
|
* @since 2.10.0
|
|
*/
|
|
export var getTraversable = function (O) {
|
|
var TWI = getTraversableWithIndex(O);
|
|
var F = getFoldable(O);
|
|
return {
|
|
URI: URI,
|
|
_E: undefined,
|
|
map: _map,
|
|
reduce: F.reduce,
|
|
foldMap: F.foldMap,
|
|
reduceRight: F.reduceRight,
|
|
traverse: TWI.traverse,
|
|
sequence: TWI.sequence
|
|
};
|
|
};
|
|
/**
|
|
* @category traversing
|
|
* @since 2.10.0
|
|
*/
|
|
export var getTraversableWithIndex = function (O) {
|
|
var FWI = getFoldableWithIndex(O);
|
|
var keysO = keys(O);
|
|
var traverseWithIndex = function (F) {
|
|
return function (ta, f) {
|
|
var fm = F.of(new Map());
|
|
var ks = keysO(ta);
|
|
var len = ks.length;
|
|
var _loop_1 = function (i) {
|
|
var key = ks[i];
|
|
var a = ta.get(key);
|
|
fm = F.ap(F.map(fm, function (m) { return function (b) { return m.set(key, b); }; }), f(key, a));
|
|
};
|
|
for (var i = 0; i < len; i++) {
|
|
_loop_1(i);
|
|
}
|
|
return fm;
|
|
};
|
|
};
|
|
var traverse = function (F) {
|
|
var traverseWithIndexF = traverseWithIndex(F);
|
|
return function (ta, f) { return traverseWithIndexF(ta, function (_, a) { return f(a); }); };
|
|
};
|
|
var sequence = function (F) {
|
|
var traverseWithIndexF = traverseWithIndex(F);
|
|
return function (ta) { return traverseWithIndexF(ta, SK); };
|
|
};
|
|
return {
|
|
URI: URI,
|
|
_E: undefined,
|
|
map: _map,
|
|
mapWithIndex: _mapWithIndex,
|
|
reduce: FWI.reduce,
|
|
foldMap: FWI.foldMap,
|
|
reduceRight: FWI.reduceRight,
|
|
reduceWithIndex: FWI.reduceWithIndex,
|
|
foldMapWithIndex: FWI.foldMapWithIndex,
|
|
reduceRightWithIndex: FWI.reduceRightWithIndex,
|
|
traverse: traverse,
|
|
sequence: sequence,
|
|
traverseWithIndex: traverseWithIndex
|
|
};
|
|
};
|
|
/**
|
|
* @category filtering
|
|
* @since 2.5.0
|
|
*/
|
|
export function getWitherable(O) {
|
|
var TWI = getTraversableWithIndex(O);
|
|
return {
|
|
URI: URI,
|
|
_E: undefined,
|
|
map: _map,
|
|
compact: compact,
|
|
separate: separate,
|
|
filter: _filter,
|
|
filterMap: _filterMap,
|
|
partition: _partition,
|
|
partitionMap: _partitionMap,
|
|
reduce: TWI.reduce,
|
|
foldMap: TWI.foldMap,
|
|
reduceRight: TWI.reduceRight,
|
|
traverse: TWI.traverse,
|
|
sequence: TWI.sequence,
|
|
mapWithIndex: _mapWithIndex,
|
|
reduceWithIndex: TWI.reduceWithIndex,
|
|
foldMapWithIndex: TWI.foldMapWithIndex,
|
|
reduceRightWithIndex: TWI.reduceRightWithIndex,
|
|
traverseWithIndex: TWI.traverseWithIndex,
|
|
wilt: wiltDefault(TWI, Compactable),
|
|
wither: witherDefault(TWI, Compactable)
|
|
};
|
|
}
|
|
// -------------------------------------------------------------------------------------
|
|
// utils
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* @since 2.11.0
|
|
*/
|
|
export var union = function (E, M) {
|
|
var lookupE = lookup(E);
|
|
return function (second) { return function (first) {
|
|
if (isEmpty(first)) {
|
|
return second;
|
|
}
|
|
if (isEmpty(second)) {
|
|
return first;
|
|
}
|
|
var out = new Map();
|
|
var firstEntries = first.entries();
|
|
var e;
|
|
while (!(e = firstEntries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
var oka = lookupE(k)(second);
|
|
if (_.isSome(oka)) {
|
|
out.set(k, M.concat(a, oka.value));
|
|
}
|
|
else {
|
|
out.set(k, a);
|
|
}
|
|
}
|
|
var secondEntries = second.entries();
|
|
while (!(e = secondEntries.next()).done) {
|
|
var _b = e.value, k = _b[0], a = _b[1];
|
|
var oka = lookupE(k)(out);
|
|
if (_.isNone(oka)) {
|
|
out.set(k, a);
|
|
}
|
|
}
|
|
return out;
|
|
}; };
|
|
};
|
|
/**
|
|
* @since 2.11.0
|
|
*/
|
|
export var intersection = function (E, M) {
|
|
var lookupE = lookup(E);
|
|
return function (second) { return function (first) {
|
|
if (isEmpty(first) || isEmpty(second)) {
|
|
return empty;
|
|
}
|
|
var out = new Map();
|
|
var entries = first.entries();
|
|
var e;
|
|
while (!(e = entries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
var oka = lookupE(k)(second);
|
|
if (_.isSome(oka)) {
|
|
out.set(k, M.concat(a, oka.value));
|
|
}
|
|
}
|
|
return out;
|
|
}; };
|
|
};
|
|
/**
|
|
* @since 2.11.0
|
|
*/
|
|
export var difference = function (E) {
|
|
var memberE = member(E);
|
|
return function (second) {
|
|
return function (first) {
|
|
if (isEmpty(first)) {
|
|
return second;
|
|
}
|
|
if (isEmpty(second)) {
|
|
return first;
|
|
}
|
|
var out = new Map();
|
|
var firstEntries = first.entries();
|
|
var e;
|
|
while (!(e = firstEntries.next()).done) {
|
|
var _a = e.value, k = _a[0], a = _a[1];
|
|
if (!memberE(k)(second)) {
|
|
out.set(k, a);
|
|
}
|
|
}
|
|
var secondEntries = second.entries();
|
|
while (!(e = secondEntries.next()).done) {
|
|
var _b = e.value, k = _b[0], a = _b[1];
|
|
if (!memberE(k)(first)) {
|
|
out.set(k, a);
|
|
}
|
|
}
|
|
return out;
|
|
};
|
|
};
|
|
};
|
|
// -------------------------------------------------------------------------------------
|
|
// deprecated
|
|
// -------------------------------------------------------------------------------------
|
|
/**
|
|
* Use [`upsertAt`](#upsertat) instead.
|
|
*
|
|
@category zone of death
|
|
* @since 2.5.0
|
|
* @deprecated
|
|
*/
|
|
export var insertAt = upsertAt;
|
|
/**
|
|
* This instance is deprecated, use small, specific instances instead.
|
|
* For example if a function needs a `Functor` instance, pass `RM.Functor` instead of `RM.readonlyMap`
|
|
* (where `RM` is from `import RM from 'fp-ts/ReadonlyMap'`)
|
|
*
|
|
* @category zone of death
|
|
* @since 2.5.0
|
|
* @deprecated
|
|
*/
|
|
export var readonlyMap = {
|
|
URI: URI,
|
|
map: _map,
|
|
compact: compact,
|
|
separate: separate,
|
|
filter: _filter,
|
|
filterMap: _filterMap,
|
|
partition: _partition,
|
|
partitionMap: _partitionMap
|
|
};
|