@nfdi4plants/arctrl 3.0.0-beta.2 → 3.0.0-beta.3

package/dist/ts/cjs/ts/Core/Table/ArcTables.js

@@ -1,476 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.ArcTables = void 0;
-exports.ArcTablesAux_tryFindIndexByTableName = ArcTablesAux_tryFindIndexByTableName;
-exports.ArcTablesAux_findIndexByTableName = ArcTablesAux_findIndexByTableName;
-exports.ArcTablesAux_getIOMap = ArcTablesAux_getIOMap;
-exports.ArcTablesAux_applyIOMap = ArcTablesAux_applyIOMap;
-exports.ArcTablesAux_SanityChecks_validateSheetIndex = ArcTablesAux_SanityChecks_validateSheetIndex;
-exports.ArcTablesAux_SanityChecks_validateNamesUnique = ArcTablesAux_SanityChecks_validateNamesUnique;
-exports.ArcTablesAux_SanityChecks_validateNewNameUnique = ArcTablesAux_SanityChecks_validateNewNameUnique;
-exports.ArcTablesAux_SanityChecks_validateNewNameAtUnique = ArcTablesAux_SanityChecks_validateNewNameAtUnique;
-exports.ArcTablesAux_SanityChecks_validateNewNamesUnique = ArcTablesAux_SanityChecks_validateNewNamesUnique;
-exports.ArcTables_$reflection = ArcTables_$reflection;
-exports.ArcTables_$ctor_Z420F2E1A = ArcTables_$ctor_Z420F2E1A;
-const Seq_js_1 = require("@fable-org/fable-library-js/Seq.js");
-const ArcTable_js_1 = require("./ArcTable.js");
-const Option_js_1 = require("@fable-org/fable-library-js/Option.js");
-const CompositeHeader_js_1 = require("./CompositeHeader.js");
-const Util_js_1 = require("@fable-org/fable-library-js/Util.js");
-const Collections_js_1 = require("../Helper/Collections.js");
-const MapUtil_js_1 = require("@fable-org/fable-library-js/MapUtil.js");
-const Seq2_js_1 = require("@fable-org/fable-library-js/Seq2.js");
-const Set_js_1 = require("@fable-org/fable-library-js/Set.js");
-const Array_js_1 = require("@fable-org/fable-library-js/Array.js");
-const Map_js_1 = require("@fable-org/fable-library-js/Map.js");
-const Reflection_js_1 = require("@fable-org/fable-library-js/Reflection.js");
-/**
- * If a table with the given name exists in the TableList, returns it, else returns None.
- */
-function ArcTablesAux_tryFindIndexByTableName(name, tables) {
-    return (0, Seq_js_1.tryFindIndex)((t) => (t.Name === name), tables);
-}
-/**
- * If a table with the given name exists in the TableList, returns it, else fails.
- */
-function ArcTablesAux_findIndexByTableName(name, tables) {
-    const matchValue = (0, Seq_js_1.tryFindIndex)((t) => (t.Name === name), tables);
-    if (matchValue == null) {
-        throw new Error(`Unable to find table with name '${name}'!`);
-    }
-    else {
-        return (0, Option_js_1.value)(matchValue) | 0;
-    }
-}
-/**
- * Collects the IOType of each distinct entity in the tables. Then merges the IOType of each entity according to the IOType.Merge function.
- */
-function ArcTablesAux_getIOMap(tables) {
-    const mappings = new Map([]);
-    const includeInMap = (name, ioType) => {
-        if (name !== "") {
-            const matchValue = (0, Collections_js_1.Dictionary_tryFind)(name, mappings);
-            if (matchValue == null) {
-                (0, MapUtil_js_1.addToDict)(mappings, name, ioType);
-            }
-            else {
-                const oldIOType = (0, Option_js_1.value)(matchValue);
-                const newIOType = oldIOType.Merge(ioType);
-                mappings.set(name, newIOType);
-            }
-        }
-    };
-    let enumerator = (0, Util_js_1.getEnumerator)(tables);
-    try {
-        while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-            const table = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-            const matchValue_1 = table.TryGetInputColumn();
-            if (matchValue_1 == null) {
-            }
-            else {
-                const ic = (0, Option_js_1.value)(matchValue_1);
-                const ioType_1 = (0, Option_js_1.value)(ic.Header.TryInput());
-                (0, Collections_js_1.ResizeArray_iter)((c) => {
-                    includeInMap(c.ToFreeTextCell().AsFreeText, ioType_1);
-                }, ic.Cells);
-            }
-            const matchValue_2 = table.TryGetOutputColumn();
-            if (matchValue_2 == null) {
-            }
-            else {
-                const oc = (0, Option_js_1.value)(matchValue_2);
-                const ioType_2 = (0, Option_js_1.value)(oc.Header.TryOutput());
-                (0, Collections_js_1.ResizeArray_iter)((c_1) => {
-                    includeInMap(c_1.ToFreeTextCell().AsFreeText, ioType_2);
-                }, oc.Cells);
-            }
-        }
-    }
-    finally {
-        (0, Util_js_1.disposeSafe)(enumerator);
-    }
-    return mappings;
-}
-function ArcTablesAux_applyIOMap(map, tables) {
-    let enumerator = (0, Util_js_1.getEnumerator)(tables);
-    try {
-        while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-            const table = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-            const matchValue = table.TryGetInputColumn();
-            if (matchValue == null) {
-            }
-            else {
-                const ic = (0, Option_js_1.value)(matchValue);
-                const index = (0, Seq_js_1.findIndex)((x) => x.isInput, table.Headers) | 0;
-                const newIOType = (0, Collections_js_1.ResizeArray_fold)((io, c) => {
-                    const matchValue_1 = (0, Collections_js_1.Dictionary_tryFind)(c.ToFreeTextCell().AsFreeText, map);
-                    if (matchValue_1 == null) {
-                        return io;
-                    }
-                    else {
-                        const newIO = (0, Option_js_1.value)(matchValue_1);
-                        return io.Merge(newIO);
-                    }
-                }, (0, Option_js_1.value)(ic.Header.TryInput()), ic.Cells);
-                table.UpdateHeader(index, (0, CompositeHeader_js_1.CompositeHeader_Input)(newIOType));
-            }
-            const matchValue_2 = table.TryGetOutputColumn();
-            if (matchValue_2 == null) {
-            }
-            else {
-                const oc = (0, Option_js_1.value)(matchValue_2);
-                const index_1 = (0, Seq_js_1.findIndex)((x_1) => x_1.isOutput, table.Headers) | 0;
-                const newIOType_1 = (0, Collections_js_1.ResizeArray_fold)((io_1, c_1) => {
-                    const matchValue_3 = (0, Collections_js_1.Dictionary_tryFind)(c_1.ToFreeTextCell().AsFreeText, map);
-                    if (matchValue_3 == null) {
-                        return io_1;
-                    }
-                    else {
-                        const newIO_1 = (0, Option_js_1.value)(matchValue_3);
-                        return io_1.Merge(newIO_1);
-                    }
-                }, (0, Option_js_1.value)(oc.Header.TryOutput()), oc.Cells);
-                table.UpdateHeader(index_1, (0, CompositeHeader_js_1.CompositeHeader_Output)(newIOType_1));
-            }
-        }
-    }
-    finally {
-        (0, Util_js_1.disposeSafe)(enumerator);
-    }
-}
-/**
- * Fails, if the index is out of range of the Tables collection. When allowAppend is set to true, it may be out of range by at most 1.
- */
-function ArcTablesAux_SanityChecks_validateSheetIndex(index, allowAppend, sheets) {
-    let x, y;
-    if (index < 0) {
-        throw new Error("Cannot insert ArcTable at index < 0.");
-    }
-    if ((x = (index | 0), (y = (sheets.length | 0), allowAppend ? ((0, Util_js_1.compare)(x, y) > 0) : ((0, Util_js_1.compare)(x, y) >= 0)))) {
-        throw new Error(`Specified index is out of range! Assay contains only ${sheets.length} tables.`);
-    }
-}
-/**
- * Fails, if two tables have the same name.
- */
-function ArcTablesAux_SanityChecks_validateNamesUnique(names) {
-    if (!((0, Seq_js_1.length)(names) === (0, Seq_js_1.length)((0, Seq2_js_1.distinct)(names, {
-        Equals: (x, y) => (x === y),
-        GetHashCode: Util_js_1.stringHash,
-    })))) {
-        throw new Error("Cannot add multiple tables with the same name! Table names inside one assay must be unqiue");
-    }
-}
-/**
- * Fails, if the name is already used by another table.
- */
-function ArcTablesAux_SanityChecks_validateNewNameUnique(newName, existingNames) {
-    const matchValue = (0, Seq_js_1.tryFindIndex)((x) => (x === newName), existingNames);
-    if (matchValue == null) {
-    }
-    else {
-        throw new Error(`Cannot create table with name ${newName}, as table names must be unique and table at index ${(0, Option_js_1.value)(matchValue)} has the same name.`);
-    }
-}
-/**
- * Fails, if the name is already used by another table at a different position.
- *
- * Does not fail, if the newName is the same as the one in the given position.
- */
-function ArcTablesAux_SanityChecks_validateNewNameAtUnique(index, newName, existingNames) {
-    const matchValue = (0, Seq_js_1.tryFindIndex)((x) => (x === newName), existingNames);
-    if (matchValue == null) {
-    }
-    else if (index === (0, Option_js_1.value)(matchValue)) {
-        const i_1 = (0, Option_js_1.value)(matchValue) | 0;
-    }
-    else {
-        const i_2 = (0, Option_js_1.value)(matchValue) | 0;
-        throw new Error(`Cannot create table with name ${newName}, as table names must be unique and table at index ${i_2} has the same name.`);
-    }
-}
-function ArcTablesAux_SanityChecks_validateNewNamesUnique(newNames, existingNames) {
-    ArcTablesAux_SanityChecks_validateNamesUnique(newNames);
-    const same = (0, Set_js_1.intersect)((0, Set_js_1.ofSeq)(newNames, {
-        Compare: Util_js_1.comparePrimitives,
-    }), (0, Set_js_1.ofSeq)(existingNames, {
-        Compare: Util_js_1.comparePrimitives,
-    }));
-    if (!(0, Set_js_1.FSharpSet__get_IsEmpty)(same)) {
-        throw new Error(`Cannot create tables with the names ${same}, as table names must be unique.`);
-    }
-}
-class ArcTables {
-    constructor(initTables) {
-        this.tables = ((ArcTablesAux_SanityChecks_validateNamesUnique((0, Seq_js_1.map)((t) => t.Name, initTables)), initTables));
-    }
-    get Tables() {
-        const this$ = this;
-        return this$.tables;
-    }
-    set Tables(newTables) {
-        const this$ = this;
-        this$.tables = newTables;
-    }
-    get_Item(index) {
-        const this$ = this;
-        return this$.Tables[index];
-    }
-    get TableNames() {
-        const this$ = this;
-        return (0, Seq_js_1.toList)((0, Seq_js_1.delay)(() => (0, Seq_js_1.map)((s) => s.Name, this$.Tables)));
-    }
-    get TableCount() {
-        const this$ = this;
-        return this$.Tables.length | 0;
-    }
-    AddTable(table, index) {
-        const this$ = this;
-        const index_1 = (0, Option_js_1.defaultArg)(index, this$.TableCount) | 0;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index_1, true, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNameUnique(table.Name, this$.TableNames);
-        this$.Tables.splice(index_1, 0, table);
-    }
-    AddTables(tables, index) {
-        const this$ = this;
-        const index_1 = (0, Option_js_1.defaultArg)(index, this$.TableCount) | 0;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index_1, true, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNamesUnique((0, Seq_js_1.map)((x) => x.Name, tables), this$.TableNames);
-        (0, Array_js_1.insertRangeInPlace)(index_1, tables, this$.Tables);
-    }
-    InitTable(tableName, index) {
-        const this$ = this;
-        const index_1 = (0, Option_js_1.defaultArg)(index, this$.TableCount) | 0;
-        const table = ArcTable_js_1.ArcTable.init(tableName);
-        ArcTablesAux_SanityChecks_validateSheetIndex(index_1, true, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNameUnique(table.Name, this$.TableNames);
-        this$.Tables.splice(index_1, 0, table);
-        return table;
-    }
-    InitTables(tableNames, index) {
-        const this$ = this;
-        const index_1 = (0, Option_js_1.defaultArg)(index, this$.TableCount) | 0;
-        const tables = (0, Seq_js_1.map)((x) => ArcTable_js_1.ArcTable.init(x), tableNames);
-        ArcTablesAux_SanityChecks_validateSheetIndex(index_1, true, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNamesUnique((0, Seq_js_1.map)((x_1) => x_1.Name, tables), this$.TableNames);
-        (0, Array_js_1.insertRangeInPlace)(index_1, tables, this$.Tables);
-    }
-    GetTableAt(index) {
-        const this$ = this;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index, false, this$.Tables);
-        return this$.Tables[index];
-    }
-    GetTable(name) {
-        const this$ = this;
-        const index = ArcTablesAux_findIndexByTableName(name, this$.Tables) | 0;
-        return this$.GetTableAt(index);
-    }
-    UpdateTableAt(index, table) {
-        const this$ = this;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index, false, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNameAtUnique(index, table.Name, this$.TableNames);
-        this$.Tables[index] = table;
-    }
-    UpdateTable(name, table) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(name, this$.Tables), table];
-        this$.UpdateTableAt(tupledArg[0], tupledArg[1]);
-    }
-    SetTableAt(index, table) {
-        const this$ = this;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index, true, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNameAtUnique(index, table.Name, this$.TableNames);
-        this$.Tables[index] = table;
-    }
-    SetTable(name, table) {
-        const this$ = this;
-        const matchValue = ArcTablesAux_tryFindIndexByTableName(name, this$.Tables);
-        if (matchValue == null) {
-            this$.AddTable(table);
-        }
-        else {
-            const index = (0, Option_js_1.value)(matchValue) | 0;
-            this$.SetTableAt(index, table);
-        }
-    }
-    RemoveTableAt(index) {
-        const this$ = this;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index, false, this$.Tables);
-        this$.Tables.splice(index, 1);
-    }
-    RemoveTable(name) {
-        const this$ = this;
-        const index = ArcTablesAux_findIndexByTableName(name, this$.Tables) | 0;
-        this$.RemoveTableAt(index);
-    }
-    MapTableAt(index, updateFun) {
-        const this$ = this;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index, false, this$.Tables);
-        updateFun(this$.Tables[index]);
-    }
-    MapTable(name, updateFun) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(name, this$.Tables), updateFun];
-        this$.MapTableAt(tupledArg[0], tupledArg[1]);
-    }
-    RenameTableAt(index, newName) {
-        const this$ = this;
-        ArcTablesAux_SanityChecks_validateSheetIndex(index, false, this$.Tables);
-        ArcTablesAux_SanityChecks_validateNewNameUnique(newName, this$.TableNames);
-        const table = this$.GetTableAt(index);
-        table.Name = newName;
-    }
-    RenameTable(name, newName) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(name, this$.Tables), newName];
-        this$.RenameTableAt(tupledArg[0], tupledArg[1]);
-    }
-    AddColumnAt(tableIndex, header, cells, columnIndex, forceReplace) {
-        const this$ = this;
-        this$.MapTableAt(tableIndex, (table) => {
-            table.AddColumn(header, (0, Option_js_1.unwrap)(cells), (0, Option_js_1.unwrap)(columnIndex), (0, Option_js_1.unwrap)(forceReplace));
-        });
-    }
-    AddColumn(tableName, header, cells, columnIndex, forceReplace) {
-        const this$ = this;
-        const i = ArcTablesAux_findIndexByTableName(tableName, this$.Tables) | 0;
-        this$.AddColumnAt(i, header, (0, Option_js_1.unwrap)(cells), (0, Option_js_1.unwrap)(columnIndex), (0, Option_js_1.unwrap)(forceReplace));
-    }
-    RemoveColumnAt(tableIndex, columnIndex) {
-        const this$ = this;
-        this$.MapTableAt(tableIndex, (table) => {
-            table.RemoveColumn(columnIndex);
-        });
-    }
-    RemoveColumn(tableName, columnIndex) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(tableName, this$.Tables), columnIndex];
-        this$.RemoveColumnAt(tupledArg[0], tupledArg[1]);
-    }
-    UpdateColumnAt(tableIndex, columnIndex, header, cells) {
-        const this$ = this;
-        this$.MapTableAt(tableIndex, (table) => {
-            table.UpdateColumn(columnIndex, header, (0, Option_js_1.unwrap)(cells));
-        });
-    }
-    UpdateColumn(tableName, columnIndex, header, cells) {
-        const this$ = this;
-        const tableIndex = ArcTablesAux_findIndexByTableName(tableName, this$.Tables) | 0;
-        this$.UpdateColumnAt(tableIndex, columnIndex, header, (0, Option_js_1.unwrap)(cells));
-    }
-    GetColumnAt(tableIndex, columnIndex) {
-        const this$ = this;
-        const table = this$.GetTableAt(tableIndex);
-        return table.GetColumn(columnIndex);
-    }
-    GetColumn(tableName, columnIndex) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(tableName, this$.Tables), columnIndex];
-        return this$.GetColumnAt(tupledArg[0], tupledArg[1]);
-    }
-    AddRowAt(tableIndex, cells, rowIndex) {
-        const this$ = this;
-        this$.MapTableAt(tableIndex, (table) => {
-            table.AddRow((0, Option_js_1.unwrap)(cells), (0, Option_js_1.unwrap)(rowIndex));
-        });
-    }
-    AddRow(tableName, cells, rowIndex) {
-        const this$ = this;
-        const i = ArcTablesAux_findIndexByTableName(tableName, this$.Tables) | 0;
-        this$.AddRowAt(i, (0, Option_js_1.unwrap)(cells), (0, Option_js_1.unwrap)(rowIndex));
-    }
-    RemoveRowAt(tableIndex, rowIndex) {
-        const this$ = this;
-        this$.MapTableAt(tableIndex, (table) => {
-            table.RemoveRow(rowIndex);
-        });
-    }
-    RemoveRow(tableName, rowIndex) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(tableName, this$.Tables), rowIndex];
-        this$.RemoveRowAt(tupledArg[0], tupledArg[1]);
-    }
-    UpdateRowAt(tableIndex, rowIndex, cells) {
-        const this$ = this;
-        this$.MapTableAt(tableIndex, (table) => {
-            table.UpdateRow(rowIndex, cells);
-        });
-    }
-    UpdateRow(tableName, rowIndex, cells) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(tableName, this$.Tables), rowIndex, cells];
-        this$.UpdateRowAt(tupledArg[0], tupledArg[1], tupledArg[2]);
-    }
-    GetRowAt(tableIndex, rowIndex) {
-        const this$ = this;
-        const table = this$.GetTableAt(tableIndex);
-        return table.GetRow(rowIndex);
-    }
-    GetRow(tableName, rowIndex) {
-        const this$ = this;
-        const tupledArg = [ArcTablesAux_findIndexByTableName(tableName, this$.Tables), rowIndex];
-        return this$.GetRowAt(tupledArg[0], tupledArg[1]);
-    }
-    static ofSeq(tables) {
-        return new ArcTables(Array.from(tables));
-    }
-    MoveTable(oldIndex, newIndex) {
-        const this$ = this;
-        const table = this$.GetTableAt(oldIndex);
-        this$.Tables.splice(oldIndex, 1);
-        this$.Tables.splice(newIndex, 0, table);
-    }
-    static updateReferenceTablesBySheets(referenceTables, sheetTables, keepUnusedRefTables) {
-        let collection, s, a;
-        const keepUnusedRefTables_1 = (0, Option_js_1.defaultArg)(keepUnusedRefTables, false);
-        const usedTables = new Set([]);
-        const referenceTableMap = (0, Map_js_1.ofSeq)((0, Seq_js_1.choose)((t) => (0, Option_js_1.map)((c) => [c.Cells[0].AsFreeText, t], t.TryGetProtocolNameColumn()), referenceTables.Tables), {
-            Compare: Util_js_1.comparePrimitives,
-        });
-        return new ArcTables((collection = ((s = (0, Collections_js_1.ResizeArray_map)((tupledArg) => (0, Seq_js_1.reduce)((table, table_1) => ArcTable_js_1.ArcTable.append(table, table_1), tupledArg[1]), (0, Collections_js_1.ResizeArray_groupBy)((t_2) => t_2.Name, (0, Collections_js_1.ResizeArray_map)((t_1) => {
-            const k = (0, Option_js_1.defaultArg)((0, Option_js_1.bind)((c_1) => {
-                if (c_1.AsFreeText === "") {
-                    return undefined;
-                }
-                else {
-                    return c_1.AsFreeText;
-                }
-            }, (0, Option_js_1.bind)((i) => t_1.TryGetCellAt(i, 0), (0, Seq_js_1.tryFindIndex)((x_1) => (0, Util_js_1.equals)(x_1, (0, CompositeHeader_js_1.CompositeHeader_ProtocolREF)()), t_1.Headers))), t_1.Name);
-            const matchValue = (0, Map_js_1.tryFind)(k, referenceTableMap);
-            if (matchValue == null) {
-                return t_1;
-            }
-            else {
-                const rt = (0, Option_js_1.value)(matchValue);
-                (0, MapUtil_js_1.addToSet)(k, usedTables);
-                const updatedTable = ArcTable_js_1.ArcTable.updateReferenceByAnnotationTable(rt, t_1);
-                return ArcTable_js_1.ArcTable.fromArcTableValues(t_1.Name, updatedTable.Headers, updatedTable.Values);
-            }
-        }, (a = sheetTables.Tables, (0, Collections_js_1.ResizeArray_collect)(ArcTable_js_1.ArcTable.SplitByProtocolREF, a))))), keepUnusedRefTables_1 ? (0, Seq_js_1.append)((0, Seq_js_1.choose)((kv) => {
-            if (usedTables.has(kv[0])) {
-                return undefined;
-            }
-            else {
-                return kv[1];
-            }
-        }, referenceTableMap), s) : s)), Array.from(collection)));
-    }
-    GetEnumerator() {
-        const this$ = this;
-        return (0, Util_js_1.getEnumerator)(this$.Tables);
-    }
-    [Symbol.iterator]() {
-        return (0, Util_js_1.toIterator)((0, Util_js_1.getEnumerator)(this));
-    }
-    "System.Collections.IEnumerable.GetEnumerator"() {
-        const this$ = this;
-        return (0, Util_js_1.getEnumerator)(this$.Tables);
-    }
-}
-exports.ArcTables = ArcTables;
-function ArcTables_$reflection() {
-    return (0, Reflection_js_1.class_type)("ARCtrl.ArcTables", undefined, ArcTables);
-}
-function ArcTables_$ctor_Z420F2E1A(initTables) {
-    return new ArcTables(initTables);
-}