@nfdi4plants/arctrl 1.1.0 → 2.0.0-alpha.1

package/ISA/ISA/ArcTypes/ArcTableAux.js

@@ -1,1155 +0,0 @@
-import { addToDict, getItemFromDict } from "../../../fable_modules/fable-library.4.5.0/MapUtil.js";
-import { map as map_2, defaultArg, unwrap, value as value_9, some } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { empty as empty_1, singleton as singleton_1, append, delay, map as map_1, tryPick, toList, indexed, head as head_1, toArray, filter, tryFindIndex, maxBy } from "../../../fable_modules/fable-library.4.5.0/Seq.js";
-import { arrayHash, equalArrays, stringHash, int32ToString, numberHash, disposeSafe, getEnumerator, compare, equals, safeHash, comparePrimitives } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { pick, exists, zip, append as append_1, sortBy, tryPick as tryPick_1, collect, mapIndexed, item, length, map as map_3, ofArray as ofArray_2, singleton, choose, ofSeq, empty, head, tail as tail_1, isEmpty, cons } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { CompositeCell } from "./CompositeCell.js";
-import { max } from "../../../fable_modules/fable-library.4.5.0/Double.js";
-import { map, iterateIndexed } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { tryFind, ofArray } from "../../../fable_modules/fable-library.4.5.0/Map.js";
-import { List_groupBy, Array_groupBy } from "../../../fable_modules/fable-library.4.5.0/Seq2.js";
-import { FSharpSet__Contains, ofArray as ofArray_1 } from "../../../fable_modules/fable-library.4.5.0/Set.js";
-import { Value as Value_1 } from "../JsonTypes/Value.js";
-import { Component_fromOptions } from "../JsonTypes/Component.js";
-import { ProtocolParameter } from "../JsonTypes/ProtocolParameter.js";
-import { ProcessParameterValue } from "../JsonTypes/ProcessParameterValue.js";
-import { FactorValue_create_18335379 } from "../JsonTypes/FactorValue.js";
-import { Factor } from "../JsonTypes/Factor.js";
-import { toString } from "../../../fable_modules/fable-library.4.5.0/Types.js";
-import { MaterialAttributeValue_create_7F714043 } from "../JsonTypes/MaterialAttributeValue.js";
-import { MaterialAttribute_create_Z6C54B221 } from "../JsonTypes/MaterialAttribute.js";
-import { ProcessInput_getCharacteristicValues_102B6859, ProcessInput__isMaterial, ProcessInput__isData, ProcessInput_setCharacteristicValues, ProcessInput__get_Name, ProcessInput__isSource, ProcessInput__isSample, ProcessInput, ProcessInput_createDerivedData_Z721C83C5, ProcessInput_createRawData_Z721C83C5, ProcessInput_createImageFile_Z721C83C5, ProcessInput_createMaterial_2363974C, ProcessInput_createSample_Z6DF16D07, ProcessInput_createSource_7888CE42 } from "../JsonTypes/ProcessInput.js";
-import { remove, printf, toFail } from "../../../fable_modules/fable-library.4.5.0/String.js";
-import { ProcessOutput_getFactorValues_11830B70, ProcessOutput__isMaterial, ProcessOutput__isData, ProcessOutput_setFactorValues, ProcessOutput__get_Name, ProcessOutput__isSample, ProcessOutput, ProcessOutput_createDerivedData_Z721C83C5, ProcessOutput_createRawData_Z721C83C5, ProcessOutput_createImageFile_Z721C83C5, ProcessOutput_createMaterial_2363974C, ProcessOutput_createSample_Z6DF16D07 } from "../JsonTypes/ProcessOutput.js";
-import { IOType, CompositeHeader } from "./CompositeHeader.js";
-import { tryGetFactorColumnIndex, tryGetCharacteristicColumnIndex, tryGetComponentIndex, tryGetParameterColumnIndex, ARCtrl_ISA_OntologyAnnotation__OntologyAnnotation_SetColumnIndex_Z524259A4 } from "../JsonTypes/ColumnIndex.js";
-import { Source_create_7A281ED9 } from "../JsonTypes/Source.js";
-import { Sample_create_E50ED22 } from "../JsonTypes/Sample.js";
-import { Process_create_Z42860F3E, Process_decomposeName_Z721C83C5, Process_make, Process_composeName } from "../JsonTypes/Process.js";
-import { List_tryPickAndRemove, HashCodes_boxHashSeq, Option_fromValueWithDefault } from "../Helper.js";
-import { Protocol_make } from "../JsonTypes/Protocol.js";
-import { createMissingIdentifier } from "../Identifier.js";
-import { Dictionary } from "../../../fable_modules/fable-library.4.5.0/MutableMap.js";
-
-/**
- * Lookup an element in the dictionary, returning a <c>Some</c> value if the element is in the domain
- * of the dictionary and <c>None</c> if not.
- */
-export function Dictionary_tryFind(key, table) {
-    if (table.has(key)) {
-        return some(getItemFromDict(table, key));
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function getColumnCount(headers) {
-    return headers.length;
-}
-
-export function getRowCount(values) {
-    if (values.size === 0) {
-        return 0;
-    }
-    else {
-        return (1 + maxBy((tuple) => tuple[1], values.keys(), {
-            Compare: comparePrimitives,
-        })[1]) | 0;
-    }
-}
-
-export function boxHashValues(colCount, values) {
-    let hash = 0;
-    const rowCount = getRowCount(values) | 0;
-    for (let col = 0; col <= (colCount - 1); col++) {
-        for (let row = 0; row <= (rowCount - 1); row++) {
-            hash = ((((-1640531527 + safeHash(getItemFromDict(values, [col, row]))) + (hash << 6)) + (hash >> 2)) | 0);
-        }
-    }
-    return hash;
-}
-
-export function $007CIsUniqueExistingHeader$007C_$007C(existingHeaders, input) {
-    switch (input.tag) {
-        case 3:
-        case 2:
-        case 1:
-        case 0:
-        case 13:
-            return void 0;
-        case 12:
-            return tryFindIndex((h) => (h.tag === 12), existingHeaders);
-        case 11:
-            return tryFindIndex((h_1) => (h_1.tag === 11), existingHeaders);
-        default:
-            return tryFindIndex((h_2) => equals(h_2, input), existingHeaders);
-    }
-}
-
-/**
- * Returns the column index of the duplicate unique column in `existingHeaders`.
- */
-export function tryFindDuplicateUnique(newHeader, existingHeaders) {
-    const activePatternResult = $007CIsUniqueExistingHeader$007C_$007C(existingHeaders, newHeader);
-    if (activePatternResult != null) {
-        const index = activePatternResult | 0;
-        return index;
-    }
-    else {
-        return void 0;
-    }
-}
-
-/**
- * Returns the column index of the duplicate unique column in `existingHeaders`.
- */
-export function tryFindDuplicateUniqueInArray(existingHeaders) {
-    const loop = (i_mut, duplicateList_mut, headerList_mut) => {
-        loop:
-        while (true) {
-            const i = i_mut, duplicateList = duplicateList_mut, headerList = headerList_mut;
-            let matchResult, header, tail;
-            if (isEmpty(headerList)) {
-                matchResult = 0;
-            }
-            else if (isEmpty(tail_1(headerList))) {
-                matchResult = 0;
-            }
-            else {
-                matchResult = 1;
-                header = head(headerList);
-                tail = tail_1(headerList);
-            }
-            switch (matchResult) {
-                case 0:
-                    return duplicateList;
-                default: {
-                    const hasDuplicate = tryFindDuplicateUnique(header, tail);
-                    i_mut = (i + 1);
-                    duplicateList_mut = ((hasDuplicate != null) ? cons({
-                        HeaderType: header,
-                        Index1: i,
-                        Index2: value_9(hasDuplicate),
-                    }, duplicateList) : duplicateList);
-                    headerList_mut = tail;
-                    continue loop;
-                }
-            }
-            break;
-        }
-    };
-    return loop(0, empty(), ofSeq(filter((x) => !x.IsTermColumn, existingHeaders)));
-}
-
-/**
- * Checks if given column index is valid for given number of columns.
- * 
- * if `allowAppend` = true => `0 < index <= columnCount`
- * 
- * if `allowAppend` = false => `0 < index < columnCount`
- */
-export function SanityChecks_validateColumnIndex(index, columnCount, allowAppend) {
-    let x, y;
-    if (index < 0) {
-        throw new Error("Cannot insert CompositeColumn at index < 0.");
-    }
-    if ((x = (index | 0), (y = (columnCount | 0), allowAppend ? (compare(x, y) > 0) : (compare(x, y) >= 0)))) {
-        throw new Error(`Specified index is out of table range! Table contains only ${columnCount} columns.`);
-    }
-}
-
-/**
- * Checks if given index is valid for given number of rows.
- * 
- * if `allowAppend` = true => `0 < index <= rowCount`
- * 
- * if `allowAppend` = false => `0 < index < rowCount`
- */
-export function SanityChecks_validateRowIndex(index, rowCount, allowAppend) {
-    let x, y;
-    if (index < 0) {
-        throw new Error("Cannot insert CompositeColumn at index < 0.");
-    }
-    if ((x = (index | 0), (y = (rowCount | 0), allowAppend ? (compare(x, y) > 0) : (compare(x, y) >= 0)))) {
-        throw new Error(`Specified index is out of table range! Table contains only ${rowCount} rows.`);
-    }
-}
-
-export function SanityChecks_validateColumn(column) {
-    column.Validate(true);
-}
-
-export function Unchecked_tryGetCellAt(column, row, cells) {
-    return Dictionary_tryFind([column, row], cells);
-}
-
-/**
- * Add or update a cell in the dictionary.
- */
-export function Unchecked_setCellAt(columnIndex, rowIndex, c, cells) {
-    cells.set([columnIndex, rowIndex], c);
-}
-
-/**
- * Add a cell to the dictionary. If a cell already exists at the given position, it fails.
- */
-export function Unchecked_addCellAt(columnIndex, rowIndex, c, cells) {
-    addToDict(cells, [columnIndex, rowIndex], c);
-}
-
-export function Unchecked_moveCellTo(fromCol, fromRow, toCol, toRow, cells) {
-    const matchValue = Dictionary_tryFind([fromCol, fromRow], cells);
-    if (matchValue == null) {
-    }
-    else {
-        const c = matchValue;
-        cells.delete([fromCol, fromRow]);
-        const value_1 = Unchecked_setCellAt(toCol, toRow, c, cells);
-    }
-}
-
-export function Unchecked_removeHeader(index, headers) {
-    headers.splice(index, 1);
-}
-
-/**
- * Remove cells of one Column, change index of cells with higher index to index - 1
- */
-export function Unchecked_removeColumnCells(index, cells) {
-    let enumerator = getEnumerator(cells);
-    try {
-        while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-            const activePatternResult = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-            const c = activePatternResult[0][0] | 0;
-            if (c === index) {
-                cells.delete([c, activePatternResult[0][1]]);
-            }
-        }
-    }
-    finally {
-        disposeSafe(enumerator);
-    }
-}
-
-/**
- * Remove cells of one Column, change index of cells with higher index to index - 1
- */
-export function Unchecked_removeColumnCells_withIndexChange(index, columnCount, rowCount, cells) {
-    for (let col = index; col <= (columnCount - 1); col++) {
-        for (let row = 0; row <= (rowCount - 1); row++) {
-            if (col === index) {
-                cells.delete([col, row]);
-            }
-            else if (col > index) {
-                Unchecked_moveCellTo(col, row, col - 1, row, cells);
-            }
-        }
-    }
-}
-
-export function Unchecked_removeRowCells(rowIndex, cells) {
-    let enumerator = getEnumerator(cells);
-    try {
-        while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-            const activePatternResult = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-            const r = activePatternResult[0][1] | 0;
-            if (r === rowIndex) {
-                cells.delete([activePatternResult[0][0], r]);
-            }
-        }
-    }
-    finally {
-        disposeSafe(enumerator);
-    }
-}
-
-/**
- * Remove cells of one Row, change index of cells with higher index to index - 1
- */
-export function Unchecked_removeRowCells_withIndexChange(rowIndex, columnCount, rowCount, cells) {
-    for (let row = rowIndex; row <= (rowCount - 1); row++) {
-        for (let col = 0; col <= (columnCount - 1); col++) {
-            if (row === rowIndex) {
-                cells.delete([col, row]);
-            }
-            else if (row > rowIndex) {
-                Unchecked_moveCellTo(col, row, col, row - 1, cells);
-            }
-        }
-    }
-}
-
-/**
- * Get an empty cell fitting for related column header.
- * 
- * `columCellOption` is used to decide between `CompositeCell.Term` or `CompositeCell.Unitized`. `columCellOption` can be any other cell in the same column, preferably the first one.
- */
-export function Unchecked_getEmptyCellForHeader(header, columCellOption) {
-    const matchValue = header.IsTermColumn;
-    if (matchValue) {
-        let matchResult;
-        if (columCellOption == null) {
-            matchResult = 0;
-        }
-        else {
-            switch (columCellOption.tag) {
-                case 0: {
-                    matchResult = 0;
-                    break;
-                }
-                case 2: {
-                    matchResult = 1;
-                    break;
-                }
-                default:
-                    matchResult = 2;
-            }
-        }
-        switch (matchResult) {
-            case 0:
-                return CompositeCell.emptyTerm;
-            case 1:
-                return CompositeCell.emptyUnitized;
-            default:
-                throw new Error("[extendBodyCells] This should never happen, IsTermColumn header must be paired with either term or unitized cell.");
-        }
-    }
-    else {
-        return CompositeCell.emptyFreeText;
-    }
-}
-
-/**
- * 
- */
-export function Unchecked_addColumn(newHeader, newCells, index, forceReplace, onlyHeaders, headers, values) {
-    let numberOfNewColumns = 1;
-    let index_1 = index;
-    const hasDuplicateUnique = tryFindDuplicateUnique(newHeader, headers);
-    if (!forceReplace && (hasDuplicateUnique != null)) {
-        throw new Error(`Invalid new column \`${newHeader}\`. Table already contains header of the same type on index \`${value_9(hasDuplicateUnique)}\``);
-    }
-    if (hasDuplicateUnique != null) {
-        numberOfNewColumns = 0;
-        index_1 = (value_9(hasDuplicateUnique) | 0);
-    }
-    const matchValue = getColumnCount(headers) | 0;
-    const matchValue_1 = getRowCount(values) | 0;
-    const startColCount = matchValue | 0;
-    if (hasDuplicateUnique != null) {
-        Unchecked_removeHeader(index_1, headers);
-    }
-    headers.splice(index_1, 0, newHeader);
-    if ((index_1 < startColCount) && (hasDuplicateUnique == null)) {
-        const lastColumnIndex = max(startColCount - 1, 0) | 0;
-        for (let columnIndex = lastColumnIndex; columnIndex >= index_1; columnIndex--) {
-            for (let rowIndex = 0; rowIndex <= matchValue_1; rowIndex++) {
-                Unchecked_moveCellTo(columnIndex, rowIndex, columnIndex + numberOfNewColumns, rowIndex, values);
-            }
-        }
-    }
-    if (!onlyHeaders) {
-        if (hasDuplicateUnique != null) {
-            Unchecked_removeColumnCells(index_1, values);
-        }
-        const f = (index_1 >= startColCount) ? ((tupledArg) => ((values_1) => {
-            const value = addToDict(values_1, [tupledArg[0], tupledArg[1]], tupledArg[2]);
-        })) : ((tupledArg_1) => ((cells) => {
-            Unchecked_setCellAt(tupledArg_1[0], tupledArg_1[1], tupledArg_1[2], cells);
-        }));
-        iterateIndexed((rowIndex_3, cell_1) => {
-            f([index_1, rowIndex_3, cell_1])(values);
-        }, newCells);
-    }
-}
-
-export function Unchecked_fillMissingCells(headers, values) {
-    let col;
-    const rowCount = getRowCount(values) | 0;
-    const columnCount = getColumnCount(headers) | 0;
-    const columnKeyGroups = ofArray(Array_groupBy((tuple) => tuple[0], toArray(values.keys()), {
-        Equals: (x, y) => (x === y),
-        GetHashCode: numberHash,
-    }), {
-        Compare: comparePrimitives,
-    });
-    for (let columnIndex = 0; columnIndex <= (columnCount - 1); columnIndex++) {
-        const header = headers[columnIndex];
-        const matchValue = tryFind(columnIndex, columnKeyGroups);
-        if (matchValue == null) {
-            const defaultCell_1 = Unchecked_getEmptyCellForHeader(header, void 0);
-            for (let rowIndex_1 = 0; rowIndex_1 <= (rowCount - 1); rowIndex_1++) {
-                Unchecked_addCellAt(columnIndex, rowIndex_1, defaultCell_1, values);
-            }
-        }
-        else if ((col = matchValue, col.length === rowCount)) {
-            const col_1 = matchValue;
-        }
-        else {
-            const col_2 = matchValue;
-            const defaultCell = Unchecked_getEmptyCellForHeader(header, getItemFromDict(values, head_1(col_2)));
-            const rowKeys = ofArray_1(map((tuple_1) => tuple_1[1], col_2, Int32Array), {
-                Compare: comparePrimitives,
-            });
-            for (let rowIndex = 0; rowIndex <= (rowCount - 1); rowIndex++) {
-                if (!FSharpSet__Contains(rowKeys, rowIndex)) {
-                    Unchecked_addCellAt(columnIndex, rowIndex, defaultCell, values);
-                }
-            }
-        }
-    }
-}
-
-/**
- * Increases the table size to the given new row count and fills the new rows with the last value of the column
- */
-export function Unchecked_extendToRowCount(rowCount, headers, values) {
-    const columnCount = getColumnCount(headers) | 0;
-    const previousRowCount = getRowCount(values) | 0;
-    for (let columnIndex = 0; columnIndex <= (columnCount - 1); columnIndex++) {
-        const lastValue = getItemFromDict(values, [columnIndex, previousRowCount - 1]);
-        for (let rowIndex = previousRowCount - 1; rowIndex <= (rowCount - 1); rowIndex++) {
-            Unchecked_setCellAt(columnIndex, rowIndex, lastValue, values);
-        }
-    }
-}
-
-export function Unchecked_addRow(index, newCells, headers, values) {
-    const rowCount = getRowCount(values) | 0;
-    const columnCount = getColumnCount(headers) | 0;
-    let increaseRowIndices;
-    if (index < rowCount) {
-        const lastRowIndex = max(rowCount - 1, 0) | 0;
-        for (let rowIndex = lastRowIndex; rowIndex >= index; rowIndex--) {
-            for (let columnIndex = 0; columnIndex <= (columnCount - 1); columnIndex++) {
-                Unchecked_moveCellTo(columnIndex, rowIndex, columnIndex, rowIndex + 1, values);
-            }
-        }
-    }
-    else {
-        increaseRowIndices = void 0;
-    }
-    const setNewCells = iterateIndexed((columnIndex_1, cell) => {
-        Unchecked_setCellAt(columnIndex_1, index, cell, values);
-    }, newCells);
-}
-
-export function Unchecked_addRows(index, newRows, headers, values) {
-    const rowCount = getRowCount(values) | 0;
-    const columnCount = getColumnCount(headers) | 0;
-    const numNewRows = newRows.length | 0;
-    let increaseRowIndices;
-    if (index < rowCount) {
-        const lastRowIndex = max(rowCount - 1, 0) | 0;
-        for (let rowIndex = lastRowIndex; rowIndex >= index; rowIndex--) {
-            for (let columnIndex = 0; columnIndex <= (columnCount - 1); columnIndex++) {
-                Unchecked_moveCellTo(columnIndex, rowIndex, columnIndex, rowIndex + numNewRows, values);
-            }
-        }
-    }
-    else {
-        increaseRowIndices = void 0;
-    }
-    let currentRowIndex = index;
-    for (let idx = 0; idx <= (newRows.length - 1); idx++) {
-        const setNewCells = iterateIndexed((columnIndex_1, cell) => {
-            Unchecked_setCellAt(columnIndex_1, currentRowIndex, cell, values);
-        }, newRows[idx]);
-        currentRowIndex = ((currentRowIndex + 1) | 0);
-    }
-}
-
-/**
- * Convert a CompositeCell to a ISA Value and Unit tuple.
- */
-export function JsonTypes_valueOfCell(value) {
-    switch (value.tag) {
-        case 0:
-            return [new Value_1(0, [value.fields[0]]), void 0];
-        case 2:
-            return [Value_1.fromString(value.fields[0]), value.fields[1]];
-        default:
-            return [Value_1.fromString(value.fields[0]), void 0];
-    }
-}
-
-/**
- * Convert a CompositeHeader and Cell tuple to a ISA Component
- */
-export function JsonTypes_composeComponent(header, value) {
-    const patternInput = JsonTypes_valueOfCell(value);
-    return Component_fromOptions(patternInput[0], patternInput[1], header.ToTerm());
-}
-
-/**
- * Convert a CompositeHeader and Cell tuple to a ISA ProcessParameterValue
- */
-export function JsonTypes_composeParameterValue(header, value) {
-    const patternInput = JsonTypes_valueOfCell(value);
-    const p = ProtocolParameter.create(void 0, header.ToTerm());
-    return ProcessParameterValue.create(p, patternInput[0], unwrap(patternInput[1]));
-}
-
-/**
- * Convert a CompositeHeader and Cell tuple to a ISA FactorValue
- */
-export function JsonTypes_composeFactorValue(header, value) {
-    const patternInput = JsonTypes_valueOfCell(value);
-    return FactorValue_create_18335379(void 0, Factor.create(void 0, toString(header), header.ToTerm()), patternInput[0], unwrap(patternInput[1]));
-}
-
-/**
- * Convert a CompositeHeader and Cell tuple to a ISA MaterialAttributeValue
- */
-export function JsonTypes_composeCharacteristicValue(header, value) {
-    const patternInput = JsonTypes_valueOfCell(value);
-    return MaterialAttributeValue_create_7F714043(void 0, MaterialAttribute_create_Z6C54B221(void 0, header.ToTerm()), patternInput[0], unwrap(patternInput[1]));
-}
-
-/**
- * Convert a CompositeHeader and Cell tuple to a ISA ProcessInput
- */
-export function JsonTypes_composeProcessInput(header, value) {
-    let matchResult;
-    if (header.tag === 11) {
-        switch (header.fields[0].tag) {
-            case 0: {
-                matchResult = 0;
-                break;
-            }
-            case 1: {
-                matchResult = 1;
-                break;
-            }
-            case 5: {
-                matchResult = 2;
-                break;
-            }
-            case 4: {
-                matchResult = 3;
-                break;
-            }
-            case 2: {
-                matchResult = 4;
-                break;
-            }
-            case 3: {
-                matchResult = 5;
-                break;
-            }
-            default:
-                matchResult = 6;
-        }
-    }
-    else {
-        matchResult = 6;
-    }
-    switch (matchResult) {
-        case 0:
-            return ProcessInput_createSource_7888CE42(toString(value));
-        case 1:
-            return ProcessInput_createSample_Z6DF16D07(toString(value));
-        case 2:
-            return ProcessInput_createMaterial_2363974C(toString(value));
-        case 3:
-            return ProcessInput_createImageFile_Z721C83C5(toString(value));
-        case 4:
-            return ProcessInput_createRawData_Z721C83C5(toString(value));
-        case 5:
-            return ProcessInput_createDerivedData_Z721C83C5(toString(value));
-        default:
-            return toFail(printf("Could not parse input header %O"))(header);
-    }
-}
-
-/**
- * Convert a CompositeHeader and Cell tuple to a ISA ProcessOutput
- */
-export function JsonTypes_composeProcessOutput(header, value) {
-    let matchResult;
-    if (header.tag === 12) {
-        switch (header.fields[0].tag) {
-            case 1: {
-                matchResult = 0;
-                break;
-            }
-            case 5: {
-                matchResult = 1;
-                break;
-            }
-            case 4: {
-                matchResult = 2;
-                break;
-            }
-            case 2: {
-                matchResult = 3;
-                break;
-            }
-            case 3: {
-                matchResult = 4;
-                break;
-            }
-            default:
-                matchResult = 5;
-        }
-    }
-    else {
-        matchResult = 5;
-    }
-    switch (matchResult) {
-        case 0:
-            return ProcessOutput_createSample_Z6DF16D07(toString(value));
-        case 1:
-            return ProcessOutput_createMaterial_2363974C(toString(value));
-        case 2:
-            return ProcessOutput_createImageFile_Z721C83C5(toString(value));
-        case 3:
-            return ProcessOutput_createRawData_Z721C83C5(toString(value));
-        case 4:
-            return ProcessOutput_createDerivedData_Z721C83C5(toString(value));
-        default:
-            return toFail(printf("Could not parse output header %O"))(header);
-    }
-}
-
-/**
- * Convert an ISA Value and Unit tuple to a CompositeCell
- */
-export function JsonTypes_cellOfValue(value, unit) {
-    const value_2 = defaultArg(value, new Value_1(3, [""]));
-    switch (value_2.tag) {
-        case 3:
-            if (unit != null) {
-                const u = unit;
-                return new CompositeCell(2, [value_2.fields[0], u]);
-            }
-            else {
-                return new CompositeCell(1, [value_2.fields[0]]);
-            }
-        case 2:
-            if (unit == null) {
-                return new CompositeCell(1, [value_2.fields[0].toString()]);
-            }
-            else {
-                const u_1 = unit;
-                return new CompositeCell(2, [value_2.fields[0].toString(), u_1]);
-            }
-        case 1:
-            if (unit == null) {
-                return new CompositeCell(1, [int32ToString(value_2.fields[0])]);
-            }
-            else {
-                const u_2 = unit;
-                return new CompositeCell(2, [int32ToString(value_2.fields[0]), u_2]);
-            }
-        default:
-            if (unit == null) {
-                return new CompositeCell(0, [value_2.fields[0]]);
-            }
-            else {
-                return toFail(printf("Could not parse value %O with unit %O"))(value_2)(unit);
-            }
-    }
-}
-
-/**
- * Convert an ISA Component to a CompositeHeader and Cell tuple
- */
-export function JsonTypes_decomposeComponent(c) {
-    return [new CompositeHeader(0, [value_9(c.ComponentType)]), JsonTypes_cellOfValue(c.ComponentValue, c.ComponentUnit)];
-}
-
-/**
- * Convert an ISA ProcessParameterValue to a CompositeHeader and Cell tuple
- */
-export function JsonTypes_decomposeParameterValue(ppv) {
-    return [new CompositeHeader(3, [value_9(value_9(ppv.Category).ParameterName)]), JsonTypes_cellOfValue(ppv.Value, ppv.Unit)];
-}
-
-/**
- * Convert an ISA FactorValue to a CompositeHeader and Cell tuple
- */
-export function JsonTypes_decomposeFactorValue(fv) {
-    return [new CompositeHeader(2, [value_9(value_9(fv.Category).FactorType)]), JsonTypes_cellOfValue(fv.Value, fv.Unit)];
-}
-
-/**
- * Convert an ISA MaterialAttributeValue to a CompositeHeader and Cell tuple
- */
-export function JsonTypes_decomposeCharacteristicValue(cv) {
-    return [new CompositeHeader(1, [value_9(value_9(cv.Category).CharacteristicType)]), JsonTypes_cellOfValue(cv.Value, cv.Unit)];
-}
-
-/**
- * Convert an ISA ProcessOutput to a CompositeHeader and Cell tuple
- */
-export function JsonTypes_decomposeProcessInput(pi) {
-    switch (pi.tag) {
-        case 1:
-            return [new CompositeHeader(11, [new IOType(1, [])]), new CompositeCell(1, [defaultArg(pi.fields[0].Name, "")])];
-        case 3:
-            return [new CompositeHeader(11, [new IOType(5, [])]), new CompositeCell(1, [defaultArg(pi.fields[0].Name, "")])];
-        case 2: {
-            const d = pi.fields[0];
-            const dataType = value_9(d.DataType);
-            switch (dataType.tag) {
-                case 0:
-                    return [new CompositeHeader(11, [new IOType(2, [])]), new CompositeCell(1, [defaultArg(d.Name, "")])];
-                case 1:
-                    return [new CompositeHeader(11, [new IOType(3, [])]), new CompositeCell(1, [defaultArg(d.Name, "")])];
-                default:
-                    return [new CompositeHeader(11, [new IOType(4, [])]), new CompositeCell(1, [defaultArg(d.Name, "")])];
-            }
-        }
-        default:
-            return [new CompositeHeader(11, [new IOType(0, [])]), new CompositeCell(1, [defaultArg(pi.fields[0].Name, "")])];
-    }
-}
-
-/**
- * Convert an ISA ProcessOutput to a CompositeHeader and Cell tuple
- */
-export function JsonTypes_decomposeProcessOutput(po) {
-    switch (po.tag) {
-        case 2:
-            return [new CompositeHeader(12, [new IOType(5, [])]), new CompositeCell(1, [defaultArg(po.fields[0].Name, "")])];
-        case 1: {
-            const d = po.fields[0];
-            const dataType = value_9(d.DataType);
-            switch (dataType.tag) {
-                case 0:
-                    return [new CompositeHeader(12, [new IOType(2, [])]), new CompositeCell(1, [defaultArg(d.Name, "")])];
-                case 1:
-                    return [new CompositeHeader(12, [new IOType(3, [])]), new CompositeCell(1, [defaultArg(d.Name, "")])];
-                default:
-                    return [new CompositeHeader(12, [new IOType(4, [])]), new CompositeCell(1, [defaultArg(d.Name, "")])];
-            }
-        }
-        default:
-            return [new CompositeHeader(12, [new IOType(1, [])]), new CompositeCell(1, [defaultArg(po.fields[0].Name, "")])];
-    }
-}
-
-/**
- * If the headers of a node depict a component, returns a function for parsing the values of the matrix to the values of this component
- */
-export function ProcessParsing_tryComponentGetter(generalI, valueI, valueHeader) {
-    if (valueHeader.tag === 0) {
-        const cat = new CompositeHeader(0, [ARCtrl_ISA_OntologyAnnotation__OntologyAnnotation_SetColumnIndex_Z524259A4(valueHeader.fields[0], valueI)]);
-        return (matrix) => ((i) => JsonTypes_composeComponent(cat, getItemFromDict(matrix, [generalI, i])));
-    }
-    else {
-        return void 0;
-    }
-}
-
-/**
- * If the headers of a node depict a protocolType, returns a function for parsing the values of the matrix to the values of this type
- */
-export function ProcessParsing_tryParameterGetter(generalI, valueI, valueHeader) {
-    if (valueHeader.tag === 3) {
-        const cat = new CompositeHeader(3, [ARCtrl_ISA_OntologyAnnotation__OntologyAnnotation_SetColumnIndex_Z524259A4(valueHeader.fields[0], valueI)]);
-        return (matrix) => ((i) => JsonTypes_composeParameterValue(cat, getItemFromDict(matrix, [generalI, i])));
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryFactorGetter(generalI, valueI, valueHeader) {
-    if (valueHeader.tag === 2) {
-        const cat = new CompositeHeader(2, [ARCtrl_ISA_OntologyAnnotation__OntologyAnnotation_SetColumnIndex_Z524259A4(valueHeader.fields[0], valueI)]);
-        return (matrix) => ((i) => JsonTypes_composeFactorValue(cat, getItemFromDict(matrix, [generalI, i])));
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryCharacteristicGetter(generalI, valueI, valueHeader) {
-    if (valueHeader.tag === 1) {
-        const cat = new CompositeHeader(1, [ARCtrl_ISA_OntologyAnnotation__OntologyAnnotation_SetColumnIndex_Z524259A4(valueHeader.fields[0], valueI)]);
-        return (matrix) => ((i) => JsonTypes_composeCharacteristicValue(cat, getItemFromDict(matrix, [generalI, i])));
-    }
-    else {
-        return void 0;
-    }
-}
-
-/**
- * If the headers of a node depict a protocolType, returns a function for parsing the values of the matrix to the values of this type
- */
-export function ProcessParsing_tryGetProtocolTypeGetter(generalI, header) {
-    if (header.tag === 4) {
-        return (matrix) => ((i) => getItemFromDict(matrix, [generalI, i]).AsTerm);
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryGetProtocolREFGetter(generalI, header) {
-    if (header.tag === 8) {
-        return (matrix) => ((i) => getItemFromDict(matrix, [generalI, i]).AsFreeText);
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryGetProtocolDescriptionGetter(generalI, header) {
-    if (header.tag === 5) {
-        return (matrix) => ((i) => getItemFromDict(matrix, [generalI, i]).AsFreeText);
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryGetProtocolURIGetter(generalI, header) {
-    if (header.tag === 6) {
-        return (matrix) => ((i) => getItemFromDict(matrix, [generalI, i]).AsFreeText);
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryGetProtocolVersionGetter(generalI, header) {
-    if (header.tag === 7) {
-        return (matrix) => ((i) => getItemFromDict(matrix, [generalI, i]).AsFreeText);
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryGetInputGetter(generalI, header) {
-    if (header.tag === 11) {
-        return (matrix) => ((i) => JsonTypes_composeProcessInput(header, getItemFromDict(matrix, [generalI, i])));
-    }
-    else {
-        return void 0;
-    }
-}
-
-export function ProcessParsing_tryGetOutputGetter(generalI, header) {
-    if (header.tag === 12) {
-        return (matrix) => ((i) => JsonTypes_composeProcessOutput(header, getItemFromDict(matrix, [generalI, i])));
-    }
-    else {
-        return void 0;
-    }
-}
-
-/**
- * Given the header sequence of an ArcTable, returns a function for parsing each row of the table to a process
- */
-export function ProcessParsing_getProcessGetter(processNameRoot, headers) {
-    const headers_1 = indexed(headers);
-    const valueHeaders = toList(indexed(filter((arg) => arg[1].IsCvParamColumn, headers_1)));
-    const charGetters = choose((tupledArg) => {
-        const _arg = tupledArg[1];
-        return ProcessParsing_tryCharacteristicGetter(_arg[0], tupledArg[0], _arg[1]);
-    }, valueHeaders);
-    const factorValueGetters = choose((tupledArg_1) => {
-        const _arg_1 = tupledArg_1[1];
-        return ProcessParsing_tryFactorGetter(_arg_1[0], tupledArg_1[0], _arg_1[1]);
-    }, valueHeaders);
-    const parameterValueGetters = choose((tupledArg_2) => {
-        const _arg_2 = tupledArg_2[1];
-        return ProcessParsing_tryParameterGetter(_arg_2[0], tupledArg_2[0], _arg_2[1]);
-    }, valueHeaders);
-    const componentGetters = choose((tupledArg_3) => {
-        const _arg_3 = tupledArg_3[1];
-        return ProcessParsing_tryComponentGetter(_arg_3[0], tupledArg_3[0], _arg_3[1]);
-    }, valueHeaders);
-    const protocolTypeGetter = tryPick((tupledArg_4) => ProcessParsing_tryGetProtocolTypeGetter(tupledArg_4[0], tupledArg_4[1]), headers_1);
-    const protocolREFGetter = tryPick((tupledArg_5) => ProcessParsing_tryGetProtocolREFGetter(tupledArg_5[0], tupledArg_5[1]), headers_1);
-    const protocolDescriptionGetter = tryPick((tupledArg_6) => ProcessParsing_tryGetProtocolDescriptionGetter(tupledArg_6[0], tupledArg_6[1]), headers_1);
-    const protocolURIGetter = tryPick((tupledArg_7) => ProcessParsing_tryGetProtocolURIGetter(tupledArg_7[0], tupledArg_7[1]), headers_1);
-    const protocolVersionGetter = tryPick((tupledArg_8) => ProcessParsing_tryGetProtocolVersionGetter(tupledArg_8[0], tupledArg_8[1]), headers_1);
-    let inputGetter_1;
-    const matchValue = tryPick((tupledArg_9) => ProcessParsing_tryGetInputGetter(tupledArg_9[0], tupledArg_9[1]), headers_1);
-    if (matchValue == null) {
-        inputGetter_1 = ((matrix_1) => ((i_1) => singleton(new ProcessInput(0, [Source_create_7A281ED9(void 0, `${processNameRoot}_Input_${i_1}`, toList(map_1((f_1) => f_1(matrix_1)(i_1), charGetters)))]))));
-    }
-    else {
-        const inputGetter = matchValue;
-        inputGetter_1 = ((matrix) => ((i) => {
-            const chars = toList(map_1((f) => f(matrix)(i), charGetters));
-            const input = inputGetter(matrix)(i);
-            return (!(ProcessInput__isSample(input) ? true : ProcessInput__isSource(input)) && !isEmpty(chars)) ? ofArray_2([input, ProcessInput_createSample_Z6DF16D07(ProcessInput__get_Name(input), chars)]) : singleton(ProcessInput_setCharacteristicValues(chars, input));
-        }));
-    }
-    let outputGetter_1;
-    const matchValue_1 = tryPick((tupledArg_10) => ProcessParsing_tryGetOutputGetter(tupledArg_10[0], tupledArg_10[1]), headers_1);
-    if (matchValue_1 == null) {
-        outputGetter_1 = ((matrix_3) => ((i_3) => singleton(new ProcessOutput(0, [Sample_create_E50ED22(void 0, `${processNameRoot}_Output_${i_3}`, void 0, toList(map_1((f_3) => f_3(matrix_3)(i_3), factorValueGetters)))]))));
-    }
-    else {
-        const outputGetter = matchValue_1;
-        outputGetter_1 = ((matrix_2) => ((i_2) => {
-            const factors = toList(map_1((f_2) => f_2(matrix_2)(i_2), factorValueGetters));
-            const output = outputGetter(matrix_2)(i_2);
-            return (!ProcessOutput__isSample(output) && !isEmpty(factors)) ? ofArray_2([output, ProcessOutput_createSample_Z6DF16D07(ProcessOutput__get_Name(output), void 0, factors)]) : singleton(ProcessOutput_setFactorValues(factors, output));
-        }));
-    }
-    return (matrix_4) => ((i_4) => {
-        const pn = map_2((p) => Process_composeName(p, i_4), Option_fromValueWithDefault("", processNameRoot));
-        const paramvalues = Option_fromValueWithDefault(empty(), map_3((f_4) => f_4(matrix_4)(i_4), parameterValueGetters));
-        const parameters = map_2((list_5) => map_3((pv) => value_9(pv.Category), list_5), paramvalues);
-        let protocol;
-        const p_1 = Protocol_make(void 0, map_2((f_5) => f_5(matrix_4)(i_4), protocolREFGetter), map_2((f_6) => f_6(matrix_4)(i_4), protocolTypeGetter), map_2((f_7) => f_7(matrix_4)(i_4), protocolDescriptionGetter), map_2((f_8) => f_8(matrix_4)(i_4), protocolURIGetter), map_2((f_9) => f_9(matrix_4)(i_4), protocolVersionGetter), parameters, Option_fromValueWithDefault(empty(), map_3((f_10) => f_10(matrix_4)(i_4), componentGetters)), void 0);
-        let matchResult;
-        if (p_1.Name == null) {
-            if (p_1.ProtocolType == null) {
-                if (p_1.Description == null) {
-                    if (p_1.Uri == null) {
-                        if (p_1.Version == null) {
-                            if (p_1.Components == null) {
-                                matchResult = 0;
-                            }
-                            else {
-                                matchResult = 1;
-                            }
-                        }
-                        else {
-                            matchResult = 1;
-                        }
-                    }
-                    else {
-                        matchResult = 1;
-                    }
-                }
-                else {
-                    matchResult = 1;
-                }
-            }
-            else {
-                matchResult = 1;
-            }
-        }
-        else {
-            matchResult = 1;
-        }
-        switch (matchResult) {
-            case 0: {
-                protocol = void 0;
-                break;
-            }
-            default:
-                protocol = p_1;
-        }
-        let patternInput;
-        const inputs = inputGetter_1(matrix_4)(i_4);
-        const outputs = outputGetter_1(matrix_4)(i_4);
-        patternInput = (((length(inputs) === 1) && (length(outputs) === 2)) ? [ofArray_2([item(0, inputs), item(0, inputs)]), outputs] : (((length(inputs) === 2) && (length(outputs) === 1)) ? [inputs, ofArray_2([item(0, outputs), item(0, outputs)])] : [inputs, outputs]));
-        return Process_make(void 0, pn, protocol, paramvalues, void 0, void 0, void 0, void 0, patternInput[0], patternInput[1], void 0);
-    });
-}
-
-/**
- * Groups processes by their name, or by the name of the protocol they execute
- * 
- * Process names are taken from the Worksheet name and numbered: SheetName_1, SheetName_2, etc.
- * 
- * This function decomposes this name into a root name and a number, and groups processes by root name.
- */
-export function ProcessParsing_groupProcesses(ps) {
-    return List_groupBy((x) => {
-        if ((x.Name != null) && (Process_decomposeName_Z721C83C5(value_9(x.Name))[1] != null)) {
-            return Process_decomposeName_Z721C83C5(value_9(x.Name))[0];
-        }
-        else if ((x.ExecutesProtocol != null) && (value_9(x.ExecutesProtocol).Name != null)) {
-            return value_9(value_9(x.ExecutesProtocol).Name);
-        }
-        else if ((x.Name != null) && (value_9(x.Name).indexOf("_") >= 0)) {
-            const lastUnderScoreIndex = value_9(x.Name).lastIndexOf("_") | 0;
-            return remove(value_9(x.Name), lastUnderScoreIndex);
-        }
-        else if (x.Name != null) {
-            return value_9(x.Name);
-        }
-        else if ((x.ExecutesProtocol != null) && (value_9(x.ExecutesProtocol).ID != null)) {
-            return value_9(value_9(x.ExecutesProtocol).ID);
-        }
-        else {
-            return createMissingIdentifier();
-        }
-    }, ps, {
-        Equals: (x_1, y) => (x_1 === y),
-        GetHashCode: stringHash,
-    });
-}
-
-/**
- * Merges processes with the same name, protocol and param values
- */
-export function ProcessParsing_mergeIdenticalProcesses(processes) {
-    const l = List_groupBy((x) => {
-        if ((x.Name != null) && (Process_decomposeName_Z721C83C5(value_9(x.Name))[1] != null)) {
-            return [Process_decomposeName_Z721C83C5(value_9(x.Name))[0], x.ExecutesProtocol, map_2(HashCodes_boxHashSeq, x.ParameterValues)];
-        }
-        else if ((x.ExecutesProtocol != null) && (value_9(x.ExecutesProtocol).Name != null)) {
-            return [value_9(value_9(x.ExecutesProtocol).Name), x.ExecutesProtocol, map_2(HashCodes_boxHashSeq, x.ParameterValues)];
-        }
-        else {
-            return [createMissingIdentifier(), x.ExecutesProtocol, map_2(HashCodes_boxHashSeq, x.ParameterValues)];
-        }
-    }, processes, {
-        Equals: equalArrays,
-        GetHashCode: arrayHash,
-    });
-    return mapIndexed((i, tupledArg) => {
-        const _arg = tupledArg[0];
-        const processes_1 = tupledArg[1];
-        const n = _arg[0];
-        const pVs = item(0, processes_1).ParameterValues;
-        const inputs = Option_fromValueWithDefault(empty(), collect((p) => defaultArg(p.Inputs, empty()), processes_1));
-        const outputs = Option_fromValueWithDefault(empty(), collect((p_1) => defaultArg(p_1.Outputs, empty()), processes_1));
-        return Process_create_Z42860F3E(void 0, (length(l) > 1) ? Process_composeName(n, i) : n, _arg[1], pVs, void 0, void 0, void 0, void 0, inputs, outputs);
-    }, l);
-}
-
-export function ProcessParsing_processToRows(p) {
-    let list_3;
-    const pvs = map_3((ppv) => [JsonTypes_decomposeParameterValue(ppv), tryGetParameterColumnIndex(ppv)], defaultArg(p.ParameterValues, empty()));
-    let components;
-    const matchValue = p.ExecutesProtocol;
-    components = ((matchValue == null) ? empty() : map_3((ppv_1) => [JsonTypes_decomposeComponent(ppv_1), tryGetComponentIndex(ppv_1)], defaultArg(matchValue.Components, empty())));
-    let protVals;
-    const matchValue_1 = p.ExecutesProtocol;
-    if (matchValue_1 == null) {
-        protVals = empty();
-    }
-    else {
-        const prot_1 = matchValue_1;
-        protVals = toList(delay(() => append((prot_1.Name != null) ? singleton_1([new CompositeHeader(8, []), new CompositeCell(1, [value_9(prot_1.Name)])]) : empty_1(), delay(() => append((prot_1.ProtocolType != null) ? singleton_1([new CompositeHeader(4, []), new CompositeCell(0, [value_9(prot_1.ProtocolType)])]) : empty_1(), delay(() => append((prot_1.Description != null) ? singleton_1([new CompositeHeader(5, []), new CompositeCell(1, [value_9(prot_1.Description)])]) : empty_1(), delay(() => append((prot_1.Uri != null) ? singleton_1([new CompositeHeader(6, []), new CompositeCell(1, [value_9(prot_1.Uri)])]) : empty_1(), delay(() => ((prot_1.Version != null) ? singleton_1([new CompositeHeader(7, []), new CompositeCell(1, [value_9(prot_1.Version)])]) : empty_1())))))))))));
-    }
-    return map_3((tupledArg_1) => {
-        const ios = tupledArg_1[1];
-        const inputForCharas = defaultArg(tryPick_1((tupledArg_2) => {
-            const i_2 = tupledArg_2[0];
-            if (ProcessInput__isSource(i_2) ? true : ProcessInput__isSample(i_2)) {
-                return i_2;
-            }
-            else {
-                return void 0;
-            }
-        }, ios), head(ios)[0]);
-        const inputForType = defaultArg(tryPick_1((tupledArg_3) => {
-            const i_3 = tupledArg_3[0];
-            if (ProcessInput__isData(i_3) ? true : ProcessInput__isMaterial(i_3)) {
-                return i_3;
-            }
-            else {
-                return void 0;
-            }
-        }, ios), head(ios)[0]);
-        const chars = map_3((cv) => [JsonTypes_decomposeCharacteristicValue(cv), tryGetCharacteristicColumnIndex(cv)], ProcessInput_getCharacteristicValues_102B6859(inputForCharas));
-        const outputForFactors = defaultArg(tryPick_1((tupledArg_4) => {
-            const o_4 = tupledArg_4[1];
-            if (ProcessOutput__isSample(o_4)) {
-                return o_4;
-            }
-            else {
-                return void 0;
-            }
-        }, ios), head(ios)[1]);
-        const outputForType = defaultArg(tryPick_1((tupledArg_5) => {
-            const o_5 = tupledArg_5[1];
-            if (ProcessOutput__isData(o_5) ? true : ProcessOutput__isMaterial(o_5)) {
-                return o_5;
-            }
-            else {
-                return void 0;
-            }
-        }, ios), head(ios)[1]);
-        const vals = map_3((tuple_5) => tuple_5[0], sortBy((arg) => defaultArg(arg[1], 10000), append_1(chars, append_1(components, append_1(pvs, map_3((fv) => [JsonTypes_decomposeFactorValue(fv), tryGetFactorColumnIndex(fv)], ProcessOutput_getFactorValues_11830B70(outputForFactors))))), {
-            Compare: comparePrimitives,
-        }));
-        return toList(delay(() => append(singleton_1(JsonTypes_decomposeProcessInput(inputForType)), delay(() => append(protVals, delay(() => append(vals, delay(() => singleton_1(JsonTypes_decomposeProcessOutput(outputForType))))))))));
-    }, List_groupBy((tupledArg) => [ProcessInput__get_Name(tupledArg[0]), ProcessOutput__get_Name(tupledArg[1])], (list_3 = defaultArg(p.Outputs, empty()), zip(defaultArg(p.Inputs, empty()), list_3)), {
-        Equals: equalArrays,
-        GetHashCode: arrayHash,
-    }));
-}
-
-/**
- * Returns true, if two composite headers share the same main header string
- */
-export function ProcessParsing_compositeHeaderEqual(ch1, ch2) {
-    return toString(ch1) === toString(ch2);
-}
-
-/**
- * From a list of rows consisting of headers and values, creates a list of combined headers and the values as a sparse matrix
- * 
- * The values cant be directly taken as they are, as there is no guarantee that the headers are aligned
- * 
- * This function aligns the headers and values by the main header string
- * 
- * If keepOrder is true, the order of values per row is kept intact, otherwise the values are allowed to be reordered
- */
-export function ProcessParsing_alignByHeaders(keepOrder, rows) {
-    const headers = [];
-    const values = new Dictionary([], {
-        Equals: equalArrays,
-        GetHashCode: arrayHash,
-    });
-    const loop = (colI_mut, rows_2_mut) => {
-        loop:
-        while (true) {
-            const colI = colI_mut, rows_2 = rows_2_mut;
-            if (!exists((arg) => !isEmpty(arg), rows_2)) {
-                return [headers, values];
-            }
-            else {
-                const firstElem = pick((l) => (isEmpty(l) ? void 0 : head(l)), rows_2)[0];
-                void (headers.push(firstElem));
-                colI_mut = (colI + 1);
-                rows_2_mut = mapIndexed((rowI, l_1) => {
-                    if (keepOrder) {
-                        if (!isEmpty(l_1)) {
-                            if (ProcessParsing_compositeHeaderEqual(head(l_1)[0], firstElem)) {
-                                addToDict(values, [colI, rowI], head(l_1)[1]);
-                                return tail_1(l_1);
-                            }
-                            else {
-                                return l_1;
-                            }
-                        }
-                        else {
-                            return empty();
-                        }
-                    }
-                    else {
-                        const patternInput = List_tryPickAndRemove((tupledArg) => {
-                            if (ProcessParsing_compositeHeaderEqual(tupledArg[0], firstElem)) {
-                                return tupledArg[1];
-                            }
-                            else {
-                                return void 0;
-                            }
-                        }, l_1);
-                        const newL = patternInput[1];
-                        const firstMatch = patternInput[0];
-                        if (firstMatch == null) {
-                            return newL;
-                        }
-                        else {
-                            addToDict(values, [colI, rowI], firstMatch);
-                            return newL;
-                        }
-                    }
-                }, rows_2);
-                continue loop;
-            }
-            break;
-        }
-    };
-    return loop(0, rows);
-}
-