2023-07-07 19:22:30 +00:00
|
|
|
import { EndoRelation, Predicate } from "./relation";
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Count the number of elements that satisfy the predicate
|
|
|
|
*/
|
|
|
|
|
|
|
|
export function countIf<T>(f: Predicate<T>, xs: T[]): number {
|
2023-07-23 13:31:28 +00:00
|
|
|
return xs.filter(f).length;
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Count the number of elements that is equal to the element
|
|
|
|
*/
|
|
|
|
export function count<T>(a: T, xs: T[]): number {
|
2023-07-23 13:31:28 +00:00
|
|
|
return countIf((x) => x === a, xs);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Concatenate an array of arrays
|
|
|
|
*/
|
|
|
|
export function concat<T>(xss: T[][]): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return ([] as T[]).concat(...xss);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Intersperse the element between the elements of the array
|
|
|
|
* @param sep The element to be interspersed
|
|
|
|
*/
|
|
|
|
export function intersperse<T>(sep: T, xs: T[]): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return concat(xs.map((x) => [sep, x])).slice(1);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Returns the array of elements that is not equal to the element
|
|
|
|
*/
|
|
|
|
export function erase<T>(a: T, xs: T[]): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return xs.filter((x) => x !== a);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Finds the array of all elements in the first array not contained in the second array.
|
|
|
|
* The order of result values are determined by the first array.
|
|
|
|
*/
|
|
|
|
export function difference<T>(xs: T[], ys: T[]): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return xs.filter((x) => !ys.includes(x));
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Remove all but the first element from every group of equivalent elements
|
|
|
|
*/
|
|
|
|
export function unique<T>(xs: T[]): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return [...new Set(xs)];
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function uniqueBy<TValue, TKey>(
|
2023-07-23 13:31:28 +00:00
|
|
|
values: TValue[],
|
|
|
|
keySelector: (value: TValue) => TKey
|
2023-07-07 19:22:30 +00:00
|
|
|
): TValue[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
const map = new Map<TKey, TValue>();
|
2023-07-07 19:22:30 +00:00
|
|
|
|
2023-07-23 13:31:28 +00:00
|
|
|
for (const value of values) {
|
|
|
|
const key = keySelector(value);
|
|
|
|
if (!map.has(key)) map.set(key, value);
|
|
|
|
}
|
2023-07-07 19:22:30 +00:00
|
|
|
|
2023-07-23 13:31:28 +00:00
|
|
|
return [...map.values()];
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function sum(xs: number[]): number {
|
2023-07-23 13:31:28 +00:00
|
|
|
return xs.reduce((a, b) => a + b, 0);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function maximum(xs: number[]): number {
|
2023-07-23 13:31:28 +00:00
|
|
|
return Math.max(...xs);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Splits an array based on the equivalence relation.
|
|
|
|
* The concatenation of the result is equal to the argument.
|
|
|
|
*/
|
|
|
|
export function groupBy<T>(f: EndoRelation<T>, xs: T[]): T[][] {
|
2023-07-23 13:31:28 +00:00
|
|
|
const groups = [] as T[][];
|
|
|
|
for (const x of xs) {
|
|
|
|
if (groups.length !== 0 && f(groups[groups.length - 1][0], x)) {
|
|
|
|
groups[groups.length - 1].push(x);
|
|
|
|
} else {
|
|
|
|
groups.push([x]);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return groups;
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Splits an array based on the equivalence relation induced by the function.
|
|
|
|
* The concatenation of the result is equal to the argument.
|
|
|
|
*/
|
|
|
|
export function groupOn<T, S>(f: (x: T) => S, xs: T[]): T[][] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return groupBy((a, b) => f(a) === f(b), xs);
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function groupByX<T>(collections: T[], keySelector: (x: T) => string) {
|
2023-07-23 13:31:28 +00:00
|
|
|
return collections.reduce((obj: Record<string, T[]>, item: T) => {
|
|
|
|
const key = keySelector(item);
|
|
|
|
if (typeof obj[key] === "undefined") {
|
|
|
|
obj[key] = [];
|
|
|
|
}
|
2023-07-07 19:22:30 +00:00
|
|
|
|
2023-07-23 13:31:28 +00:00
|
|
|
obj[key].push(item);
|
2023-07-07 19:22:30 +00:00
|
|
|
|
2023-07-23 13:31:28 +00:00
|
|
|
return obj;
|
|
|
|
}, {});
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Compare two arrays by lexicographical order
|
|
|
|
*/
|
|
|
|
export function lessThan(xs: number[], ys: number[]): boolean {
|
2023-07-23 13:31:28 +00:00
|
|
|
for (let i = 0; i < Math.min(xs.length, ys.length); i++) {
|
|
|
|
if (xs[i] < ys[i]) return true;
|
|
|
|
if (xs[i] > ys[i]) return false;
|
|
|
|
}
|
|
|
|
return xs.length < ys.length;
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Returns the longest prefix of elements that satisfy the predicate
|
|
|
|
*/
|
|
|
|
export function takeWhile<T>(f: Predicate<T>, xs: T[]): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
const ys = [];
|
|
|
|
for (const x of xs) {
|
|
|
|
if (f(x)) {
|
|
|
|
ys.push(x);
|
|
|
|
} else {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return ys;
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function cumulativeSum(xs: number[]): number[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
const ys = Array.from(xs); // deep copy
|
|
|
|
for (let i = 1; i < ys.length; i++) ys[i] += ys[i - 1];
|
|
|
|
return ys;
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function toArray<T>(x: T | T[] | undefined): T[] {
|
2023-07-23 13:31:28 +00:00
|
|
|
return Array.isArray(x) ? x : x != null ? [x] : [];
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
export function toSingle<T>(x: T | T[] | undefined): T | undefined {
|
2023-07-23 13:31:28 +00:00
|
|
|
return Array.isArray(x) ? x[0] : x;
|
2023-07-07 19:22:30 +00:00
|
|
|
}
|