keepset 0.33.0 → 0.35.0

package/dist/node/fetch-dataset.js

@@ -1,9 +1,10 @@
-import { $ as ArchiveError, H as getCollectionTarget, L as getOwn, U as getTarget, at as RecipeError, it as NativeParseError, rt as KeepsetError, t as getDataset, z as countTarget } from "../bundled-pT7q4sWm.js";
+import { $ as ArchiveError, H as getCollectionTarget, L as getOwn, U as getTarget, at as RecipeError, it as NativeParseError, rt as KeepsetError, t as getDataset, z as countTarget } from "../bundled-OGg9e42x.js";
 import { RoundTripMismatchError, assertRoundTrip, encode } from "crossmap";
 import { z } from "zod";
 import { createHash } from "node:crypto";
 import { gunzipSync } from "node:zlib";
 import { unzipSync } from "fflate";
+import unbzip2 from "unbzip2-stream";
 import { request } from "node:http";
 import { request as request$1 } from "node:https";
 //#region src/parsers/native.ts
@@ -36,6 +37,30 @@ var NodeOrder = class {
 function lines(text) {
 	return text.split(/\r?\n/);
 }
+const CARRIAGE_RETURN$1 = 13;
+/**
+* Visits the lines of a file read in pieces, accepting both LF and CRLF endings, holding only the unfinished end of a piece between pieces so a file larger than one string can be read.
+* @param pieces - The file's text, in order, split anywhere (even between a carriage return and its line feed).
+* @param visit - Called with each line, without its terminator, and its 1-based number. A final line without a terminator is visited; the empty text after a final terminator is not a line.
+*/
+function forEachLine(pieces, visit) {
+	let carry = "";
+	let number = 0;
+	const emit = (text, start, end) => {
+		number += 1;
+		visit(end > start && text.charCodeAt(end - 1) === CARRIAGE_RETURN$1 ? text.slice(start, end - 1) : text.slice(start, end), number);
+	};
+	for (const piece of pieces) {
+		const text = carry + piece;
+		let start = 0;
+		for (let end = text.indexOf("\n", start); end !== -1; end = text.indexOf("\n", start)) {
+			emit(text, start, end);
+			start = end + 1;
+		}
+		carry = text.slice(start);
+	}
+	if (carry !== "") emit(carry, 0, carry.length);
+}
 //#endregion
 //#region src/parsers/edge-list.ts
 /** How each fixed delimiter option splits a line into fields. */
@@ -53,7 +78,7 @@ const splitters = {
 * @returns The endpoint id.
 * @throws NativeParseError when the column is absent or empty.
 */
-function endpoint(fields, column, lineNumber) {
+function endpoint$1(fields, column, lineNumber) {
 	const value = fields[column];
 	if (value === void 0 || value.trim() === "") throw new NativeParseError("edge-list", lineNumber, `column ${String(column)} holds no node id`);
 	return value.trim();
@@ -86,8 +111,8 @@ function parseEdgeList(text, options) {
 		split ??= splitters[detect(line)];
 		const fields = split(line);
 		if (fields.length < needed) throw new NativeParseError("edge-list", lineNumber, `expected at least ${String(needed)} fields, found ${String(fields.length)}`);
-		const source = endpoint(fields, options.sourceColumn, lineNumber);
-		const target = endpoint(fields, options.targetColumn, lineNumber);
+		const source = endpoint$1(fields, options.sourceColumn, lineNumber);
+		const target = endpoint$1(fields, options.targetColumn, lineNumber);
 		order.add(source);
 		order.add(target);
 		edges.push({
@@ -103,8 +128,8 @@ function parseEdgeList(text, options) {
 }
 //#endregion
 //#region src/parsers/gd-contest.ts
-const FORMAT$8 = "gd-contest";
-const NUMBER$8 = /^[+-]?(?:\d+\.?\d*|\.\d+)(?:[Ee][+-]?\d+)?$/;
+const FORMAT$11 = "gd-contest";
+const NUMBER$9 = /^[+-]?(?:\d+\.?\d*|\.\d+)(?:[Ee][+-]?\d+)?$/;
 /**
 * Reads a vertex number, which the format numbers from 0 to N - 1.
 * @param token - The token.
@@ -112,7 +137,7 @@ const NUMBER$8 = /^[+-]?(?:\d+\.?\d*|\.\d+)(?:[Ee][+-]?\d+)?$/;
 * @returns The vertex id as text.
 */
 function vertex$1(token, count) {
-	if (!/^(?:0|[1-9]\d*)$/.test(token.text) || Number(token.text) >= count) throw new NativeParseError(FORMAT$8, token.line, `expected a vertex number from 0 to ${String(count - 1)}, found ${JSON.stringify(token.text)}`);
+	if (!/^(?:0|[1-9]\d*)$/.test(token.text) || Number(token.text) >= count) throw new NativeParseError(FORMAT$11, token.line, `expected a vertex number from 0 to ${String(count - 1)}, found ${JSON.stringify(token.text)}`);
 	return token.text;
 }
 /**
@@ -132,17 +157,17 @@ function parseGdContest(text) {
 		});
 	}
 	const [first] = tokens;
-	if (first === void 0) throw new NativeParseError(FORMAT$8, 1, "the file holds no vertex count");
-	if (!/^(?:0|[1-9]\d*)$/.test(first.text)) throw new NativeParseError(FORMAT$8, first.line, `the vertex count must be a non-negative integer, found ${JSON.stringify(first.text)}`);
+	if (first === void 0) throw new NativeParseError(FORMAT$11, 1, "the file holds no vertex count");
+	if (!/^(?:0|[1-9]\d*)$/.test(first.text)) throw new NativeParseError(FORMAT$11, first.line, `the vertex count must be a non-negative integer, found ${JSON.stringify(first.text)}`);
 	const count = Number(first.text);
 	const coordinates = tokens.slice(1, 1 + 2 * count);
-	if (coordinates.length < 2 * count) throw new NativeParseError(FORMAT$8, lines(text).length, `expected ${String(2 * count)} coordinates for ${String(count)} vertices, found ${String(coordinates.length)}`);
-	for (const coordinate of coordinates) if (!NUMBER$8.test(coordinate.text)) throw new NativeParseError(FORMAT$8, coordinate.line, `coordinate ${JSON.stringify(coordinate.text)} is not a number`);
+	if (coordinates.length < 2 * count) throw new NativeParseError(FORMAT$11, lines(text).length, `expected ${String(2 * count)} coordinates for ${String(count)} vertices, found ${String(coordinates.length)}`);
+	for (const coordinate of coordinates) if (!NUMBER$9.test(coordinate.text)) throw new NativeParseError(FORMAT$11, coordinate.line, `coordinate ${JSON.stringify(coordinate.text)} is not a number`);
 	const ends = tokens.slice(1 + 2 * count);
 	const edges = [];
 	for (let source = ends.shift(); source !== void 0; source = ends.shift()) {
 		const target = ends.shift();
-		if (target === void 0) throw new NativeParseError(FORMAT$8, source.line, `edge from vertex ${source.text} has no second vertex`);
+		if (target === void 0) throw new NativeParseError(FORMAT$11, source.line, `edge from vertex ${source.text} has no second vertex`);
 		edges.push({
 			source: vertex$1(source, count),
 			target: vertex$1(target, count)
@@ -156,7 +181,7 @@ function parseGdContest(text) {
 //#endregion
 //#region src/parsers/gml.ts
 const KEY = /[A-Za-z_][A-Za-z0-9_]*/y;
-const NUMBER$7 = /[+-]?(?:\d+\.?\d*|\.\d+)(?:[Ee][+-]?\d+)?/y;
+const NUMBER$8 = /[+-]?(?:\d+\.?\d*|\.\d+)(?:[Ee][+-]?\d+)?/y;
 /**
 * Matches a sticky pattern at a position.
 * @param pattern - A sticky regular expression.
@@ -207,7 +232,7 @@ function tokenise(text) {
 			position = end + 1;
 		} else {
 			const key = matchAt(KEY, text, position);
-			const number = key === void 0 ? matchAt(NUMBER$7, text, position) : void 0;
+			const number = key === void 0 ? matchAt(NUMBER$8, text, position) : void 0;
 			const match = key ?? number;
 			if (match === void 0) throw new NativeParseError("gml", line, `unexpected character ${JSON.stringify(char)}`);
 			tokens.push({
@@ -311,6 +336,155 @@ function parseGml(text) {
 	};
 }
 //#endregion
+//#region src/parsers/konect.ts
+const FORMAT$10 = "konect";
+/** The network formats of KONECT's first line (Kunegis, "The KONECT Handbook", table 1): undirected, directed and bipartite. */
+const NETWORK_FORMATS = /* @__PURE__ */ new Set([
+	"sym",
+	"asym",
+	"bip"
+]);
+/** The weight types whose edges carry no weight: a third column, where the file has one, counts the edge's repetitions and is 1 for a single edge. */
+const UNWEIGHTED_TYPES = /* @__PURE__ */ new Set(["unweighted", "positive"]);
+/** The weight types whose third column is the edge's weight (handbook table 2). `dynamic` is not among them: its third column is +1 for an added edge and -1 for a removed one, which is not a weight. */
+const WEIGHTED_TYPES = /* @__PURE__ */ new Set([
+	"posweighted",
+	"signed",
+	"multisigned",
+	"weighted",
+	"multiweighted",
+	"multiposweighted"
+]);
+/** The first line, `% FORMAT WEIGHTS`. */
+const FORMAT_LINE = /^%\s+(\S+)\s+(\S+)\s*$/;
+/** The optional second line, `% EDGES SUBJECTS OBJECTS`: the number of edges and the number of nodes in each of the two sets (equal in a network that is not bipartite). */
+const COUNT_LINE = /^%\s+(\d+)\s+(\d+)\s+(\d+)\s*$/;
+/** A node id: KONECT numbers nodes from 1. */
+const NODE_ID = /^[1-9]\d*$/;
+/** A number as a decimal literal with an optional sign and exponent, so `Number` cannot read hex, an empty string or infinity. */
+const DECIMAL$3 = /^[+-]?(?:\d+\.?\d*|\.\d+)(?:[eE][+-]?\d+)?$/;
+/** The columns of an edge line (handbook section 9.1): the two nodes, then optionally the weight, and the time only when the weight is also given. */
+const ENDPOINT_COLUMNS = 2;
+const WEIGHTED_COLUMNS = 3;
+const TIMESTAMPED_COLUMNS = 4;
+/** The prefix of the node ids in a bipartite network's left and right set, whose numbering each starts from 1. */
+const LEFT_PREFIX = "l:";
+const RIGHT_PREFIX = "r:";
+/**
+* Parses a KONECT TSV file (`out.<network>` in a KONECT download, in the format of section 9.1 of the KONECT Handbook, Kunegis 2017): a first line `% FORMAT WEIGHTS`, an optional second line `% EDGES SUBJECTS OBJECTS`, then one edge per line as two to four whitespace-separated numbers, the source node, the target node, the weight and the time. Other `%` lines are comments.
+*
+* Nodes are the endpoints in order of first appearance, as they are numbered in the file, except in a bipartite network, whose two node sets are numbered independently from 1: there a left node is `l:<n>` and a right node `r:<n>`, so left node 1 and right node 1 are two nodes. Edges are in file order. An edge carries `weight` when the recipe says the file's weights are read, and `timestamp` when it says the file has a time column. The recipe's `weighted` must agree with the file's weight type (`posweighted`, `signed`, `weighted` and their multi-edge forms are weighted; `unweighted` and `positive` are not, and an edge's repetition count in their third column must be 1) and `timestamped` with the file having four columns, so a recipe cannot silently drop a weight or a time the file holds. When the second line is present, its edge count must equal the number of edge lines and every node id must lie within its declared set.
+* @param pieces - The file's text, in order.
+* @param options - The recipe's parser.
+* @returns The native graph.
+* @throws NativeParseError naming the line for a missing or unknown first line, a `dynamic` network, a recipe that disagrees with the file, a malformed edge line, a node id out of its declared range, an edge count that differs from the declared one, and when the file holds no edges.
+*/
+function parseKonect(pieces, options) {
+	const order = new NodeOrder();
+	const edges = [];
+	const state = {};
+	let lastLine = 0;
+	forEachLine(pieces, (line, number) => {
+		lastLine = number;
+		const content = line.trim();
+		if (content === "") return;
+		const { header } = state;
+		if (header === void 0) {
+			state.header = readHeader(content, number, options);
+			return;
+		}
+		if (content.startsWith("%")) {
+			const counts = number === header.line + 1 ? COUNT_LINE.exec(content) : null;
+			if (counts?.[1] !== void 0 && counts[2] !== void 0 && counts[3] !== void 0) state.header = {
+				...header,
+				counts: {
+					edges: Number(counts[1]),
+					left: Number(counts[2]),
+					right: Number(counts[3])
+				}
+			};
+			return;
+		}
+		edges.push(readEdge(content, number, {
+			header,
+			options,
+			order
+		}));
+	});
+	const { header } = state;
+	if (header === void 0) throw new NativeParseError(FORMAT$10, lastLine, "the file has no first line naming its format and weights");
+	if (edges.length === 0) throw new NativeParseError(FORMAT$10, lastLine, "the file holds no edges");
+	if (header.counts !== void 0 && header.counts.edges !== edges.length) throw new NativeParseError(FORMAT$10, lastLine, `the second line declares ${String(header.counts.edges)} edges, the file holds ${String(edges.length)}`);
+	return {
+		nodes: order.nodes(),
+		edges
+	};
+}
+/**
+* Reads the first line and checks the recipe against it.
+* @param content - The trimmed first non-blank line.
+* @param number - Its 1-based number.
+* @param options - The recipe's parser.
+* @returns The format and weight type it declares.
+* @throws NativeParseError when it is not `% FORMAT WEIGHTS` with a known format, when the network is dynamic, or when the recipe's `weighted` disagrees with the weight type.
+*/
+function readHeader(content, number, options) {
+	const match = FORMAT_LINE.exec(content);
+	const network = match?.[1];
+	const weights = match?.[2];
+	if (network === void 0 || weights === void 0 || !NETWORK_FORMATS.has(network)) throw new NativeParseError(FORMAT$10, number, `expected a first line "% FORMAT WEIGHTS" with FORMAT one of ${[...NETWORK_FORMATS].join(", ")}, found ${JSON.stringify(content)}`);
+	if (!WEIGHTED_TYPES.has(weights) && !UNWEIGHTED_TYPES.has(weights)) throw new NativeParseError(FORMAT$10, number, `the weight type ${JSON.stringify(weights)} is not one this parser reads (its third column is not an edge weight or a repetition count)`);
+	if (options.weighted !== WEIGHTED_TYPES.has(weights)) throw new NativeParseError(FORMAT$10, number, `the file's weight type is ${weights}, so a recipe with weighted ${String(WEIGHTED_TYPES.has(weights))} reads it, not one with weighted ${String(options.weighted)}`);
+	return {
+		line: number,
+		network
+	};
+}
+/**
+* Reads one edge line.
+* @param content - The trimmed line.
+* @param number - Its 1-based number.
+* @param context - What the first lines declare (`header`), the recipe's parser (`options`) and the `order` that receives the edge's endpoints.
+* @returns The edge.
+* @throws NativeParseError when the line has the wrong number of columns, a node id that is not a positive integer or is outside its declared set, a weight or time that is not a number, or a repetition count other than 1.
+*/
+function readEdge(content, number, context) {
+	const { header, options, order } = context;
+	const fields = content.split(/\s+/);
+	const [from, to, third, time] = fields;
+	const expected = options.timestamped ? TIMESTAMPED_COLUMNS : options.weighted ? WEIGHTED_COLUMNS : void 0;
+	const fits = expected === void 0 ? fields.length === ENDPOINT_COLUMNS || fields.length === WEIGHTED_COLUMNS : fields.length === expected;
+	if (from === void 0 || to === void 0 || !fits) throw new NativeParseError(FORMAT$10, number, `expected ${expected === void 0 ? `${String(ENDPOINT_COLUMNS)} or ${String(WEIGHTED_COLUMNS)}` : String(expected)} columns for this recipe, found ${String(fields.length)}`);
+	const bipartite = header.network === "bip";
+	const source = endpoint(from, bipartite ? LEFT_PREFIX : "", header.counts?.left, number);
+	const target = endpoint(to, bipartite ? RIGHT_PREFIX : "", header.counts?.right, number);
+	order.add(source);
+	order.add(target);
+	if (third !== void 0 && !options.weighted && (!DECIMAL$3.test(third) || Number(third) !== 1)) throw new NativeParseError(FORMAT$10, number, `the third column ${JSON.stringify(third)} is not 1; an edge that stands for several would be read as one`);
+	if (third !== void 0 && options.weighted && !DECIMAL$3.test(third)) throw new NativeParseError(FORMAT$10, number, `the weight ${JSON.stringify(third)} is not a number`);
+	if (time !== void 0 && !DECIMAL$3.test(time)) throw new NativeParseError(FORMAT$10, number, `the time ${JSON.stringify(time)} is not a number`);
+	const edge = {
+		source,
+		target
+	};
+	if (options.weighted && third !== void 0) edge.weight = Number(third);
+	if (options.timestamped && time !== void 0) edge.timestamp = Number(time);
+	return edge;
+}
+/**
+* Reads a node id.
+* @param token - The id as written.
+* @param prefix - The prefix of the node's set in a bipartite network, empty otherwise.
+* @param size - The declared size of the node's set, when the file declares one.
+* @param number - The 1-based line, for the error.
+* @returns The node id.
+* @throws NativeParseError when the token is not a positive integer or exceeds the set's size.
+*/
+function endpoint(token, prefix, size, number) {
+	if (!NODE_ID.test(token) || size !== void 0 && Number(token) > size) throw new NativeParseError(FORMAT$10, number, `${JSON.stringify(token)} is not a node id from 1${size === void 0 ? "" : ` to ${String(size)}`}`);
+	return `${prefix}${token}`;
+}
+//#endregion
 //#region src/parsers/matrix-market.ts
 /** How many tokens an entry line of each field type holds: the coordinates, then the value's parts (none for a pattern, a real and an imaginary part for a complex value). */
 const tokensPerEntry = /* @__PURE__ */ new Map([
@@ -565,6 +739,15 @@ function* records(pieces, delimiter, firstLine) {
 	if (last !== void 0) yield last;
 }
 /**
+* Splits comma-separated text into its records' fields by RFC 4180, as `records` does, keeping every record (blank lines included) at its position: the grid a workbook sheet's CSV makes, for a parser that reads a layout of blocks and not one table.
+* @param text - The text.
+* @returns Each record's fields, in order.
+* @throws NativeParseError when a quoted field is never closed or a quote opens inside an unquoted field.
+*/
+function csvGrid(text) {
+	return [...records([text], ",", 1)].map((record) => record.fields);
+}
+/**
 * Drops the first physical lines of a file given in pieces.
 * @param pieces - The file text in order.
 * @param count - How many physical lines to drop.
@@ -711,7 +894,7 @@ function pointOf(geometry) {
 * @returns The cell: null for a missing, null or empty value.
 * @throws NativeParseError when the value is not the kind the recipe declares.
 */
-function cellOf(value, column, feature, kind) {
+function cellOf$1(value, column, feature, kind) {
 	if (value === void 0 || value === null) return null;
 	if (kind === "date") {
 		if (typeof value !== "number" || !Number.isFinite(value)) throw new NativeParseError("geojson", feature, `column ${column} is declared a date but holds ${JSON.stringify(value)}`);
@@ -755,7 +938,7 @@ function parseGeojson(text, options) {
 		const properties = feature.properties ?? {};
 		const point = pointOf(feature.geometry);
 		const own = (column) => Object.hasOwn(properties, column) ? properties[column] : void 0;
-		const id = options.idColumn === null ? String(number) : cellOf(own(options.idColumn), options.idColumn, number, "text");
+		const id = options.idColumn === null ? String(number) : cellOf$1(own(options.idColumn), options.idColumn, number, "text");
 		if (id === null) throw new NativeParseError("geojson", number, `the id column ${options.idColumn ?? ""} is empty`);
 		const cells = kinds.map(({ column, kind }) => {
 			if (column === POINT_COLUMNS.latitude || column === POINT_COLUMNS.longitude) {
@@ -763,7 +946,7 @@ function parseGeojson(text, options) {
 				const position = column === POINT_COLUMNS.latitude ? point?.latitude : point?.longitude;
 				return [column, position === void 0 ? null : position * (typeof kind === "object" ? kind.factor : 1)];
 			}
-			return [column, cellOf(own(column), column, number, kind)];
+			return [column, cellOf$1(own(column), column, number, kind)];
 		});
 		return {
 			...Object.fromEntries(cells),
@@ -772,6 +955,205 @@ function parseGeojson(text, options) {
 	}) };
 }
 //#endregion
+//#region src/parsers/hhcrsp.ts
+const FORMAT$9 = "hhcrsp";
+/** The labels of the sheet's blocks, each the top-left cell of a block whose header runs to its right and whose rows run below it. */
+const LABEL = {
+	patients: "Patients",
+	requests: "Pat / Ser",
+	times: "P/SerTime",
+	skills: "CgSkills",
+	caregiverWindows: "TwCaregivers",
+	patientWindows: "Tw Patients"
+};
+/** A service's header, `Service <k>`, a patient's row label and a caregiver's. */
+const SERVICE = /^Service (\d+)$/;
+const NUMBER$7 = /^-?\d+(?:\.\d+)?$/;
+/** How many required services a patient may have: the instances ask for one, or two that must be synchronised, and the parser has a duration column for each. */
+const MOST_SERVICES = 2;
+/**
+* Finds a block by its label: the one cell of the sheet that holds it, its header the cells to its right up to the first empty one, and its rows those below it up to the first whose label and cells are all empty. Past its header a block has an empty column, so the cell there must be empty in every row and a value the header does not label is refused rather than left unread; `Pat / Ser` instead keeps its count there, with the next block starting right after it, and its count is checked on its own.
+* @param grid - The sheet's cells by row.
+* @param label - The block's label.
+* @param pastHeader - What the column past the header holds: nothing, or the block's count.
+* @returns The block.
+* @throws NativeParseError when the label is in no cell or in more than one, or a row has a value in the empty column past the header.
+*/
+function blockOf(grid, label, pastHeader = "empty") {
+	const found = grid.flatMap((row, line) => row.flatMap((cell, column) => cell.trim() === label ? [{
+		line,
+		column
+	}] : []));
+	const [only] = found;
+	if (only === void 0 || found.length !== 1) throw new NativeParseError(FORMAT$9, 1, `expected one block labelled ${JSON.stringify(label)}, found ${String(found.length)}`);
+	const headerRow = grid[only.line] ?? [];
+	const end = headerRow.findIndex((cell, column) => column > only.column && cell.trim() === "");
+	const header = headerRow.slice(only.column + 1, end === -1 ? headerRow.length : end).map((cell) => cell.trim());
+	const rows = [];
+	for (let line = only.line + 1; line < grid.length; line += 1) {
+		const cells = (grid[line] ?? []).slice(only.column, only.column + 1 + header.length).map((cell) => cell.trim());
+		if (cells.every((cell) => cell === "")) break;
+		const past = (grid[line] ?? [])[only.column + 1 + header.length]?.trim();
+		if (pastHeader === "empty" && past !== void 0 && past !== "") throw new NativeParseError(FORMAT$9, line + 1, `the ${label} block's row holds ${JSON.stringify(past)} past its header ${JSON.stringify(header)}, which does not label it`);
+		rows.push({
+			line: line + 1,
+			label: cells[0] ?? "",
+			cells: cells.slice(1)
+		});
+	}
+	return {
+		line: only.line + 1,
+		column: only.column,
+		header,
+		rows
+	};
+}
+/**
+* Reads a cell as a finite number.
+* @param cell - The trimmed cell.
+* @param line - The 1-based line, for the error.
+* @param what - What the cell should be, for the error.
+* @returns The number.
+* @throws NativeParseError when the cell is not a decimal number.
+*/
+function numberOf$4(cell, line, what) {
+	if (cell === void 0 || !NUMBER$7.test(cell)) throw new NativeParseError(FORMAT$9, line, `expected ${what}, found ${JSON.stringify(cell)}`);
+	return Number(cell);
+}
+/**
+* Checks that a block's rows are labelled `<noun> 1` to `<noun> <count>` in order.
+* @param block - The block.
+* @param noun - The row label's word.
+* @param label - The block's label, for the error.
+* @throws NativeParseError naming the first row out of order.
+*/
+function checkNumbered(block, noun, label) {
+	block.rows.forEach((row, index) => {
+		if (row.label !== `${noun} ${String(index + 1)}`) throw new NativeParseError(FORMAT$9, row.line, `the ${label} block's row ${String(index + 1)} is labelled ${JSON.stringify(row.label)}, not ${noun} ${String(index + 1)}`);
+	});
+}
+/**
+* Checks that a block's header names the services 1 to k in order.
+* @param block - The block.
+* @param label - The block's label, for the error.
+* @returns The number of services, k.
+* @throws NativeParseError when a header cell is not the next service.
+*/
+function serviceCount(block, label) {
+	block.header.forEach((cell, index) => {
+		if (SERVICE.exec(cell)?.[1] !== String(index + 1)) throw new NativeParseError(FORMAT$9, block.line, `the ${label} block's header cell ${String(index + 1)} is ${JSON.stringify(cell)}, not Service ${String(index + 1)}`);
+	});
+	return block.header.length;
+}
+/**
+* Parses one sheet of a home health care routing and scheduling workbook (the layout of Bazirha's multiple-time-window, multiple-service instances, generated from Mankowska et al. 2014), read as the CSV of the sheet. The sheet holds labelled blocks side by side: `Patients` gives each node's X and Y, the care centre as node 0 first and again as the last row (the route's end, which must repeat the centre's position); `Pat / Ser` marks which of the services each patient requires with a 1 (a 0 or an empty cell is a service not required) and counts them in the column after the services, and the count must agree with the marks; `P/SerTime` gives each patient's duration for every service, after a row of zeros for the centre whose label may be empty; `CgSkills` and `TwCaregivers` give the caregivers' skills and working windows; and `Tw Patients` gives each patient's time windows by the headers `ETW 1` and `LTW 1`, and `ETW 2` and `LTW 2` where there is a second, in whatever order the sheet puts them. The travel time block, the caregivers' skills and their windows are not carried, since tasks/v1 has neither arcs nor resources: the caregivers are counted in `meta`. The sheets name no unit for their times.
+* @param text - The sheet's CSV text.
+* @returns The instance: its patient, caregiver and service counts as `meta`, and its nodes, the centre (id `0`) first and the patients (ids `1` to n) after it. A patient's `services` names its required services joined by a comma and a space (`Service 1, Service 5`), and its `duration1` and `duration2` are those services' durations in that order.
+* @throws NativeParseError when a block is missing or repeated, its rows or header are not the numbered patients, caregivers or services it should hold, the blocks disagree on the number of patients or caregivers, the centre's closing row does not repeat it, a patient requires no service or more than two, a requirement is not 0, 1 or empty or the count beside the marks disagrees with them, or a cell that should be a number is not.
+*/
+function parseHhcrsp(text) {
+	const grid = csvGrid(text);
+	const positions = blockOf(grid, LABEL.patients);
+	const requests = blockOf(grid, LABEL.requests, "count");
+	const times = blockOf(grid, LABEL.times);
+	const skills = blockOf(grid, LABEL.skills);
+	const caregiverWindows = blockOf(grid, LABEL.caregiverWindows);
+	const windows = blockOf(grid, LABEL.patientWindows);
+	const serviceKinds = serviceCount(requests, LABEL.requests);
+	if (serviceCount(times, LABEL.times) !== serviceKinds || serviceCount(skills, LABEL.skills) !== serviceKinds) throw new NativeParseError(FORMAT$9, times.line, `the ${LABEL.requests}, ${LABEL.times} and ${LABEL.skills} blocks name different numbers of services`);
+	checkNumbered(requests, "Patient", LABEL.requests);
+	checkNumbered(windows, "Patient", LABEL.patientWindows);
+	checkNumbered(skills, "Caregiver", LABEL.skills);
+	checkNumbered(caregiverWindows, "Caregiver", LABEL.caregiverWindows);
+	const patients = requests.rows.length;
+	const [centreTimes, ...patientTimes] = times.rows;
+	checkNumbered({
+		...times,
+		rows: patientTimes
+	}, "Patient", LABEL.times);
+	if (centreTimes === void 0 || ![
+		"",
+		"center",
+		"centre"
+	].includes(centreTimes.label.toLowerCase()) || windows.rows.length !== patients || patientTimes.length !== patients || skills.rows.length !== caregiverWindows.rows.length) throw new NativeParseError(FORMAT$9, requests.line, `the blocks disagree: ${String(patients)} patients requesting services, ${String(patientTimes.length)} with durations after the centre's row, ${String(windows.rows.length)} with time windows, and ${String(skills.rows.length)} caregivers with skills against ${String(caregiverWindows.rows.length)} with windows`);
+	if (positions.header.join(",") !== "X,Y" || positions.rows.length !== patients + 2 || positions.rows.some((row, index) => row.label !== String(index))) throw new NativeParseError(FORMAT$9, positions.line, `the ${LABEL.patients} block must give X and Y for nodes 0 to ${String(patients + 1)}, the centre, ${String(patients)} patients and the centre again`);
+	const position = (index) => {
+		const row = positions.rows[index];
+		if (row === void 0) throw new NativeParseError(FORMAT$9, positions.line, `the ${LABEL.patients} block has no node ${String(index)}`);
+		return {
+			x: numberOf$4(row.cells[0], row.line, "an X"),
+			y: numberOf$4(row.cells[1], row.line, "a Y"),
+			line: row.line
+		};
+	};
+	const { x, y } = position(0);
+	const closing = position(patients + 1);
+	if (closing.x !== x || closing.y !== y) throw new NativeParseError(FORMAT$9, closing.line, `the last node of the ${LABEL.patients} block is not at the centre's position, so it is not the route's end`);
+	const windowColumn = (name) => {
+		const index = windows.header.indexOf(name);
+		return index === -1 ? void 0 : index;
+	};
+	const columns = {
+		earliest1: windowColumn("ETW 1"),
+		latest1: windowColumn("LTW 1"),
+		earliest2: windowColumn("ETW 2"),
+		latest2: windowColumn("LTW 2")
+	};
+	if (columns.earliest1 === void 0 || columns.latest1 === void 0 || columns.earliest2 === void 0 !== (columns.latest2 === void 0) || windows.header.length !== (columns.earliest2 === void 0 ? 2 : 4)) throw new NativeParseError(FORMAT$9, windows.line, `the ${LABEL.patientWindows} header ${JSON.stringify(windows.header)} is not ETW 1 and LTW 1, with or without ETW 2 and LTW 2`);
+	const nodes = [{
+		id: "0",
+		role: "centre",
+		x,
+		y,
+		services: null,
+		duration1: null,
+		duration2: null,
+		earliest1: null,
+		latest1: null,
+		earliest2: null,
+		latest2: null
+	}];
+	requests.rows.forEach((request, index) => {
+		const required = request.cells.flatMap((cell, service) => {
+			if (cell !== "0" && cell !== "1" && cell !== "") throw new NativeParseError(FORMAT$9, request.line, `${request.label} has ${JSON.stringify(cell)} for Service ${String(service + 1)}, not 0, 1 or empty`);
+			return cell === "1" ? [service] : [];
+		});
+		const stated = (grid[request.line - 1] ?? [])[requests.column + serviceKinds + 1]?.trim();
+		if (stated !== String(required.length)) throw new NativeParseError(FORMAT$9, request.line, `${request.label} requires ${String(required.length)} services by its marks, and the count beside them is ${JSON.stringify(stated)}`);
+		if (required.length === 0 || required.length > MOST_SERVICES) throw new NativeParseError(FORMAT$9, request.line, `${request.label} requires ${String(required.length)} services, and a patient requires one or two`);
+		const timeRow = patientTimes[index];
+		const windowRow = windows.rows[index];
+		if (timeRow === void 0 || windowRow === void 0) throw new NativeParseError(FORMAT$9, request.line, `${request.label} has no durations or time windows`);
+		const duration = (which) => {
+			const service = required[which];
+			return service === void 0 ? null : numberOf$4(timeRow.cells[service], timeRow.line, `the duration of Service ${String(service + 1)}`);
+		};
+		const window = (column, what) => column === void 0 ? null : numberOf$4(windowRow.cells[column], windowRow.line, what);
+		const at = position(index + 1);
+		nodes.push({
+			id: String(index + 1),
+			role: "patient",
+			x: at.x,
+			y: at.y,
+			services: required.map((service) => `Service ${String(service + 1)}`).join(", "),
+			duration1: duration(0),
+			duration2: duration(1),
+			earliest1: window(columns.earliest1, "the opening of the first window"),
+			latest1: window(columns.latest1, "the closing of the first window"),
+			earliest2: window(columns.earliest2, "the opening of the second window"),
+			latest2: window(columns.latest2, "the closing of the second window")
+		});
+	});
+	return {
+		meta: {
+			patients,
+			caregivers: skills.rows.length,
+			serviceKinds
+		},
+		nodes
+	};
+}
+//#endregion
 //#region src/parsers/pajek.ts
 /** Section keywords, lower-cased, mapped to how their lines are read. `*Network` names the network and starts no section. `*Partition` and `*Vector` hold node attributes this version does not carry, so their lines are skipped, as are the `*Vertices` lines inside them. */
 const sections = /* @__PURE__ */ new Map([
@@ -885,7 +1267,7 @@ function parsePajek(text) {
 }
 //#endregion
 //#region src/parsers/customer-points.ts
-const FORMAT$7 = "customer-points";
+const FORMAT$8 = "customer-points";
 const NUMBER$6 = /^-?\d+(?:\.\d+)?$/;
 const WHOLE$2 = /^\d+$/;
 /**
@@ -901,12 +1283,12 @@ function parseCustomerPoints(text) {
 	})).filter((row) => row.fields.length > 0);
 	const [first, ...body] = rows;
 	const [key, count, ...extra] = first?.fields ?? [];
-	if (first === void 0 || key !== "customers" || count === void 0 || !WHOLE$2.test(count) || extra.length > 0) throw new NativeParseError(FORMAT$7, first?.line ?? 1, `expected "customers <count>", found ${JSON.stringify(first?.fields.join(" "))}`);
+	if (first === void 0 || key !== "customers" || count === void 0 || !WHOLE$2.test(count) || extra.length > 0) throw new NativeParseError(FORMAT$8, first?.line ?? 1, `expected "customers <count>", found ${JSON.stringify(first?.fields.join(" "))}`);
 	const seen = /* @__PURE__ */ new Set();
 	const nodes = body.map((row) => {
 		const [id, x, y, ...rest] = row.fields;
-		if (id === void 0 || x === void 0 || y === void 0 || rest.length > 0 || !WHOLE$2.test(id) || !NUMBER$6.test(x) || !NUMBER$6.test(y)) throw new NativeParseError(FORMAT$7, row.line, `expected a customer id and two numbers, found ${JSON.stringify(row.fields.join(" "))}`);
-		if (seen.has(id)) throw new NativeParseError(FORMAT$7, row.line, `customer ${id} appears twice`);
+		if (id === void 0 || x === void 0 || y === void 0 || rest.length > 0 || !WHOLE$2.test(id) || !NUMBER$6.test(x) || !NUMBER$6.test(y)) throw new NativeParseError(FORMAT$8, row.line, `expected a customer id and two numbers, found ${JSON.stringify(row.fields.join(" "))}`);
+		if (seen.has(id)) throw new NativeParseError(FORMAT$8, row.line, `customer ${id} appears twice`);
 		seen.add(id);
 		return {
 			id,
@@ -914,7 +1296,7 @@ function parseCustomerPoints(text) {
 			y: Number(y)
 		};
 	});
-	if (nodes.length !== Number(count)) throw new NativeParseError(FORMAT$7, rows[rows.length - 1]?.line ?? first.line, `the file announces ${count} customers, found ${String(nodes.length)}`);
+	if (nodes.length !== Number(count)) throw new NativeParseError(FORMAT$8, rows[rows.length - 1]?.line ?? first.line, `the file announces ${count} customers, found ${String(nodes.length)}`);
 	return {
 		meta: { customers: Number(count) },
 		nodes
@@ -922,7 +1304,7 @@ function parseCustomerPoints(text) {
 }
 //#endregion
 //#region src/parsers/solomon.ts
-const FORMAT$6 = "solomon";
+const FORMAT$7 = "solomon";
 /** A line of integers or decimals separated by any run of spaces and tabs, as the files write rows (Solomon's with padded spaces, the Tenerife set with tabs). */
 const NUMBER$5 = /^-?\d+(?:\.\d+)?$/;
 /**
@@ -934,7 +1316,7 @@ const NUMBER$5 = /^-?\d+(?:\.\d+)?$/;
 * @throws NativeParseError when the token is not a decimal number.
 */
 function numberOf$3(token, line, what) {
-	if (!NUMBER$5.test(token)) throw new NativeParseError(FORMAT$6, line, `expected ${what}, found ${JSON.stringify(token)}`);
+	if (!NUMBER$5.test(token)) throw new NativeParseError(FORMAT$7, line, `expected ${what}, found ${JSON.stringify(token)}`);
 	return Number(token);
 }
 /**
@@ -947,7 +1329,7 @@ function parseSolomon(text) {
 	const all = lines(text);
 	const present = (index) => (all[index] ?? "").trim();
 	const name = present(0);
-	if (name === "") throw new NativeParseError(FORMAT$6, 1, "expected the instance name on the first line");
+	if (name === "") throw new NativeParseError(FORMAT$7, 1, "expected the instance name on the first line");
 	const meta = { name };
 	const nodes = [];
 	const seen = /* @__PURE__ */ new Set();
@@ -963,7 +1345,7 @@ function parseSolomon(text) {
 			awaitingHeader = true;
 			continue;
 		}
-		if (section === "preamble") throw new NativeParseError(FORMAT$6, line, `expected VEHICLE or CUSTOMER, found ${JSON.stringify(trimmed)}`);
+		if (section === "preamble") throw new NativeParseError(FORMAT$7, line, `expected VEHICLE or CUSTOMER, found ${JSON.stringify(trimmed)}`);
 		if (awaitingHeader) {
 			awaitingHeader = false;
 			continue;
@@ -971,15 +1353,15 @@ function parseSolomon(text) {
 		const tokens = trimmed.split(/\s+/);
 		if (section === "vehicle") {
 			const [vehicles, capacity, ...extra] = tokens;
-			if (vehicles === void 0 || capacity === void 0 || extra.length > 0) throw new NativeParseError(FORMAT$6, line, `expected the vehicle count and capacity, found ${JSON.stringify(trimmed)}`);
+			if (vehicles === void 0 || capacity === void 0 || extra.length > 0) throw new NativeParseError(FORMAT$7, line, `expected the vehicle count and capacity, found ${JSON.stringify(trimmed)}`);
 			meta.vehicles = numberOf$3(vehicles, line, "the vehicle count");
 			meta.capacity = numberOf$3(capacity, line, "the vehicle capacity");
 			continue;
 		}
 		const [id, x, y, demand, ready, due, service, ...extra] = tokens;
-		if (id === void 0 || x === void 0 || y === void 0 || demand === void 0 || ready === void 0 || due === void 0 || service === void 0 || extra.length > 0) throw new NativeParseError(FORMAT$6, line, `expected seven numbers (id, x, y, demand, ready, due, service), found ${JSON.stringify(trimmed)}`);
-		if (!/^\d+$/.test(id)) throw new NativeParseError(FORMAT$6, line, `expected a whole number node id, found ${JSON.stringify(id)}`);
-		if (seen.has(id)) throw new NativeParseError(FORMAT$6, line, `node ${id} appears twice`);
+		if (id === void 0 || x === void 0 || y === void 0 || demand === void 0 || ready === void 0 || due === void 0 || service === void 0 || extra.length > 0) throw new NativeParseError(FORMAT$7, line, `expected seven numbers (id, x, y, demand, ready, due, service), found ${JSON.stringify(trimmed)}`);
+		if (!/^\d+$/.test(id)) throw new NativeParseError(FORMAT$7, line, `expected a whole number node id, found ${JSON.stringify(id)}`);
+		if (seen.has(id)) throw new NativeParseError(FORMAT$7, line, `node ${id} appears twice`);
 		seen.add(id);
 		nodes.push({
 			id,
@@ -991,9 +1373,9 @@ function parseSolomon(text) {
 			service: numberOf$3(service, line, "the service time")
 		});
 	}
-	if (section !== "customer") throw new NativeParseError(FORMAT$6, all.length, "expected a CUSTOMER section");
-	if (nodes.length === 0) throw new NativeParseError(FORMAT$6, all.length, "the CUSTOMER section has no rows");
-	if (meta.vehicles === void 0 || meta.capacity === void 0) throw new NativeParseError(FORMAT$6, all.length, "expected a VEHICLE section with the vehicle count and capacity");
+	if (section !== "customer") throw new NativeParseError(FORMAT$7, all.length, "expected a CUSTOMER section");
+	if (nodes.length === 0) throw new NativeParseError(FORMAT$7, all.length, "the CUSTOMER section has no rows");
+	if (meta.vehicles === void 0 || meta.capacity === void 0) throw new NativeParseError(FORMAT$7, all.length, "expected a VEHICLE section with the vehicle count and capacity");
 	return {
 		meta: {
 			name: meta.name,
@@ -1005,7 +1387,7 @@ function parseSolomon(text) {
 }
 //#endregion
 //#region src/parsers/top.ts
-const FORMAT$5 = "top";
+const FORMAT$6 = "top";
 /** The header lines before the first point: `n`, `m` and `tmax`. */
 const HEADER_LINES = 3;
 const NUMBER$4 = /^-?\d+(?:\.\d+)?$/;
@@ -1019,7 +1401,7 @@ const NUMBER$4 = /^-?\d+(?:\.\d+)?$/;
 */
 function headerOf(text, key, line) {
 	const [name, value, ...extra] = (text ?? "").trim().split(/\s+/);
-	if (name !== key || value === void 0 || extra.length > 0 || !NUMBER$4.test(value)) throw new NativeParseError(FORMAT$5, line, `expected "${key} <number>", found ${JSON.stringify((text ?? "").trim())}`);
+	if (name !== key || value === void 0 || extra.length > 0 || !NUMBER$4.test(value)) throw new NativeParseError(FORMAT$6, line, `expected "${key} <number>", found ${JSON.stringify((text ?? "").trim())}`);
 	return Number(value);
 }
 /**
@@ -1038,11 +1420,11 @@ function parseTop(text) {
 	const points = headerOf(first?.text, "n", first?.line ?? 1);
 	const paths = headerOf(second?.text, "m", second?.line ?? 2);
 	const budget = headerOf(third?.text, "tmax", third?.line ?? HEADER_LINES);
-	if (!Number.isInteger(points) || points < 2) throw new NativeParseError(FORMAT$5, first?.line ?? 1, `expected at least a start and an end point, found n ${String(points)}`);
-	if (rows.length !== points) throw new NativeParseError(FORMAT$5, all[all.length - 1]?.line ?? 1, `the header gives ${String(points)} points, found ${String(rows.length)} rows`);
+	if (!Number.isInteger(points) || points < 2) throw new NativeParseError(FORMAT$6, first?.line ?? 1, `expected at least a start and an end point, found n ${String(points)}`);
+	if (rows.length !== points) throw new NativeParseError(FORMAT$6, all[all.length - 1]?.line ?? 1, `the header gives ${String(points)} points, found ${String(rows.length)} rows`);
 	const nodes = rows.map((row, index) => {
 		const [x, y, score, ...extra] = row.text.split(/\s+/);
-		if (x === void 0 || y === void 0 || score === void 0 || extra.length > 0 || !NUMBER$4.test(x) || !NUMBER$4.test(y) || !NUMBER$4.test(score)) throw new NativeParseError(FORMAT$5, row.line, `expected three numbers (x, y, score), found ${JSON.stringify(row.text)}`);
+		if (x === void 0 || y === void 0 || score === void 0 || extra.length > 0 || !NUMBER$4.test(x) || !NUMBER$4.test(y) || !NUMBER$4.test(score)) throw new NativeParseError(FORMAT$6, row.line, `expected three numbers (x, y, score), found ${JSON.stringify(row.text)}`);
 		return {
 			id: String(index),
 			x: Number(x),
@@ -1062,7 +1444,7 @@ function parseTop(text) {
 }
 //#endregion
 //#region src/parsers/toptw.ts
-const FORMAT$4 = "toptw";
+const FORMAT$5 = "toptw";
 /** How many numbers the first header line holds (k, paths, customers, t) and the second (D, capacity). */
 const FIRST_HEADER_NUMBERS = 4;
 const SECOND_HEADER_NUMBERS = 2;
@@ -1080,7 +1462,7 @@ const NUMBER$3 = /^-?\d+(?:\.\d+)?$/;
 * @throws NativeParseError when the token is not a decimal number.
 */
 function numberOf$2(token, line, what) {
-	if (token === void 0 || !NUMBER$3.test(token)) throw new NativeParseError(FORMAT$4, line, `expected ${what}, found ${JSON.stringify(token)}`);
+	if (token === void 0 || !NUMBER$3.test(token)) throw new NativeParseError(FORMAT$5, line, `expected ${what}, found ${JSON.stringify(token)}`);
 	return Number(token);
 }
 /**
@@ -1094,7 +1476,7 @@ function numberOf$2(token, line, what) {
 */
 function numbersOf(text, count, line, what) {
 	const tokens = text.trim().split(/\s+/);
-	if (tokens.length !== count) throw new NativeParseError(FORMAT$4, line, `expected ${what}, found ${JSON.stringify(text.trim())}`);
+	if (tokens.length !== count) throw new NativeParseError(FORMAT$5, line, `expected ${what}, found ${JSON.stringify(text.trim())}`);
 	return tokens.map((token) => numberOf$2(token, line, what));
 }
 /**
@@ -1109,18 +1491,18 @@ function parseToptw(text) {
 		text: raw.trim()
 	})).filter((entry) => entry.text !== "");
 	const [first, second, ...rows] = all;
-	if (first === void 0 || second === void 0) throw new NativeParseError(FORMAT$4, 1, "expected the two header lines");
+	if (first === void 0 || second === void 0) throw new NativeParseError(FORMAT$5, 1, "expected the two header lines");
 	const [, paths, customers] = numbersOf(first.text, FIRST_HEADER_NUMBERS, first.line, "four numbers (k, paths, customers, t)");
 	const [, capacity] = numbersOf(second.text, SECOND_HEADER_NUMBERS, second.line, "two numbers (D, capacity)");
-	if (paths === void 0 || customers === void 0 || capacity === void 0) throw new NativeParseError(FORMAT$4, first.line, "the header lacks a number");
+	if (paths === void 0 || customers === void 0 || capacity === void 0) throw new NativeParseError(FORMAT$5, first.line, "the header lacks a number");
 	const seen = /* @__PURE__ */ new Set();
 	const nodes = rows.map((row) => {
 		const tokens = row.text.split(/\s+/);
 		const listLength = numberOf$2(tokens[LIST_LENGTH_AT], row.line, "the length of the list after the unused number");
-		if (!Number.isInteger(listLength) || listLength < 0 || tokens.length !== ROW_NUMBERS_BESIDE_LIST + listLength) throw new NativeParseError(FORMAT$4, row.line, `expected ${String(ROW_NUMBERS_BESIDE_LIST + listLength)} numbers for a list of ${String(listLength)}, found ${String(tokens.length)}`);
+		if (!Number.isInteger(listLength) || listLength < 0 || tokens.length !== ROW_NUMBERS_BESIDE_LIST + listLength) throw new NativeParseError(FORMAT$5, row.line, `expected ${String(ROW_NUMBERS_BESIDE_LIST + listLength)} numbers for a list of ${String(listLength)}, found ${String(tokens.length)}`);
 		const [id] = tokens;
-		if (id === void 0 || !/^\d+$/.test(id)) throw new NativeParseError(FORMAT$4, row.line, `expected a whole number node id, found ${JSON.stringify(id)}`);
-		if (seen.has(id)) throw new NativeParseError(FORMAT$4, row.line, `node ${id} appears twice`);
+		if (id === void 0 || !/^\d+$/.test(id)) throw new NativeParseError(FORMAT$5, row.line, `expected a whole number node id, found ${JSON.stringify(id)}`);
+		if (seen.has(id)) throw new NativeParseError(FORMAT$5, row.line, `node ${id} appears twice`);
 		seen.add(id);
 		return {
 			id,
@@ -1132,7 +1514,7 @@ function parseToptw(text) {
 			close: numberOf$2(tokens[8 + listLength], row.line, "the closing of the window")
 		};
 	});
-	if (nodes.length !== customers + 1) throw new NativeParseError(FORMAT$4, all.length === 0 ? 1 : all[all.length - 1]?.line ?? 1, `the header gives ${String(customers)} customers, so expected ${String(customers + 1)} rows with the depot, found ${String(nodes.length)}`);
+	if (nodes.length !== customers + 1) throw new NativeParseError(FORMAT$5, all.length === 0 ? 1 : all[all.length - 1]?.line ?? 1, `the header gives ${String(customers)} customers, so expected ${String(customers + 1)} rows with the depot, found ${String(nodes.length)}`);
 	return {
 		meta: {
 			paths,
@@ -1144,7 +1526,7 @@ function parseToptw(text) {
 }
 //#endregion
 //#region src/parsers/tsplib.ts
-const FORMAT$3 = "tsplib";
+const FORMAT$4 = "tsplib";
 /** The instance types the parser reads: the probabilistic and the clustered orienteering problem. */
 const TYPES = /* @__PURE__ */ new Set(["POP", "COP"]);
 /** The edge weight types a coordinate section is read under: planar ones keep their coordinates as `x` and `y`, `GEO` converts them to degrees, and `EXPLICIT` has no coordinates. */
@@ -1175,7 +1557,7 @@ function degrees(value, line) {
 	const whole = Math.trunc(magnitude);
 	const hundredths = (magnitude - whole) * MINUTE_SCALE;
 	const minutes = Math.round(hundredths);
-	if (Math.abs(hundredths - minutes) > MINUTE_TOLERANCE || minutes >= MINUTES_PER_DEGREE) throw new NativeParseError(FORMAT$3, line, `expected a DDD.MM coordinate with whole minutes below 60, found ${String(value)}`);
+	if (Math.abs(hundredths - minutes) > MINUTE_TOLERANCE || minutes >= MINUTES_PER_DEGREE) throw new NativeParseError(FORMAT$4, line, `expected a DDD.MM coordinate with whole minutes below 60, found ${String(value)}`);
 	return Math.sign(value) * (whole + minutes / MINUTES_PER_DEGREE);
 }
 /**
@@ -1187,7 +1569,7 @@ function degrees(value, line) {
 * @throws NativeParseError when the token is not a decimal number.
 */
 function numberOf$1(token, line, what) {
-	if (token === void 0 || !NUMBER$2.test(token)) throw new NativeParseError(FORMAT$3, line, `expected ${what}, found ${JSON.stringify(token)}`);
+	if (token === void 0 || !NUMBER$2.test(token)) throw new NativeParseError(FORMAT$4, line, `expected ${what}, found ${JSON.stringify(token)}`);
 	return Number(token);
 }
 /**
@@ -1199,7 +1581,7 @@ function numberOf$1(token, line, what) {
 * @throws NativeParseError when the token is not a whole number.
 */
 function wholeOf(token, line, what) {
-	if (token === void 0 || !WHOLE$1.test(token)) throw new NativeParseError(FORMAT$3, line, `expected ${what}, found ${JSON.stringify(token)}`);
+	if (token === void 0 || !WHOLE$1.test(token)) throw new NativeParseError(FORMAT$4, line, `expected ${what}, found ${JSON.stringify(token)}`);
 	return Number(token);
 }
 /**
@@ -1227,7 +1609,7 @@ function collect(text) {
 			continue;
 		}
 		if (keyed !== null && key !== void 0) {
-			if (collected.header.has(key)) throw new NativeParseError(FORMAT$3, line, `${key} appears twice`);
+			if (collected.header.has(key)) throw new NativeParseError(FORMAT$4, line, `${key} appears twice`);
 			collected.header.set(key, (keyed[2] ?? "").trim());
 			section = void 0;
 			continue;
@@ -1239,9 +1621,9 @@ function collect(text) {
 		const tokens = trimmed.split(/\s+/);
 		if (section === "coords") {
 			const [id, x, y, ...extra] = tokens;
-			if (extra.length > 0) throw new NativeParseError(FORMAT$3, line, `expected "id x y", found ${JSON.stringify(trimmed)}`);
+			if (extra.length > 0) throw new NativeParseError(FORMAT$4, line, `expected "id x y", found ${JSON.stringify(trimmed)}`);
 			const node = wholeOf(id, line, "a node id");
-			if (collected.coords.has(node)) throw new NativeParseError(FORMAT$3, line, `node ${String(node)} has two coordinate rows`);
+			if (collected.coords.has(node)) throw new NativeParseError(FORMAT$4, line, `node ${String(node)} has two coordinate rows`);
 			collected.coords.set(node, {
 				x: numberOf$1(x, line, "x"),
 				y: numberOf$1(y, line, "y"),
@@ -1249,9 +1631,9 @@ function collect(text) {
 			});
 		} else if (section === "prizes") {
 			const [id, prize, probability, ...extra] = tokens;
-			if (extra.length > 0) throw new NativeParseError(FORMAT$3, line, `expected "id prize probability", found ${JSON.stringify(trimmed)}`);
+			if (extra.length > 0) throw new NativeParseError(FORMAT$4, line, `expected "id prize probability", found ${JSON.stringify(trimmed)}`);
 			const node = wholeOf(id, line, "a node id");
-			if (collected.prizes.has(node)) throw new NativeParseError(FORMAT$3, line, `node ${String(node)} has two prize rows`);
+			if (collected.prizes.has(node)) throw new NativeParseError(FORMAT$4, line, `node ${String(node)} has two prize rows`);
 			collected.prizes.set(node, {
 				prize: numberOf$1(prize, line, "the prize"),
 				probability: numberOf$1(probability, line, "the probability")
@@ -1259,13 +1641,13 @@ function collect(text) {
 		} else if (section === "sets") {
 			const [id, prize, ...members] = tokens;
 			const setId = wholeOf(id, line, "a set id");
-			if (collected.sets.some((set) => set.id === setId)) throw new NativeParseError(FORMAT$3, line, `set ${String(setId)} appears twice`);
+			if (collected.sets.some((set) => set.id === setId)) throw new NativeParseError(FORMAT$4, line, `set ${String(setId)} appears twice`);
 			collected.sets.push({
 				id: setId,
 				prize: numberOf$1(prize, line, "the set prize"),
 				members: members.map((member) => wholeOf(member, line, "a node id in a set"))
 			});
-		} else if (section === void 0) throw new NativeParseError(FORMAT$3, line, `expected a KEY : value line or a section, found ${JSON.stringify(trimmed)}`);
+		} else if (section === void 0) throw new NativeParseError(FORMAT$4, line, `expected a KEY : value line or a section, found ${JSON.stringify(trimmed)}`);
 	}
 	return collected;
 }
@@ -1278,7 +1660,7 @@ function collect(text) {
 */
 function required(header, key) {
 	const value = header.get(key);
-	if (value === void 0) throw new NativeParseError(FORMAT$3, 1, `expected a ${key} line`);
+	if (value === void 0) throw new NativeParseError(FORMAT$4, 1, `expected a ${key} line`);
 	return value;
 }
 /**
@@ -1290,23 +1672,23 @@ function required(header, key) {
 function parseTsplib(text) {
 	const { header, coords, prizes, sets } = collect(text);
 	const type = required(header, "TYPE");
-	if (!TYPES.has(type)) throw new NativeParseError(FORMAT$3, 1, `expected TYPE POP or COP, found ${JSON.stringify(type)}`);
+	if (!TYPES.has(type)) throw new NativeParseError(FORMAT$4, 1, `expected TYPE POP or COP, found ${JSON.stringify(type)}`);
 	const weightType = required(header, "EDGE_WEIGHT_TYPE");
 	const geographic = weightType === "GEO";
-	if (!geographic && !PLANAR.has(weightType) && weightType !== "EXPLICIT") throw new NativeParseError(FORMAT$3, 1, `expected EDGE_WEIGHT_TYPE EUC_2D, CEIL_2D, ATT, GEO or EXPLICIT, found ${JSON.stringify(weightType)}`);
+	if (!geographic && !PLANAR.has(weightType) && weightType !== "EXPLICIT") throw new NativeParseError(FORMAT$4, 1, `expected EDGE_WEIGHT_TYPE EUC_2D, CEIL_2D, ATT, GEO or EXPLICIT, found ${JSON.stringify(weightType)}`);
 	const dimension = wholeOf(required(header, "DIMENSION"), 1, "DIMENSION");
 	const budget = numberOf$1(required(header, "TMAX"), 1, "TMAX");
-	if (weightType === "EXPLICIT" ? coords.size > 0 : coords.size !== dimension) throw new NativeParseError(FORMAT$3, 1, weightType === "EXPLICIT" ? "an EXPLICIT file has no NODE_COORD_SECTION" : `expected ${String(dimension)} coordinate rows, found ${String(coords.size)}`);
+	if (weightType === "EXPLICIT" ? coords.size > 0 : coords.size !== dimension) throw new NativeParseError(FORMAT$4, 1, weightType === "EXPLICIT" ? "an EXPLICIT file has no NODE_COORD_SECTION" : `expected ${String(dimension)} coordinate rows, found ${String(coords.size)}`);
 	const inRange = (id) => id >= 1 && id <= dimension;
 	for (const id of [
 		...coords.keys(),
 		...prizes.keys(),
 		...sets.flatMap((set) => set.members)
-	]) if (!inRange(id)) throw new NativeParseError(FORMAT$3, 1, `node ${String(id)} is outside 1 to ${String(dimension)}`);
-	if (type === "POP" && prizes.size !== dimension) throw new NativeParseError(FORMAT$3, 1, `expected ${String(dimension)} prize rows, found ${String(prizes.size)}`);
+	]) if (!inRange(id)) throw new NativeParseError(FORMAT$4, 1, `node ${String(id)} is outside 1 to ${String(dimension)}`);
+	if (type === "POP" && prizes.size !== dimension) throw new NativeParseError(FORMAT$4, 1, `expected ${String(dimension)} prize rows, found ${String(prizes.size)}`);
 	if (type === "COP") {
 		const declared = wholeOf(required(header, "SETS"), 1, "SETS");
-		if (sets.length !== declared) throw new NativeParseError(FORMAT$3, 1, `expected ${String(declared)} sets, found ${String(sets.length)}`);
+		if (sets.length !== declared) throw new NativeParseError(FORMAT$4, 1, `expected ${String(declared)} sets, found ${String(sets.length)}`);
 	}
 	const clustersOf = (node) => {
 		const ids = sets.filter((set) => set.members.includes(node)).map((set) => String(set.id));
@@ -1344,7 +1726,7 @@ function parseTsplib(text) {
 }
 //#endregion
 //#region src/parsers/ucinet-dl.ts
-const FORMAT$2 = "ucinet-dl";
+const FORMAT$3 = "ucinet-dl";
 /** A label section's keyword, upper-cased with its spacing collapsed, mapped to which labels it gives: `LABELS:` names the rows and columns of a one-mode matrix at once, `LEVEL LABELS:` (or `MATRIX LABELS:`) names the matrices. */
 const LABEL_SECTIONS = /* @__PURE__ */ new Map([
 	["LABELS", "both"],
@@ -1373,7 +1755,7 @@ function labelsOf(text) {
 * @returns The dimension.
 */
 function dimension(value, key, line) {
-	if (!/^[1-9]\d*$/.test(value)) throw new NativeParseError(FORMAT$2, line, `${key} must be a positive integer, found ${JSON.stringify(value)}`);
+	if (!/^[1-9]\d*$/.test(value)) throw new NativeParseError(FORMAT$3, line, `${key} must be a positive integer, found ${JSON.stringify(value)}`);
 	return Number(value);
 }
 /** The dimension parameters, upper-cased, mapped to the header field each sets: N actors of a one-mode matrix, NR rows and NC columns of a two-mode one, NM matrices. */
@@ -1405,7 +1787,7 @@ function readParameters(text, line) {
 				tokens.shift();
 				continue;
 			}
-			throw new NativeParseError(FORMAT$2, line, `unknown header token ${JSON.stringify(token)}`);
+			throw new NativeParseError(FORMAT$3, line, `unknown header token ${JSON.stringify(token)}`);
 		}
 		const key = upper.slice(0, equals);
 		const value = token.slice(equals + 1);
@@ -1420,7 +1802,7 @@ function readParameters(text, line) {
 			kind: "format",
 			value: value.toUpperCase()
 		});
-		else throw new NativeParseError(FORMAT$2, line, `unknown header parameter ${key}`);
+		else throw new NativeParseError(FORMAT$3, line, `unknown header parameter ${key}`);
 	}
 	return parameters;
 }
@@ -1433,10 +1815,10 @@ function readParameters(text, line) {
 */
 function checked(labels, count, what) {
 	if (labels === void 0) return;
-	if (labels.values.length !== count) throw new NativeParseError(FORMAT$2, labels.line, `expected ${String(count)} ${what} labels, found ${String(labels.values.length)}`);
+	if (labels.values.length !== count) throw new NativeParseError(FORMAT$3, labels.line, `expected ${String(count)} ${what} labels, found ${String(labels.values.length)}`);
 	const seen = /* @__PURE__ */ new Set();
 	for (const label of labels.values) {
-		if (seen.has(label)) throw new NativeParseError(FORMAT$2, labels.line, `${what} label ${JSON.stringify(label)} appears twice`);
+		if (seen.has(label)) throw new NativeParseError(FORMAT$3, labels.line, `${what} label ${JSON.stringify(label)} appears twice`);
 		seen.add(label);
 	}
 	return labels.values;
@@ -1455,7 +1837,7 @@ function parseUcinetDl(text, options) {
 	const header = { labels: {} };
 	const setParameters = (parameterText, line) => {
 		for (const parameter of readParameters(parameterText, line)) if (parameter.kind === "dimension") {
-			if (header[parameter.field] !== void 0) throw new NativeParseError(FORMAT$2, line, `${parameter.key} is declared twice`);
+			if (header[parameter.field] !== void 0) throw new NativeParseError(FORMAT$3, line, `${parameter.key} is declared twice`);
 			header[parameter.field] = parameter.value;
 		} else if (parameter.kind === "format") header.format = parameter.value;
 		else header.diagonal = parameter.value;
@@ -1477,7 +1859,7 @@ function parseUcinetDl(text, options) {
 		if (content === "") continue;
 		if (!started) {
 			const match = /^DL(?:\s+(.*))?$/i.exec(content);
-			if (match === null) throw new NativeParseError(FORMAT$2, lineNumber, "a DL file starts with the keyword DL");
+			if (match === null) throw new NativeParseError(FORMAT$3, lineNumber, "a DL file starts with the keyword DL");
 			started = true;
 			if (match[1] !== void 0) setParameters(match[1], lineNumber);
 			continue;
@@ -1495,7 +1877,7 @@ function parseUcinetDl(text, options) {
 		}
 		const target = keyword === void 0 ? void 0 : LABEL_SECTIONS.get(keyword);
 		if (target !== void 0) {
-			if (header.labels[target] !== void 0) throw new NativeParseError(FORMAT$2, lineNumber, `${String(keyword)} is given twice`);
+			if (header.labels[target] !== void 0) throw new NativeParseError(FORMAT$3, lineNumber, `${String(keyword)} is given twice`);
 			section = target;
 			header.labels[target] = {
 				values: labelsOf(rest),
@@ -1503,31 +1885,31 @@ function parseUcinetDl(text, options) {
 			};
 			continue;
 		}
-		if (/^LABELS\s+EMBEDDED\b/i.test(content)) throw new NativeParseError(FORMAT$2, lineNumber, "labels embedded in the data are not read in this version");
+		if (/^LABELS\s+EMBEDDED\b/i.test(content)) throw new NativeParseError(FORMAT$3, lineNumber, "labels embedded in the data are not read in this version");
 		if (section === void 0) setParameters(content, lineNumber);
 		else header.labels[section]?.values.push(...labelsOf(content));
 	}
-	if (!started) throw new NativeParseError(FORMAT$2, 1, "the file is empty");
-	if (dataLine === void 0) throw new NativeParseError(FORMAT$2, all.length, "the file has no DATA: section");
+	if (!started) throw new NativeParseError(FORMAT$3, 1, "the file is empty");
+	if (dataLine === void 0) throw new NativeParseError(FORMAT$3, all.length, "the file has no DATA: section");
 	const format = header.format ?? "FULLMATRIX";
-	if (!FULL_MATRIX.has(format)) throw new NativeParseError(FORMAT$2, dataLine, `format ${format} is not read in this version; only the full matrix layout is`);
-	if (header.diagonal === "ABSENT") throw new NativeParseError(FORMAT$2, dataLine, "a full matrix with its diagonal absent is not read in this version");
+	if (!FULL_MATRIX.has(format)) throw new NativeParseError(FORMAT$3, dataLine, `format ${format} is not read in this version; only the full matrix layout is`);
+	if (header.diagonal === "ABSENT") throw new NativeParseError(FORMAT$3, dataLine, "a full matrix with its diagonal absent is not read in this version");
 	const twoMode = header.nr !== void 0 || header.nc !== void 0;
-	if (twoMode === (header.n !== void 0) || twoMode && (header.nr === void 0 || header.nc === void 0)) throw new NativeParseError(FORMAT$2, dataLine, "the header must give either N, or both NR and NC");
+	if (twoMode === (header.n !== void 0) || twoMode && (header.nr === void 0 || header.nc === void 0)) throw new NativeParseError(FORMAT$3, dataLine, "the header must give either N, or both NR and NC");
 	const rows = header.n ?? header.nr ?? 0;
 	const columns = header.n ?? header.nc ?? 0;
 	const matrices = header.nm ?? 1;
 	checked(header.labels.matrices, matrices, "matrix");
-	if (options.matrix > matrices) throw new NativeParseError(FORMAT$2, dataLine, `the recipe reads matrix ${String(options.matrix)} but the file holds ${String(matrices)}`);
+	if (options.matrix > matrices) throw new NativeParseError(FORMAT$3, dataLine, `the recipe reads matrix ${String(options.matrix)} but the file holds ${String(matrices)}`);
 	let rowIds;
 	let columnIds;
 	if (twoMode) {
-		if (header.labels.both !== void 0) throw new NativeParseError(FORMAT$2, header.labels.both.line, "a two-mode file names its rows and columns with ROW LABELS: and COLUMN LABELS:, not LABELS:");
+		if (header.labels.both !== void 0) throw new NativeParseError(FORMAT$3, header.labels.both.line, "a two-mode file names its rows and columns with ROW LABELS: and COLUMN LABELS:, not LABELS:");
 		rowIds = checked(header.labels.rows, rows, "row") ?? Array.from({ length: rows }, (_, row) => `r${String(row + 1)}`);
 		columnIds = checked(header.labels.columns, columns, "column") ?? Array.from({ length: columns }, (_, column) => `c${String(column + 1)}`);
 		const rowSet = new Set(rowIds);
 		const shared = columnIds.find((id) => rowSet.has(id));
-		if (shared !== void 0) throw new NativeParseError(FORMAT$2, dataLine, `the row and column label ${JSON.stringify(shared)} names two different entities`);
+		if (shared !== void 0) throw new NativeParseError(FORMAT$3, dataLine, `the row and column label ${JSON.stringify(shared)} names two different entities`);
 	} else {
 		const given = [
 			checked(header.labels.both, rows, "actor"),
@@ -1535,18 +1917,18 @@ function parseUcinetDl(text, options) {
 			checked(header.labels.columns, columns, "column")
 		].filter((labels) => labels !== void 0);
 		const [first] = given;
-		if (first !== void 0 && given.some((labels) => labels.some((label, position) => label !== first[position]))) throw new NativeParseError(FORMAT$2, dataLine, "a one-mode file's row and column labels must be the same actors in the same order");
+		if (first !== void 0 && given.some((labels) => labels.some((label, position) => label !== first[position]))) throw new NativeParseError(FORMAT$3, dataLine, "a one-mode file's row and column labels must be the same actors in the same order");
 		rowIds = first ?? Array.from({ length: rows }, (_, row) => String(row + 1));
 		columnIds = rowIds;
 	}
 	const perMatrix = rows * columns;
-	if (cells.length !== perMatrix * matrices) throw new NativeParseError(FORMAT$2, cells.at(-1)?.line ?? dataLine, `expected ${String(matrices)} full ${String(rows)} by ${String(columns)} matrices (${String(perMatrix * matrices)} cells), found ${String(cells.length)} cells`);
-	for (const cell of cells) if (!NUMBER$1.test(cell.text)) throw new NativeParseError(FORMAT$2, cell.line, `cell ${JSON.stringify(cell.text)} is not a number`);
+	if (cells.length !== perMatrix * matrices) throw new NativeParseError(FORMAT$3, cells.at(-1)?.line ?? dataLine, `expected ${String(matrices)} full ${String(rows)} by ${String(columns)} matrices (${String(perMatrix * matrices)} cells), found ${String(cells.length)} cells`);
+	for (const cell of cells) if (!NUMBER$1.test(cell.text)) throw new NativeParseError(FORMAT$3, cell.line, `cell ${JSON.stringify(cell.text)} is not a number`);
 	const chosen = cells.slice((options.matrix - 1) * perMatrix, options.matrix * perMatrix);
 	const edges = [];
 	for (const [row, source] of rowIds.entries()) for (const [column, target] of columnIds.entries()) {
 		const cell = chosen[row * columns + column];
-		if (cell === void 0) throw new NativeParseError(FORMAT$2, dataLine, `matrix ${String(options.matrix)} has no cell at row ${String(row + 1)}, column ${String(column + 1)}`);
+		if (cell === void 0) throw new NativeParseError(FORMAT$3, dataLine, `matrix ${String(options.matrix)} has no cell at row ${String(row + 1)}, column ${String(column + 1)}`);
 		if (Number(cell.text) !== 0) edges.push({
 			source,
 			target
@@ -1559,7 +1941,7 @@ function parseUcinetDl(text, options) {
 }
 //#endregion
 //#region src/parsers/verolog-2019.ts
-const FORMAT$1 = "verolog-2019";
+const FORMAT$2 = "verolog-2019";
 /** The header lines, in the order the file has them, with the key of `meta` each fills and whether its value is text. */
 const HEADER$1 = [
 	[
@@ -1658,9 +2040,9 @@ function rowsOf(text) {
 * @returns The number.
 * @throws NativeParseError when the field is absent or not a decimal number.
 */
-function numberAt(row, index, what) {
+function numberAt$1(row, index, what) {
 	const field = row.fields[index];
-	if (field === void 0 || !NUMBER.test(field)) throw new NativeParseError(FORMAT$1, row.line, `expected ${what}, found ${JSON.stringify(field)}`);
+	if (field === void 0 || !NUMBER.test(field)) throw new NativeParseError(FORMAT$2, row.line, `expected ${what}, found ${JSON.stringify(field)}`);
 	return Number(field);
 }
 /**
@@ -1684,8 +2066,8 @@ function keyed(row) {
 */
 function checkRows(name, rows, length) {
 	for (const [index, row] of rows.entries()) {
-		if (row.fields[0] !== String(index + 1)) throw new NativeParseError(FORMAT$1, row.line, `expected ${name} row ${String(index + 1)} to start with that id, found ${JSON.stringify(row.fields[0])}`);
-		if (length !== void 0 && row.fields.length !== length) throw new NativeParseError(FORMAT$1, row.line, `expected ${String(length)} fields in a ${name} row, found ${String(row.fields.length)}`);
+		if (row.fields[0] !== String(index + 1)) throw new NativeParseError(FORMAT$2, row.line, `expected ${name} row ${String(index + 1)} to start with that id, found ${JSON.stringify(row.fields[0])}`);
+		if (length !== void 0 && row.fields.length !== length) throw new NativeParseError(FORMAT$2, row.line, `expected ${String(length)} fields in a ${name} row, found ${String(row.fields.length)}`);
 	}
 }
 /**
@@ -1700,15 +2082,15 @@ function sectionsOf(rows) {
 	for (const name of SECTIONS) {
 		const start = rows[at];
 		const announced = start === void 0 ? void 0 : keyed(start);
-		if (start === void 0 || announced?.key !== name || announced.value.length !== 1 || !WHOLE.test(announced.value[0] ?? "")) throw new NativeParseError(FORMAT$1, start?.line ?? 1, `expected "${name} = <count>", found ${JSON.stringify(start?.fields.join(" "))}`);
+		if (start === void 0 || announced?.key !== name || announced.value.length !== 1 || !WHOLE.test(announced.value[0] ?? "")) throw new NativeParseError(FORMAT$2, start?.line ?? 1, `expected "${name} = <count>", found ${JSON.stringify(start?.fields.join(" "))}`);
 		const count = Number(announced.value[0]);
 		const body = rows.slice(at + 1, at + 1 + count);
-		if (body.length !== count) throw new NativeParseError(FORMAT$1, start.line, `${name} announces ${String(count)} rows, found ${String(body.length)}`);
+		if (body.length !== count) throw new NativeParseError(FORMAT$2, start.line, `${name} announces ${String(count)} rows, found ${String(body.length)}`);
 		found[name] = body;
 		at += 1 + count;
 	}
 	const extra = rows[at];
-	if (extra !== void 0) throw new NativeParseError(FORMAT$1, extra.line, `expected the end of the file after TECHNICIANS, found ${JSON.stringify(extra.fields.join(" "))}`);
+	if (extra !== void 0) throw new NativeParseError(FORMAT$2, extra.line, `expected the end of the file after TECHNICIANS, found ${JSON.stringify(extra.fields.join(" "))}`);
 	return {
 		MACHINES: found.MACHINES ?? [],
 		LOCATIONS: found.LOCATIONS ?? [],
@@ -1729,8 +2111,8 @@ function parseVerolog2019(text) {
 	for (const [position, [key, name, kind]] of HEADER$1.entries()) {
 		const row = rows[position];
 		const header = row === void 0 ? void 0 : keyed(row);
-		if (row === void 0 || header?.key !== key || header.value.length === 0) throw new NativeParseError(FORMAT$1, row?.line ?? 1, `expected "${key} = <value>", found ${JSON.stringify(row?.fields.join(" "))}`);
-		meta[name] = kind === "text" ? header.value.join(" ") : numberAt({
+		if (row === void 0 || header?.key !== key || header.value.length === 0) throw new NativeParseError(FORMAT$2, row?.line ?? 1, `expected "${key} = <value>", found ${JSON.stringify(row?.fields.join(" "))}`);
+		meta[name] = kind === "text" ? header.value.join(" ") : numberAt$1({
 			line: row.line,
 			fields: header.value
 		}, 0, `a number for ${key}`);
@@ -1749,8 +2131,8 @@ function parseVerolog2019(text) {
 			x: NaN,
 			y: NaN
 		} : {
-			x: numberAt(row, 1, "x"),
-			y: numberAt(row, 2, "y")
+			x: numberAt$1(row, 1, "x"),
+			y: numberAt$1(row, 2, "y")
 		};
 	};
 	const depot = {
@@ -1764,15 +2146,15 @@ function parseVerolog2019(text) {
 		amount: null
 	};
 	const requests = sections.REQUESTS.map((row) => {
-		const location = numberAt(row, REQUEST_AT.location, "a location id");
-		const fromDay = numberAt(row, REQUEST_AT.fromDay, "the first day");
-		const toDay = numberAt(row, REQUEST_AT.toDay, "the last day");
-		const machine = numberAt(row, REQUEST_AT.machine, "a machine id");
-		const amount = numberAt(row, REQUEST_AT.amount, "the amount");
-		if (!Number.isInteger(location) || location < 1 || location > locations.length) throw new NativeParseError(FORMAT$1, row.line, `location ${String(location)} is outside 1 to ${String(locations.length)}`);
-		if (!Number.isInteger(machine) || machine < 1 || machine > machines.length) throw new NativeParseError(FORMAT$1, row.line, `machine ${String(machine)} is outside 1 to ${String(machines.length)}`);
-		if (fromDay < 1 || fromDay > toDay || toDay > days) throw new NativeParseError(FORMAT$1, row.line, `the days ${String(fromDay)} to ${String(toDay)} are not within 1 to ${String(days)}`);
-		if (amount < 1) throw new NativeParseError(FORMAT$1, row.line, `expected an amount of at least 1, found ${String(amount)}`);
+		const location = numberAt$1(row, REQUEST_AT.location, "a location id");
+		const fromDay = numberAt$1(row, REQUEST_AT.fromDay, "the first day");
+		const toDay = numberAt$1(row, REQUEST_AT.toDay, "the last day");
+		const machine = numberAt$1(row, REQUEST_AT.machine, "a machine id");
+		const amount = numberAt$1(row, REQUEST_AT.amount, "the amount");
+		if (!Number.isInteger(location) || location < 1 || location > locations.length) throw new NativeParseError(FORMAT$2, row.line, `location ${String(location)} is outside 1 to ${String(locations.length)}`);
+		if (!Number.isInteger(machine) || machine < 1 || machine > machines.length) throw new NativeParseError(FORMAT$2, row.line, `machine ${String(machine)} is outside 1 to ${String(machines.length)}`);
+		if (fromDay < 1 || fromDay > toDay || toDay > days) throw new NativeParseError(FORMAT$2, row.line, `the days ${String(fromDay)} to ${String(toDay)} are not within 1 to ${String(days)}`);
+		if (amount < 1) throw new NativeParseError(FORMAT$2, row.line, `expected an amount of at least 1, found ${String(amount)}`);
 		return {
 			id: row.fields[0] ?? "",
 			...position(location),
@@ -1793,6 +2175,98 @@ function parseVerolog2019(text) {
 	};
 }
 //#endregion
+//#region src/parsers/user-item-ratings.ts
+const FORMAT$1 = "user-item-ratings";
+/** The text each delimiter option separates a line's fields with. */
+const SEPARATORS = {
+	comma: ",",
+	tab: "	",
+	"double-colon": "::"
+};
+/** The prefix an id takes from the set it is in, so that user 1 and movie 1, which a source numbers independently, are two nodes: `u:` for a user and the first letter of the item type and a colon for an item. */
+const USER_PREFIX = "u:";
+const ITEM_PREFIXES = {
+	movie: "m:",
+	product: "p:"
+};
+/** The node type of a user, and the edge type of a rating. */
+const USER_TYPE = "user";
+const RATING_TYPE = "rating";
+/** A rating as a decimal literal: digits with an optional fraction, no sign, so `Number` cannot read it as hex, as an empty string or as infinity. */
+const RATING = /^\d+(?:\.\d+)?$/;
+/** A time as a count of whole units since the epoch, in digits only. */
+const TIMESTAMP = /^\d+$/;
+/** The fields on a rating's line: the user, the item, the rating and when it was given. */
+const FIELDS = 4;
+/**
+* Parses a file of ratings, one per line as `user`, `item`, `rating` and `timestamp` separated by the recipe's delimiter, after `skipLines` header lines, into a bipartite graph. This is the layout of an Amazon ratings-only file (comma, no header) and of each MovieLens release (tab for `u.data`, `::` for `ratings.dat`, comma with a header line for `ratings.csv`).
+*
+* Nodes are the users and the items in order of first appearance, a user as `u:<id>` of type `user` and an item as `m:<id>` or `p:<id>` of the recipe's item type. Each line is one edge from its user to its item, in file order, of type `rating`, with `weight` the rating over the recipe's `maxRating` (so a weight is in (0, 1]) and `timestamp` the time field as the file writes it. Blank lines are skipped. A user who rates an item twice gives two edges.
+*
+* The file is read a piece of text at a time and each distinct id is held once, however many edges name it.
+* @param pieces - The file's text, in order.
+* @param options - The recipe's parser.
+* @returns The native graph.
+* @throws NativeParseError naming the line for a line without exactly four fields, an empty id, a rating that is not a positive number or exceeds `maxRating`, or a timestamp that is not a whole number, and when the file holds no ratings.
+*/
+function parseUserItemRatings(pieces, options) {
+	const separator = SEPARATORS[options.delimiter];
+	const itemPrefix = ITEM_PREFIXES[options.itemType];
+	const users = /* @__PURE__ */ new Map();
+	const items = /* @__PURE__ */ new Map();
+	const nodes = [];
+	const edges = [];
+	/** The ids of one node set seen so far, by source id, so each distinct id is held once however many edges name it. */
+	const sets = {
+		user: {
+			known: users,
+			prefix: USER_PREFIX,
+			type: USER_TYPE
+		},
+		item: {
+			known: items,
+			prefix: itemPrefix,
+			type: options.itemType
+		}
+	};
+	/** Returns the node id of a source id in a set, adding the node when the id has not appeared in it. */
+	const idOf = (set, raw, number) => {
+		if (raw === "") throw new NativeParseError(FORMAT$1, number, `the ${set.type} id is empty`);
+		let id = set.known.get(raw);
+		if (id === void 0) {
+			id = `${set.prefix}${raw}`;
+			set.known.set(raw, id);
+			nodes.push({
+				id,
+				type: set.type
+			});
+		}
+		return id;
+	};
+	let lastLine = 0;
+	forEachLine(pieces, (line, number) => {
+		lastLine = number;
+		if (number <= options.skipLines || line.trim() === "") return;
+		const fields = line.split(separator);
+		const [user, item, rating, timestamp] = fields;
+		if (fields.length !== FIELDS || user === void 0 || item === void 0 || rating === void 0 || timestamp === void 0) throw new NativeParseError(FORMAT$1, number, `expected ${String(FIELDS)} fields (user, item, rating, timestamp), found ${String(fields.length)}`);
+		if (!RATING.test(rating) || Number(rating) <= 0 || Number(rating) > options.maxRating) throw new NativeParseError(FORMAT$1, number, `the rating ${JSON.stringify(rating)} is not a number above 0 and at most ${String(options.maxRating)}`);
+		if (!TIMESTAMP.test(timestamp) || !Number.isSafeInteger(Number(timestamp))) throw new NativeParseError(FORMAT$1, number, `the timestamp ${JSON.stringify(timestamp)} is not a whole number`);
+		edges.push({
+			source: idOf(sets.user, user, number),
+			target: idOf(sets.item, item, number),
+			type: RATING_TYPE,
+			weight: Number(rating) / options.maxRating,
+			timestamp: Number(timestamp)
+		});
+	});
+	if (edges.length === 0) throw new NativeParseError(FORMAT$1, lastLine, "the file holds no ratings");
+	return {
+		nodes,
+		edges
+	};
+}
+//#endregion
 //#region src/parsers/xml.ts
 /** The characters an XML name may contain, narrowed to what the formats read use. */
 const NAME = /^[A-Za-z_][A-Za-z0-9_.:-]*$/;
@@ -2151,6 +2625,8 @@ function* decodePieces(bytes, parser, pieceBytes = DECODE_PIECE_BYTES) {
 }
 function parseNative(bytes, parser) {
 	if (parser.format === "csv-table") return parseCsvTable(decodePieces(bytes, parser), parser);
+	if (parser.format === "user-item-ratings") return parseUserItemRatings(decodePieces(bytes, parser), parser);
+	if (parser.format === "konect") return parseKonect(decodePieces(bytes, parser), parser);
 	const text = decode(bytes, parser);
 	if (parser.format === "geojson") return parseGeojson(text, parser);
 	if (parser.format === "edge-list") return parseEdgeList(text, parser);
@@ -2165,8 +2641,510 @@ function parseNative(bytes, parser) {
 	if (parser.format === "tsplib") return parseTsplib(text);
 	if (parser.format === "verolog-2019") return parseVerolog2019(text);
 	if (parser.format === "vrp-rep") return parseVrpRep(text);
+	if (parser.format === "hhcrsp") return parseHhcrsp(text);
 	return parsePajek(text);
 }
+//#endregion
+//#region src/node/bzip2.ts
+/** The four bytes every bzip2 stream starts with, as ASCII: `BZh` and the block size digit, `1` to `9`. */
+const MAGIC = /^BZh[1-9]$/;
+const MAGIC_LENGTH = 4;
+/**
+* Whether the bytes start a bzip2 stream.
+* @param bytes - The data.
+* @returns True when they begin with `BZh` and a block size digit.
+*/
+function startsStream(bytes) {
+	return MAGIC.test(String.fromCharCode(...bytes.subarray(0, MAGIC_LENGTH)));
+}
+/**
+* Decompresses bzip2 data: one stream or several concatenated ones, as `bzip2 -d` reads them. The decoder verifies every block's CRC and the stream's, and fails on input that ends inside a stream or holds anything after the last one, so a download cut short or corrupted never yields a prefix of the file.
+*
+* `unbzip2-stream` is a stream interface, but its decoder runs inside `write` and `end` and emits every `data`, `error` and `end` event before they return, so one write of the whole input and an `end` give the whole output synchronously; the check that `end` was emitted guards that.
+* @param bytes - The compressed data.
+* @returns The decompressed bytes.
+* @throws ArchiveError when the data does not start with a bzip2 header, fails a CRC, ends early or holds trailing bytes that are not another stream.
+*/
+function bunzip2(bytes) {
+	if (!startsStream(bytes)) throw new ArchiveError("not valid bzip2 data: it does not start with the BZh header and a block size digit");
+	const decoder = unbzip2();
+	const chunks = [];
+	const outcome = { finished: false };
+	decoder.on("data", (chunk) => {
+		chunks.push(chunk);
+	});
+	decoder.on("error", (error) => {
+		outcome.failure ??= error;
+	});
+	decoder.on("end", () => {
+		outcome.finished = true;
+	});
+	decoder.write(Buffer.from(bytes.buffer, bytes.byteOffset, bytes.byteLength));
+	decoder.end();
+	if (outcome.failure !== void 0) throw new ArchiveError(`not valid bzip2 data: ${outcome.failure instanceof Error ? outcome.failure.message : JSON.stringify(outcome.failure)}`, { cause: outcome.failure });
+	if (!outcome.finished) throw new ArchiveError("the bzip2 decoder did not finish when its input ended");
+	const joined = Buffer.concat(chunks);
+	return new Uint8Array(joined.buffer, joined.byteOffset, joined.byteLength);
+}
+//#endregion
+//#region src/node/csv-text.ts
+/**
+* One CSV field as the table parser reads it: quoted, with its quotes doubled, when it holds a comma, a quote or a line break, and as it is otherwise.
+* @param text - The cell text.
+* @returns The field.
+*/
+function csvField(text) {
+	return /[",\r\n]/.test(text) ? `"${text.replaceAll("\"", "\"\"")}"` : text;
+}
+//#endregion
+//#region src/node/projection.ts
+const HALF_TURN_DEGREES = 180;
+const DEGREES_PER_RADIAN = HALF_TURN_DEGREES / Math.PI;
+/** An eighth of a turn, the angle from which `t` (Snyder 15-9) takes half the latitude. */
+const EIGHTH_TURN = Math.PI / 4;
+/** How close, in radians, two successive estimates of the latitude must be for the inverse projection to stop: far below a millimetre on the ground. */
+const LATITUDE_TOLERANCE = 1e-12;
+/** The most refinements the latitude takes; the series converges in a handful for any point a conic projection covers, so reaching this means the input is not a point the projection maps. */
+const LATITUDE_ITERATIONS = 32;
+/** The relative tolerance within which a unit's stated factor must equal the one keepset reads: a degree in radians, or the metre. */
+const UNIT_TOLERANCE = 1e-12;
+const DEGREE_IN_RADIANS = Math.PI / HALF_TURN_DEGREES;
+/**
+* The geodetic datums whose coordinates keepset takes as WGS84 without a shift: WGS84 itself, and ETRS89 and RGF93 (France's realisation of ETRS89), which were defined to coincide with WGS84 and have drifted from it by under a metre, below the precision of the geocoded addresses such data carries. Any other datum needs a transformation keepset does not make, so a coordinate system on it is refused. Names are compared without case, spaces or underscores, and both the ESRI spelling (`D_RGF_1993`) and the EPSG one (`Reseau_Geodesique_Francais_1993`) are listed.
+*/
+const WGS84_COINCIDENT_DATUMS = /* @__PURE__ */ new Set([
+	"dwgs1984",
+	"wgs1984",
+	"worldgeodeticsystem1984",
+	"drgf1993",
+	"reseaugeodesiquefrancais1993",
+	"detrs1989",
+	"europeanterrestrialreferencesystem1989"
+]);
+/**
+* Parses well-known text into its tree.
+* @param text - A `.prj` file's text.
+* @returns The root node.
+* @throws ArchiveError when the text is not well-formed WKT.
+*/
+function parseWkt(text) {
+	const tokenPattern = /\s*("(?:[^"]|"")*"|[A-Za-z_][A-Za-z0-9_]*|[-+]?(?:\d+\.?\d*|\.\d+)(?:[eE][-+]?\d+)?|[[\](),])\s*/y;
+	const tokens = [];
+	while (tokenPattern.lastIndex < text.length) {
+		const at = tokenPattern.lastIndex;
+		const match = tokenPattern.exec(text);
+		if (match?.[1] === void 0) throw new ArchiveError(`the .prj is not well-known text: it has ${JSON.stringify(text.slice(at).trimStart().slice(0, 1))} where a keyword, text, number or bracket should be`);
+		tokens.push(match[1]);
+	}
+	let position = 0;
+	const node = () => {
+		const keyword = tokens[position];
+		if (keyword === void 0 || !/^[A-Za-z_]/.test(keyword) || !["[", "("].includes(tokens[position + 1] ?? "")) throw new ArchiveError(`the .prj is not well-known text: expected a keyword and a bracket at token ${String(position + 1)}`);
+		position += 2;
+		const values = [];
+		for (;;) {
+			const token = tokens[position];
+			if (token === void 0) throw new ArchiveError(`the .prj is not well-known text: ${keyword} is not closed`);
+			if (token.startsWith("\"")) {
+				values.push(token.slice(1, -1).replaceAll("\"\"", "\""));
+				position += 1;
+			} else if (/^[-+.\d]/.test(token)) {
+				values.push(Number(token));
+				position += 1;
+			} else values.push(node());
+			const separator = tokens[position];
+			position += 1;
+			if (separator === "]" || separator === ")") return {
+				keyword: keyword.toUpperCase(),
+				values
+			};
+			if (separator !== ",") throw new ArchiveError(`the .prj is not well-known text: expected a comma or a closing bracket in ${keyword}`);
+		}
+	};
+	const root = node();
+	if (position !== tokens.length) throw new ArchiveError("the .prj is not well-known text: it continues after its definition");
+	return root;
+}
+/**
+* The child nodes of a node with a keyword.
+* @param node - The parent.
+* @param keyword - The keyword, upper case.
+* @returns The children with that keyword, in order.
+*/
+function children(node, keyword) {
+	return node.values.filter((value) => typeof value === "object" && value.keyword === keyword);
+}
+/**
+* The one child node of a node with a keyword.
+* @param node - The parent.
+* @param keyword - The keyword, upper case.
+* @returns The child.
+* @throws ArchiveError when there is not exactly one.
+*/
+function child(node, keyword) {
+	const found = children(node, keyword);
+	const [only] = found;
+	if (only === void 0 || found.length !== 1) throw new ArchiveError(`the .prj's ${node.keyword} has ${String(found.length)} ${keyword} definitions, not one`);
+	return only;
+}
+/**
+* The number a node gives at a position.
+* @param node - The node.
+* @param index - The position of the number among its values.
+* @returns The number.
+* @throws ArchiveError when the value there is not a number.
+*/
+function numberAt(node, index) {
+	const value = node.values[index];
+	if (typeof value !== "number" || !Number.isFinite(value)) throw new ArchiveError(`the .prj's ${node.keyword} has no number at position ${String(index + 1)}`);
+	return value;
+}
+/**
+* The text a node names itself by, its first value.
+* @param node - The node.
+* @returns The name.
+* @throws ArchiveError when the node does not start with a name.
+*/
+function nameOf(node) {
+	const [name] = node.values;
+	if (typeof name !== "string") throw new ArchiveError(`the .prj's ${node.keyword} has no name`);
+	return name;
+}
+/**
+* A name compared without case, spaces or underscores.
+* @param name - The name.
+* @returns Its comparison key.
+*/
+const keyOf = (name) => name.toLowerCase().replaceAll(/[\s_]+/g, "");
+/**
+* Checks that a factor is the one expected within a relative tolerance.
+* @param factor - The stated factor.
+* @param expected - The factor keepset reads.
+* @returns Whether they agree.
+*/
+const agrees = (factor, expected) => Math.abs(factor - expected) <= UNIT_TOLERANCE * expected;
+/**
+* Reads a geographic coordinate system: its datum must coincide with WGS84, its prime meridian must be Greenwich and its angular unit the degree.
+* @param geogcs - The `GEOGCS` node.
+* @returns The ellipsoid's semi-major axis in metres and its inverse flattening.
+* @throws ArchiveError naming what is not read.
+*/
+function readGeographic(geogcs) {
+	const datum = child(geogcs, "DATUM");
+	if (!WGS84_COINCIDENT_DATUMS.has(keyOf(nameOf(datum)))) throw new ArchiveError(`the .prj's datum is ${nameOf(datum)}, which needs a transformation to WGS84 that keepset does not make`);
+	const primeMeridian = numberAt(child(geogcs, "PRIMEM"), 1);
+	if (primeMeridian !== 0) throw new ArchiveError(`the .prj's prime meridian is ${String(primeMeridian)} degrees from Greenwich, which keepset does not read`);
+	const unit = numberAt(child(geogcs, "UNIT"), 1);
+	if (!agrees(unit, DEGREE_IN_RADIANS)) throw new ArchiveError(`the .prj's angular unit is ${String(unit)} radians, not the degree`);
+	const spheroid = child(datum, "SPHEROID");
+	return {
+		semiMajorAxis: numberAt(spheroid, 1),
+		inverseFlattening: numberAt(spheroid, 2)
+	};
+}
+/**
+* The inverse of the ellipsoidal Lambert conformal conic projection (Snyder, Map Projections: A Working Manual, USGS Professional Paper 1395, 1987, equations 15-1 to 15-11 and 7-9), which takes projected metres back to geodetic longitude and latitude.
+* @param projection - The projection's parameters.
+* @returns The inverse, which gives degrees.
+* @throws ArchiveError, when the returned function is called, for a point whose latitude does not converge.
+*/
+function inverseLambertConformalConic(projection) {
+	const flattening = 1 / projection.inverseFlattening;
+	const eccentricity = Math.sqrt(2 * flattening - flattening * flattening);
+	const m = (latitude) => Math.cos(latitude) / Math.sqrt(1 - (eccentricity * Math.sin(latitude)) ** 2);
+	const t = (latitude) => Math.tan(EIGHTH_TURN - latitude / 2) / ((1 - eccentricity * Math.sin(latitude)) / (1 + eccentricity * Math.sin(latitude))) ** (eccentricity / 2);
+	const { standardParallel1: phi1, standardParallel2: phi2 } = projection;
+	const n = phi1 === phi2 ? Math.sin(phi1) : (Math.log(m(phi1)) - Math.log(m(phi2))) / (Math.log(t(phi1)) - Math.log(t(phi2)));
+	const scaledF = projection.scaleFactor * m(phi1) / (n * t(phi1) ** n);
+	const rho0 = projection.semiMajorAxis * scaledF * t(projection.latitudeOfOrigin) ** n;
+	const sign = Math.sign(n);
+	return (x, y) => {
+		const easting = x - projection.falseEasting;
+		const northing = rho0 - (y - projection.falseNorthing);
+		const rho = sign * Math.hypot(easting, northing);
+		const theta = Math.atan2(sign * easting, sign * northing);
+		const tOfPoint = (rho / (projection.semiMajorAxis * scaledF)) ** (1 / n);
+		let latitude = Math.PI / 2 - 2 * Math.atan(tOfPoint);
+		for (let iteration = 0; iteration < LATITUDE_ITERATIONS; iteration += 1) {
+			const sine = eccentricity * Math.sin(latitude);
+			const next = Math.PI / 2 - 2 * Math.atan(tOfPoint * ((1 - sine) / (1 + sine)) ** (eccentricity / 2));
+			if (Math.abs(next - latitude) < LATITUDE_TOLERANCE) return {
+				longitude: (theta / n + projection.centralMeridian) * DEGREES_PER_RADIAN,
+				latitude: next * DEGREES_PER_RADIAN
+			};
+			latitude = next;
+		}
+		throw new ArchiveError(`the point (${String(x)}, ${String(y)}) is not one the projection maps: its latitude does not converge`);
+	};
+}
+/** The ESRI and OGC names of the Lambert conformal conic projection with two standard parallels, compared as `keyOf` compares them. */
+const LAMBERT_CONFORMAL_CONIC = /* @__PURE__ */ new Set(["lambertconformalconic", "lambertconformalconic2sp"]);
+/**
+* Reads a projected coordinate system on a Lambert conformal conic projection.
+* @param projcs - The `PROJCS` node.
+* @returns The inverse projection.
+* @throws ArchiveError naming what is not read.
+*/
+function readProjected(projcs) {
+	const ellipsoid = readGeographic(child(projcs, "GEOGCS"));
+	const projection = nameOf(child(projcs, "PROJECTION"));
+	if (!LAMBERT_CONFORMAL_CONIC.has(keyOf(projection))) throw new ArchiveError(`the .prj's projection is ${projection}, which keepset does not invert (it reads the Lambert conformal conic with two standard parallels)`);
+	const metresPerUnit = numberAt(child(projcs, "UNIT"), 1);
+	if (!agrees(metresPerUnit, 1)) throw new ArchiveError(`the .prj's linear unit is ${String(metresPerUnit)} metres, not the metre`);
+	const parameters = new Map(children(projcs, "PARAMETER").map((parameter) => [keyOf(nameOf(parameter)), numberAt(parameter, 1)]));
+	const parameter = (name, absent) => {
+		const value = parameters.get(keyOf(name)) ?? absent;
+		if (value === void 0) throw new ArchiveError(`the .prj's projection has no ${name} parameter`);
+		return value;
+	};
+	const known = new Set([
+		"False_Easting",
+		"False_Northing",
+		"Central_Meridian",
+		"Standard_Parallel_1",
+		"Standard_Parallel_2",
+		"Latitude_Of_Origin",
+		"Scale_Factor"
+	].map(keyOf));
+	const unknown = [...parameters.keys()].filter((name) => !known.has(name));
+	if (unknown.length > 0) throw new ArchiveError(`the .prj's projection has parameters keepset does not read: ${unknown.join(", ")}`);
+	return inverseLambertConformalConic({
+		...ellipsoid,
+		falseEasting: parameter("False_Easting"),
+		falseNorthing: parameter("False_Northing"),
+		centralMeridian: parameter("Central_Meridian") * DEGREE_IN_RADIANS,
+		latitudeOfOrigin: parameter("Latitude_Of_Origin") * DEGREE_IN_RADIANS,
+		standardParallel1: parameter("Standard_Parallel_1") * DEGREE_IN_RADIANS,
+		standardParallel2: parameter("Standard_Parallel_2") * DEGREE_IN_RADIANS,
+		scaleFactor: parameter("Scale_Factor", 1)
+	});
+}
+/**
+* The conversion a shapefile's `.prj` states from its coordinates to WGS84 longitude and latitude in degrees. A geographic system on a datum that coincides with WGS84 is read as it is; a projected one must use the Lambert conformal conic projection with two standard parallels in metres on such a datum. Every other system is refused, so a position is never given in the wrong place.
+* @param text - The `.prj` file's text.
+* @returns The conversion.
+* @throws ArchiveError naming the part of the definition keepset does not read.
+*/
+function toWgs84Of(text) {
+	const root = parseWkt(text);
+	if (root.keyword === "GEOGCS") {
+		readGeographic(root);
+		return (x, y) => ({
+			longitude: x,
+			latitude: y
+		});
+	}
+	if (root.keyword === "PROJCS") return readProjected(root);
+	throw new ArchiveError(`the .prj defines a ${root.keyword}, not a GEOGCS or a PROJCS`);
+}
+//#endregion
+//#region src/node/shapefile.ts
+/** The columns a point's position fills after the attribute table's: its coordinates as the shapefile stores them, then its WGS84 latitude and longitude, the same names the geojson parser gives a point feature's position. */
+const SHAPEFILE_POINT_COLUMNS = [
+	"geometry_x",
+	"geometry_y",
+	POINT_COLUMNS.latitude,
+	POINT_COLUMNS.longitude
+];
+/** The `.shp` file code and version every shapefile starts with (ESRI Shapefile Technical Description, 1998). */
+const SHP_FILE_CODE = 9994;
+const SHP_VERSION = 1e3;
+const SHP_HEADER_BYTES = 100;
+const SHP_RECORD_HEADER_BYTES = 8;
+/** Bytes in the 16-bit word the `.shp` measures lengths in. */
+const SHP_WORD_BYTES = 2;
+const SHP_VERSION_OFFSET = 28;
+const SHP_TYPE_OFFSET = 32;
+/** The shape types of a point layer: the null shape (no position), and the point with x and y, with a measure (`PointM`) or with z and a measure (`PointZ`), whose x and y come first. */
+const SHAPE = {
+	null: 0,
+	point: 1,
+	pointZ: 11,
+	pointM: 21
+};
+const POINT_TYPES = /* @__PURE__ */ new Set([
+	SHAPE.point,
+	SHAPE.pointZ,
+	SHAPE.pointM
+]);
+const COORDINATE_BYTES = 8;
+const SHAPE_TYPE_BYTES = 4;
+/** The dBASE header's offsets: the record count, the header's length and one record's length, then the field descriptors from byte 32, each 32 bytes, ended by a carriage return (dBASE III and later). */
+const DBF = {
+	recordCount: 4,
+	headerLength: 8,
+	recordLength: 10,
+	firstField: 32,
+	fieldBytes: 32,
+	nameBytes: 11,
+	typeOffset: 11,
+	lengthOffset: 16,
+	terminator: 13
+};
+/** The first byte of a dBASE record: a space for a live record and an asterisk for a deleted one. */
+const LIVE_RECORD = 32;
+const DATE_DIGITS = 8;
+const YEAR_DIGITS = 4;
+const MONTH_END = 6;
+/** The text encodings a `.cpg` may name, by the names a `.cpg` writes them with, compared without case, spaces, hyphens or underscores. ISO-8859-1 maps each byte to the code point of the same value and is decoded so, not with `TextDecoder`'s "latin1" label, which the WHATWG Encoding Standard maps to windows-1252 and so reads bytes 0x80 to 0x9F differently. */
+const CPG_ENCODINGS = /* @__PURE__ */ new Map([
+	["utf8", () => {
+		const decoder = new TextDecoder("utf-8", { fatal: true });
+		return (bytes) => decoder.decode(bytes);
+	}],
+	["88591", () => (bytes) => String.fromCharCode(...bytes)],
+	["iso88591", () => (bytes) => String.fromCharCode(...bytes)]
+]);
+/**
+* The decoder of the text encoding a `.cpg` names.
+* @param cpg - The `.cpg` file.
+* @returns The decoder, strict for UTF-8 so bytes that are not valid fail rather than becoming replacement characters.
+* @throws ArchiveError when it names an encoding keepset does not decode.
+*/
+function decoderOf(cpg) {
+	const named = new TextDecoder("utf-8").decode(cpg).trim();
+	const encoding = CPG_ENCODINGS.get(named.toLowerCase().replaceAll(/[\s_-]+/g, ""));
+	if (encoding === void 0) throw new ArchiveError(`the .cpg names the encoding ${JSON.stringify(named)}, and keepset decodes a shapefile's attributes only in UTF-8 or ISO-8859-1`);
+	return encoding();
+}
+/**
+* Reads a dBASE table's field descriptors.
+* @param dbf - The `.dbf` file.
+* @param decode - Decodes the field names.
+* @returns The record count, the header and record lengths, and the fields in order.
+* @throws ArchiveError when the header is cut short, a field is a memo or other type kept outside the table, or the fields do not fill a record.
+*/
+function dbfLayout(dbf, decode) {
+	if (dbf.length < DBF.firstField + 1) throw new ArchiveError("the .dbf is shorter than a dBASE header");
+	const view = new DataView(dbf.buffer, dbf.byteOffset, dbf.byteLength);
+	const headerLength = view.getUint16(DBF.headerLength, true);
+	const recordLength = view.getUint16(DBF.recordLength, true);
+	const fields = [];
+	let offset = 1;
+	for (let at = DBF.firstField; dbf[at] !== DBF.terminator; at += DBF.fieldBytes) {
+		if (at + DBF.fieldBytes > headerLength) throw new ArchiveError("the .dbf's field descriptors run past its header without the terminator");
+		const nameBytes = dbf.subarray(at, at + DBF.nameBytes);
+		const end = nameBytes.indexOf(0);
+		const name = decode(end === -1 ? nameBytes : nameBytes.subarray(0, end));
+		const type = String.fromCharCode(dbf[at + DBF.typeOffset] ?? 0);
+		const length = dbf[at + DBF.lengthOffset] ?? 0;
+		if (![
+			"C",
+			"N",
+			"F",
+			"D",
+			"L"
+		].includes(type)) throw new ArchiveError(`the .dbf field ${name} has the type ${JSON.stringify(type)}, which keeps its value outside the table or is not one keepset reads (it reads C, N, F, D and L)`);
+		fields.push({
+			name,
+			type,
+			offset,
+			length
+		});
+		offset += length;
+	}
+	if (offset !== recordLength) throw new ArchiveError(`the .dbf's fields fill ${String(offset)} bytes of a record its header says is ${String(recordLength)}`);
+	return {
+		records: view.getUint32(DBF.recordCount, true),
+		headerLength,
+		recordLength,
+		fields
+	};
+}
+/**
+* One dBASE value as the text of a CSV cell: character text trimmed, a number as written (an overflowed field of asterisks is empty, as dBASE writes no value that way), a date `YYYYMMDD` as ISO 8601 (all zeros or blank is empty), and a logical as `true` or `false` (`?` or blank is empty).
+* @param bytes - The field's bytes in the record.
+* @param field - The field.
+* @param decode - Decodes character text.
+* @param record - The 1-based record number, for errors.
+* @returns The cell text, empty for no value.
+* @throws ArchiveError when a date or logical value is malformed.
+*/
+function cellOf(bytes, field, decode, record) {
+	const text = decode(bytes).trim();
+	if (field.type === "C") return text;
+	if (field.type === "N" || field.type === "F") return /^\**$/.test(text) ? "" : text;
+	if (field.type === "D") {
+		if (text === "" || /^0+$/.test(text)) return "";
+		if (!new RegExp(`^\\d{${String(DATE_DIGITS)}}$`).test(text)) throw new ArchiveError(`record ${String(record)} has the date ${JSON.stringify(text)} in ${field.name}, not YYYYMMDD`);
+		return `${text.slice(0, YEAR_DIGITS)}-${text.slice(YEAR_DIGITS, MONTH_END)}-${text.slice(MONTH_END)}`;
+	}
+	if (text === "" || text === "?") return "";
+	if (/^[TtYy]$/.test(text)) return "true";
+	if (/^[FfNn]$/.test(text)) return "false";
+	throw new ArchiveError(`record ${String(record)} has the logical value ${JSON.stringify(text)} in ${field.name}`);
+}
+/**
+* Reads a point shapefile's positions in record order.
+* @param shp - The `.shp` file.
+* @returns Each record's x and y, or undefined for a null shape.
+* @throws ArchiveError when the file is not a shapefile, a record is not a point or the null shape, or the records are not numbered in order.
+*/
+function pointsOf(shp) {
+	const view = new DataView(shp.buffer, shp.byteOffset, shp.byteLength);
+	if (shp.length < SHP_HEADER_BYTES || view.getInt32(0, false) !== SHP_FILE_CODE || view.getInt32(SHP_VERSION_OFFSET, true) !== SHP_VERSION) throw new ArchiveError("the .shp is not a shapefile: it lacks the file code and version a shapefile starts with");
+	const layerType = view.getInt32(SHP_TYPE_OFFSET, true);
+	if (!POINT_TYPES.has(layerType) && layerType !== SHAPE.null) throw new ArchiveError(`the .shp holds shapes of type ${String(layerType)}, not points, and keepset reads only point shapefiles`);
+	const points = [];
+	for (let at = SHP_HEADER_BYTES; at < shp.length;) {
+		if (at + SHP_RECORD_HEADER_BYTES + SHAPE_TYPE_BYTES > shp.length) throw new ArchiveError(`the .shp ends inside the header of record ${String(points.length + 1)}`);
+		const number = view.getInt32(at, false);
+		const length = view.getInt32(at + SHAPE_TYPE_BYTES, false) * SHP_WORD_BYTES;
+		if (number !== points.length + 1) throw new ArchiveError(`the .shp's record ${String(points.length + 1)} is numbered ${String(number)}`);
+		const content = at + SHP_RECORD_HEADER_BYTES;
+		if (content + length > shp.length) throw new ArchiveError(`the .shp ends inside record ${String(number)}`);
+		const type = view.getInt32(content, true);
+		if (type === SHAPE.null) points.push(void 0);
+		else if (POINT_TYPES.has(type) && length >= 20) points.push({
+			x: view.getFloat64(content + SHAPE_TYPE_BYTES, true),
+			y: view.getFloat64(content + SHAPE_TYPE_BYTES + COORDINATE_BYTES, true)
+		});
+		else throw new ArchiveError(`the .shp's record ${String(number)} is a shape of type ${String(type)}, not a point`);
+		at = content + length;
+	}
+	return points;
+}
+/**
+* The position cells of a point, in the order of `SHAPEFILE_POINT_COLUMNS`.
+* @param x - The stored x.
+* @param y - The stored y.
+* @param toWgs84 - The conversion the `.prj` defines.
+* @returns The stored x and y, then the WGS84 latitude and longitude.
+*/
+function positionCells(x, y, toWgs84) {
+	const { latitude, longitude } = toWgs84(x, y);
+	return [
+		String(x),
+		String(y),
+		String(latitude),
+		String(longitude)
+	];
+}
+/**
+* Writes a point shapefile as CSV text, so a recipe reads it with the table parser: a header of the attribute table's field names followed by `geometry_x`, `geometry_y`, `geometry_latitude` and `geometry_longitude`, then one line per record in file order with its attributes (`cellOf` says how each is written), its coordinates as the shapefile stores them, and its position in WGS84 degrees, converted by the coordinate system the `.prj` defines (`toWgs84Of`). A record whose shape is null has empty position cells.
+* @param parts - The shapefile's parts.
+* @returns The CSV, in UTF-8.
+* @throws ArchiveError when a part is malformed, the geometry is not points, the geometry and the attribute table hold different numbers of records, an attribute record is marked deleted (it would leave the table and the geometry paired by nothing), a field is named like a position column, or the coordinate system is not one keepset converts.
+*/
+function pointShapefileToCsv(parts) {
+	const toWgs84 = toWgs84Of(new TextDecoder("utf-8").decode(parts.prj));
+	const decode = decoderOf(parts.cpg);
+	const layout = dbfLayout(parts.dbf, decode);
+	const points = pointsOf(parts.shp);
+	if (points.length !== layout.records) throw new ArchiveError(`the .shp holds ${String(points.length)} records and the .dbf ${String(layout.records)}, so they do not pair`);
+	if (parts.dbf.length < layout.headerLength + layout.records * layout.recordLength) throw new ArchiveError(`the .dbf ends before its ${String(layout.records)} records`);
+	const clash = layout.fields.find((field) => SHAPEFILE_POINT_COLUMNS.some((column) => column === field.name));
+	if (clash !== void 0) throw new ArchiveError(`the .dbf has a field named ${clash.name}, which is a column of the point's position`);
+	const lines = [[...layout.fields.map((field) => field.name), ...SHAPEFILE_POINT_COLUMNS].map(csvField).join(",")];
+	points.forEach((point, index) => {
+		const start = layout.headerLength + index * layout.recordLength;
+		if (parts.dbf[start] !== LIVE_RECORD) throw new ArchiveError(`the .dbf's record ${String(index + 1)} is marked deleted`);
+		const cells = layout.fields.map((field) => cellOf(parts.dbf.subarray(start + field.offset, start + field.offset + field.length), field, decode, index + 1));
+		const geometry = point === void 0 ? SHAPEFILE_POINT_COLUMNS.map(() => "") : positionCells(point.x, point.y, toWgs84);
+		lines.push([...cells, ...geometry].map(csvField).join(","));
+	});
+	return new TextEncoder().encode(`${lines.join("\n")}\n`);
+}
 /** The ustar header layout (POSIX.1-1988, pax(1) "ustar Interchange Format"): each field's byte offset and length. */
 const HEADER = {
 	name: {
@@ -2213,7 +3191,7 @@ const BYTE_RADIX = 256;
 * @param length - Field length.
 * @returns The field text.
 */
-function field$1(bytes, offset, length) {
+function field(bytes, offset, length) {
 	const slice = bytes.subarray(offset, offset + length);
 	const end = slice.indexOf(0);
 	return new TextDecoder().decode(end === -1 ? slice : slice.subarray(0, end));
@@ -2232,7 +3210,7 @@ function numeric(bytes, offset, length) {
 		for (const byte of bytes.subarray(offset + 1, offset + length)) value = value * BYTE_RADIX + byte;
 		return value;
 	}
-	const text = field$1(bytes, offset, length).trim();
+	const text = field(bytes, offset, length).trim();
 	if (!/^[0-7]*$/.test(text)) throw new ArchiveError(`tar header field is not octal: ${JSON.stringify(text)}`);
 	return text === "" ? 0 : Number.parseInt(text, 8);
 }
@@ -2268,21 +3246,21 @@ function readTar(bytes) {
 		for (const [index, byte] of header.entries()) sum += index >= checksum.offset && index < checksum.offset + checksum.length ? 32 : byte;
 		if (sum !== numeric(header, checksum.offset, checksum.length)) throw new ArchiveError(`tar header at byte ${String(offset)} fails its checksum`);
 		const size = numeric(header, HEADER.size.offset, HEADER.size.length);
-		const type = field$1(header, HEADER.type.offset, HEADER.type.length);
+		const type = field(header, HEADER.type.offset, HEADER.type.length);
 		const dataStart = offset + 512;
 		if (dataStart + size > bytes.length) throw new ArchiveError(`tar member at byte ${String(offset)} runs past the end of the archive`);
 		const data = bytes.subarray(dataStart, dataStart + size);
 		offset = dataStart + Math.ceil(size / 512) * 512;
 		if (type === "L") {
-			longName = field$1(data, 0, data.length);
+			longName = field(data, 0, data.length);
 			continue;
 		}
 		if (type === "x") {
 			longName = paxPath(data);
 			continue;
 		}
-		const name = field$1(header, HEADER.name.offset, HEADER.name.length);
-		const prefix = field$1(header, HEADER.magic.offset, HEADER.magic.length).startsWith("ustar") ? field$1(header, HEADER.prefix.offset, HEADER.prefix.length) : "";
+		const name = field(header, HEADER.name.offset, HEADER.name.length);
+		const prefix = field(header, HEADER.magic.offset, HEADER.magic.length).startsWith("ustar") ? field(header, HEADER.prefix.offset, HEADER.prefix.length) : "";
 		const path = longName ?? (prefix === "" ? name : `${prefix}/${name}`);
 		longName = void 0;
 		if (type === "0" || type === "" || type === "7") members.push({
@@ -2431,14 +3409,6 @@ function columnOf(reference) {
 	return index - 1;
 }
 /**
-* One CSV field: quoted when it holds a comma, a quote or a line break.
-* @param text - The cell text.
-* @returns The field.
-*/
-function field(text) {
-	return /[",\r\n]/.test(text) ? `"${text.replaceAll("\"", "\"\"")}"` : text;
-}
-/**
 * Finds the part that holds a named sheet.
 * @param workbook - The `workbook.xml` text.
 * @param rels - The workbook's relationships text.
@@ -2502,6 +3472,26 @@ function readRows(xml, strings, dates, date1904) {
 	};
 }
 /**
+* The names of a workbook's sheets, in the order the workbook lists them, which is the order of the tabs an editor shows.
+* @param bytes - The workbook.
+* @returns The sheet names.
+* @throws ArchiveError when the bytes are not a workbook.
+*/
+function sheetNames(bytes) {
+	let part;
+	try {
+		part = getOwn(unzipSync(bytes, { filter: (file) => file.name === "xl/workbook.xml" }), "xl/workbook.xml");
+	} catch (error) {
+		throw new ArchiveError(`not a valid workbook: ${error instanceof Error ? error.message : String(error)}`, { cause: error });
+	}
+	if (part === void 0) throw new ArchiveError("the file is not an xlsx workbook: it has no xl/workbook.xml");
+	return elements(new TextDecoder("utf-8").decode(part), "sheet").map((sheet, index) => {
+		const name = sheet["name"];
+		if (name === void 0) throw new ArchiveError(`the workbook's sheet ${String(index + 1)} has no name`);
+		return name;
+	});
+}
+/**
 * Writes one sheet of an xlsx workbook as CSV text, so a recipe reads it with the table parser: one line for every row number from the first to the last (a row the sheet leaves out is an empty line, so the lines above the header are the rows an editor shows), every line the width of the sheet's widest row, a date cell as ISO 8601 text, a boolean as TRUE or FALSE, a number as the text the workbook stores, and a formula as its stored result.
 * @param bytes - The workbook.
 * @param sheet - The sheet's name.
@@ -2537,7 +3527,7 @@ function sheetToCsv(bytes, sheet) {
 	const lines = [];
 	for (let number = 1; number <= last; number += 1) {
 		const cells = rows.get(number) ?? [];
-		lines.push(Array.from({ length: width }, (_empty, column) => field(cells[column] ?? "")).join(","));
+		lines.push(Array.from({ length: width }, (_empty, column) => csvField(cells[column] ?? "")).join(","));
 	}
 	return new TextEncoder().encode(lines.length === 0 ? "" : `${lines.join("\n")}\n`);
 }
@@ -2608,10 +3598,12 @@ function pick(paths, member) {
 function unpack(bytes, archive) {
 	if (archive.kind === "none") return { bytes };
 	if (archive.kind === "gzip") return { bytes: gunzip(bytes) };
+	if (archive.kind === "bzip2") return { bytes: bunzip2(bytes) };
 	if (archive.kind === "xlsx") return {
 		bytes: sheetToCsv(bytes, archive.sheet),
 		member: archive.sheet
 	};
+	if (archive.kind === "shapefile") return unpackShapefile(bytes, archive.member);
 	const outer = selectMember(bytes, archive);
 	if (archive.inner === void 0) return outer;
 	if (archive.inner.kind === "gzip") return {
@@ -2646,7 +3638,7 @@ function selectMember(bytes, archive) {
 			member: path
 		};
 	}
-	const members = readTar(archive.kind === "tar" ? bytes : gunzip(bytes));
+	const members = readTar(untarred(bytes, archive.kind));
 	const path = pick(members.map((member) => member.path), archive.member);
 	const found = members.find((member) => member.path === path);
 	if (found === void 0) throw new ArchiveError(`tar member ${path} could not be read`);
@@ -2656,13 +3648,84 @@ function selectMember(bytes, archive) {
 	};
 }
 /**
-* Unpacks downloaded bytes into every file a collection's selector matches.
+* Unpacks a zipped point shapefile into the CSV its attribute table and positions make. The `.dbf`, `.prj` and `.cpg` are the members with the `.shp`'s path and their own extension, matched without case as GIS tools write extensions either way.
+* @param bytes - The zip's bytes.
+* @param member - The selector of the `.shp`.
+* @returns The CSV, and the `.shp`'s path as the member read.
+* @throws ArchiveError when the bytes are not a zip, the selector does not match exactly one `.shp`, a part beside it is missing or there is more than one of it, or the shapefile cannot be read.
+*/
+function unpackShapefile(bytes, member) {
+	const names = [];
+	unzip(bytes, (file) => {
+		names.push(file.name);
+		return false;
+	});
+	const shp = pick(names, member);
+	if (!shp.toLowerCase().endsWith(".shp")) throw new ArchiveError(`the shapefile member ${shp} is not a .shp`);
+	const stem = shp.slice(0, -4);
+	const beside = (extension) => {
+		const matched = names.filter((name) => name.length === stem.length + extension.length && name.startsWith(stem) && name.toLowerCase().endsWith(extension));
+		const [only] = matched;
+		if (only === void 0 || matched.length !== 1) throw new ArchiveError(`expected one ${extension} beside ${shp}, found ${String(matched.length)} among: ${names.join(", ")}`);
+		return only;
+	};
+	const paths = {
+		shp,
+		dbf: beside(".dbf"),
+		prj: beside(".prj"),
+		cpg: beside(".cpg")
+	};
+	const wanted = new Set(Object.values(paths));
+	const files = unzip(bytes, (candidate) => wanted.has(candidate.name));
+	const read = (path) => {
+		const file = getOwn(files, path);
+		if (file === void 0) throw new ArchiveError(`zip member ${path} could not be read`);
+		return file;
+	};
+	return {
+		bytes: pointShapefileToCsv({
+			shp: read(paths.shp),
+			dbf: read(paths.dbf),
+			prj: read(paths.prj),
+			cpg: read(paths.cpg)
+		}),
+		member: shp
+	};
+}
+/**
+* Unpacks downloaded bytes into every file a collection's selector matches, or, with an `xlsx` inner layout, into every sheet of every matched workbook that its `sheets` pattern matches as the sheet's CSV, at the member's path and the sheet's name joined by `/`, members in path order and sheets in the workbook's order.
 * @param bytes - The downloaded bytes.
 * @param archive - The recipe's archive layout, which selects members with `members`.
-* @returns Each matching file, in path order.
-* @throws ArchiveError when the bytes are not a well-formed archive of the stated kind or the selector matches no member.
+* @returns Each file.
+* @throws ArchiveError when the bytes are not a well-formed archive of the stated kind, the selector matches no member, or a member an `xlsx` layout reads is not a workbook or has no sheet the pattern matches.
 */
 function unpackMembers(bytes, archive) {
+	const members = selectMembers(bytes, archive);
+	if (archive.inner === void 0) return members;
+	const { sheets } = archive.inner;
+	const wanted = sheets === void 0 ? void 0 : new RegExp(`^(?:${sheets})$`, "u");
+	return members.flatMap((member) => {
+		let names;
+		try {
+			names = sheetNames(member.bytes).filter((sheet) => wanted === void 0 || wanted.test(sheet));
+		} catch (error) {
+			throw new ArchiveError(`member ${member.path}: ${error instanceof Error ? error.message : String(error)}`, { cause: error });
+		}
+		if (names.length === 0) throw new ArchiveError(`member ${member.path} has no sheet matching ${sheets ?? ""}`);
+		return names.map((sheet) => ({
+			path: `${member.path}/${sheet}`,
+			bytes: sheetToCsv(member.bytes, sheet)
+		}));
+	});
+}
+/**
+* Unpacks every member a collection's selector matches.
+* @param bytes - The downloaded bytes.
+* @param archive - The recipe's archive layout.
+* @returns Each matching member, in path order.
+* @throws ArchiveError when the bytes are not a well-formed archive of the stated kind or the selector matches no member.
+*/
+function selectMembers(bytes, archive) {
 	if (archive.kind === "zip") {
 		const names = [];
 		unzip(bytes, (file) => {
@@ -2681,7 +3744,7 @@ function unpackMembers(bytes, archive) {
 			};
 		});
 	}
-	const members = readTar(archive.kind === "tar" ? bytes : gunzip(bytes));
+	const members = readTar(untarred(bytes, archive.kind));
 	return pickAll(members.map((member) => member.path), archive.members).map((path) => {
 		const found = members.find((member) => member.path === path);
 		if (found === void 0) throw new ArchiveError(`tar member ${path} could not be read`);
@@ -2692,6 +3755,16 @@ function unpackMembers(bytes, archive) {
 	});
 }
 /**
+* Removes the compression a tar archive kind states, leaving the tar bytes.
+* @param bytes - The downloaded bytes.
+* @param kind - The tar archive kind: `tar` is uncompressed, `tar.gz` is gzip and `tar.bz2` is bzip2.
+* @returns The tar archive.
+*/
+function untarred(bytes, kind) {
+	if (kind === "tar") return bytes;
+	return kind === "tar.gz" ? gunzip(bytes) : bunzip2(bytes);
+}
+/**
 * Gunzips bytes, rethrowing zlib's failure in the package's taxonomy.
 * @param bytes - Gzip data.
 * @returns The decompressed bytes.