|
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387 |
- import { identity } from './function';
- import * as RS from './ReadonlySet';
- import { separated } from './Separated';
- /**
- * @category instances
- * @since 2.0.0
- */
- export var getShow = RS.getShow;
- /**
- * @category instances
- * @since 2.0.0
- */
- export var getEq = RS.getEq;
- /**
- * `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.
- *
- * @since 2.0.0
- */
- export function map(E) {
- var elemE = elem(E);
- return function (f) { return function (set) {
- var r = new Set();
- set.forEach(function (e) {
- var v = f(e);
- if (!elemE(v, r)) {
- r.add(v);
- }
- });
- return r;
- }; };
- }
- /**
- * Composes computations in sequence, using the return value of one computation to determine the next computation.
- *
- * @since 2.0.0
- */
- export function chain(E) {
- var elemE = elem(E);
- return function (f) { return function (set) {
- var r = new Set();
- set.forEach(function (e) {
- f(e).forEach(function (e) {
- if (!elemE(e, r)) {
- r.add(e);
- }
- });
- });
- return r;
- }; };
- }
- export function filter(predicate) {
- return function (set) {
- var values = set.values();
- var e;
- var r = new Set();
- while (!(e = values.next()).done) {
- var a = e.value;
- if (predicate(a)) {
- r.add(a);
- }
- }
- return r;
- };
- }
- export function partition(predicate) {
- return function (set) {
- var values = set.values();
- var e;
- var right = new Set();
- var left = new Set();
- while (!(e = values.next()).done) {
- var a = e.value;
- if (predicate(a)) {
- right.add(a);
- }
- else {
- left.add(a);
- }
- }
- return separated(left, right);
- };
- }
- export function union(E) {
- var elemE = elem(E);
- return function (me, that) {
- if (that === undefined) {
- var unionE_1 = union(E);
- return function (that) { return unionE_1(me, that); };
- }
- if (isEmpty(me)) {
- return that;
- }
- if (isEmpty(that)) {
- return me;
- }
- var r = new Set(me);
- that.forEach(function (e) {
- if (!elemE(e, r)) {
- r.add(e);
- }
- });
- return r;
- };
- }
- export function intersection(E) {
- var elemE = elem(E);
- return function (me, that) {
- if (that === undefined) {
- var intersectionE_1 = intersection(E);
- return function (that) { return intersectionE_1(that, me); };
- }
- if (isEmpty(me) || isEmpty(that)) {
- return new Set();
- }
- var r = new Set();
- me.forEach(function (e) {
- if (elemE(e, that)) {
- r.add(e);
- }
- });
- return r;
- };
- }
- /**
- * @since 2.0.0
- */
- export function partitionMap(EB, EC) {
- return function (f) {
- return function (set) {
- var values = set.values();
- var e;
- var left = new Set();
- var right = new Set();
- var hasB = elem(EB);
- var hasC = elem(EC);
- while (!(e = values.next()).done) {
- var v = f(e.value);
- switch (v._tag) {
- case 'Left':
- if (!hasB(v.left, left)) {
- left.add(v.left);
- }
- break;
- case 'Right':
- if (!hasC(v.right, right)) {
- right.add(v.right);
- }
- break;
- }
- }
- return separated(left, right);
- };
- };
- }
- export function difference(E) {
- var elemE = elem(E);
- return function (me, that) {
- if (that === undefined) {
- var differenceE_1 = difference(E);
- return function (that) { return differenceE_1(that, me); };
- }
- return filter(function (a) { return !elemE(a, that); })(me);
- };
- }
- /**
- * @category instances
- * @since 2.11.0
- */
- export var getUnionSemigroup = function (E) { return ({
- concat: union(E)
- }); };
- /**
- * @category instances
- * @since 2.0.0
- */
- export var getUnionMonoid = function (E) { return ({
- concat: getUnionSemigroup(E).concat,
- empty: new Set()
- }); };
- /**
- * @category instances
- * @since 2.0.0
- */
- export var getIntersectionSemigroup = function (E) { return ({
- concat: intersection(E)
- }); };
- /**
- * @category instances
- * @since 2.11.0
- */
- export var getDifferenceMagma = function (E) { return ({
- concat: difference(E)
- }); };
- /**
- * @category folding
- * @since 2.0.0
- */
- export var reduce = RS.reduce;
- /**
- * @category folding
- * @since 2.0.0
- */
- export var foldMap = RS.foldMap;
- /**
- * @category folding
- * @since 2.11.0
- */
- export var reduceRight = RS.reduceRight;
- /**
- * Create a set with one element
- *
- * @category constructors
- * @since 2.0.0
- */
- export var singleton = function (a) { return new Set([a]); };
- /**
- * Insert a value into a set
- *
- * @since 2.0.0
- */
- export function insert(E) {
- var elemE = elem(E);
- return function (a) { return function (set) {
- if (!elemE(a)(set)) {
- var r = new Set(set);
- r.add(a);
- return r;
- }
- else {
- return set;
- }
- }; };
- }
- /**
- * Delete a value from a set
- *
- * @since 2.0.0
- */
- export var remove = function (E) {
- return function (a) {
- return function (set) {
- return filter(function (ax) { return !E.equals(a, ax); })(set);
- };
- };
- };
- /**
- * Checks an element is a member of a set;
- * If yes, removes the value from the set
- * If no, inserts the value to the set
- *
- * @since 2.5.0
- */
- export var toggle = function (E) {
- var elemE = elem(E);
- var removeE = remove(E);
- var insertE = insert(E);
- return function (a) { return function (set) { return (elemE(a, set) ? removeE : insertE)(a)(set); }; };
- };
- /**
- * Create a set from an array
- *
- * @category conversions
- * @since 2.0.0
- */
- export var fromArray = function (E) {
- return function (as) {
- var len = as.length;
- var out = new Set();
- var has = elem(E);
- for (var i = 0; i < len; i++) {
- var a = as[i];
- if (!has(a, out)) {
- out.add(a);
- }
- }
- return out;
- };
- };
- /**
- * @since 2.0.0
- */
- export var compact = function (E) { return filterMap(E)(identity); };
- /**
- * @since 2.0.0
- */
- export function separate(EE, EA) {
- return function (fa) {
- var elemEE = elem(EE);
- var elemEA = elem(EA);
- var left = new Set();
- var right = new Set();
- fa.forEach(function (e) {
- switch (e._tag) {
- case 'Left':
- if (!elemEE(e.left, left)) {
- left.add(e.left);
- }
- break;
- case 'Right':
- if (!elemEA(e.right, right)) {
- right.add(e.right);
- }
- break;
- }
- });
- return separated(left, right);
- };
- }
- /**
- * @since 2.0.0
- */
- export function filterMap(E) {
- var elemE = elem(E);
- return function (f) { return function (fa) {
- var r = new Set();
- fa.forEach(function (a) {
- var ob = f(a);
- if (ob._tag === 'Some' && !elemE(ob.value, r)) {
- r.add(ob.value);
- }
- });
- return r;
- }; };
- }
- // -------------------------------------------------------------------------------------
- // utils
- // -------------------------------------------------------------------------------------
- /**
- * @since 2.0.0
- */
- export var empty = new Set();
- /**
- * Test whether a `Set` is empty.
- *
- * @since 2.10.0
- */
- export var isEmpty = function (set) { return set.size === 0; };
- /**
- * Calculate the number of elements in a `Set`.
- *
- * @since 2.10.0
- */
- export var size = function (set) { return set.size; };
- /**
- * @since 2.0.0
- */
- export var some = RS.some;
- /**
- * @since 2.0.0
- */
- export var every = RS.every;
- /**
- * @since 2.10.0
- */
- export var isSubset = RS.isSubset;
- // TODO: remove non-curried overloading in v3
- /**
- * Test if a value is a member of a set
- *
- * @since 2.0.0
- */
- export var elem = RS.elem;
- /**
- * Get a sorted `Array` of the values contained in a `Set`.
- *
- * @category conversions
- * @since 2.0.0
- */
- export var toArray = function (O) {
- return function (set) {
- var out = [];
- set.forEach(function (e) { return out.push(e); });
- return out.sort(O.compare);
- };
- };
- // -------------------------------------------------------------------------------------
- // deprecated
- // -------------------------------------------------------------------------------------
- /**
- * Use [`isSubset`](#issubset) instead.
- *
- * @category zone of death
- * @since 2.0.0
- * @deprecated
- */
- export var subset = RS.isSubset;
|