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

package/dist/ts/ts/Core/Table/ArcTables.d.ts

@@ -0,0 +1,91 @@
+import { ArcTable } from './ArcTable.js';
+import { Option } from '@fable-org/fable-library-js/Option.js';
+import { int32 } from '@fable-org/fable-library-js/Int32.js';
+import { CompositeHeader_$union, IOType_$union } from './CompositeHeader.js';
+import { IEnumerator, IMap } from '@fable-org/fable-library-js/Util.js';
+import { CompositeColumn } from './CompositeColumn.js';
+import { CompositeCell_$union } from './CompositeCell.js';
+import { FSharpList } from '@fable-org/fable-library-js/List.js';
+import { TypeInfo } from '@fable-org/fable-library-js/Reflection.js';
+/**
+ * If a table with the given name exists in the TableList, returns it, else returns None.
+ */
+export declare function ArcTablesAux_tryFindIndexByTableName(name: string, tables: ArcTable[]): Option<int32>;
+/**
+ * If a table with the given name exists in the TableList, returns it, else fails.
+ */
+export declare function ArcTablesAux_findIndexByTableName(name: string, tables: ArcTable[]): int32;
+/**
+ * Collects the IOType of each distinct entity in the tables. Then merges the IOType of each entity according to the IOType.Merge function.
+ */
+export declare function ArcTablesAux_getIOMap(tables: ArcTable[]): IMap<string, IOType_$union>;
+export declare function ArcTablesAux_applyIOMap(map: IMap<string, IOType_$union>, tables: ArcTable[]): void;
+/**
+ * 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.
+ */
+export declare function ArcTablesAux_SanityChecks_validateSheetIndex(index: int32, allowAppend: boolean, sheets: ArcTable[]): void;
+/**
+ * Fails, if two tables have the same name.
+ */
+export declare function ArcTablesAux_SanityChecks_validateNamesUnique(names: Iterable<string>): void;
+/**
+ * Fails, if the name is already used by another table.
+ */
+export declare function ArcTablesAux_SanityChecks_validateNewNameUnique(newName: string, existingNames: Iterable<string>): void;
+/**
+ * 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.
+ */
+export declare function ArcTablesAux_SanityChecks_validateNewNameAtUnique(index: int32, newName: string, existingNames: Iterable<string>): void;
+export declare function ArcTablesAux_SanityChecks_validateNewNamesUnique(newNames: Iterable<string>, existingNames: Iterable<string>): void;
+export declare class ArcTables implements Iterable<ArcTable> {
+    tables: ArcTable[];
+    constructor(initTables: ArcTable[]);
+    get Tables(): ArcTable[];
+    set Tables(newTables: ArcTable[]);
+    get_Item(index: int32): ArcTable;
+    get TableNames(): FSharpList<string>;
+    get TableCount(): int32;
+    AddTable(table: ArcTable, index?: int32): void;
+    AddTables(tables: Iterable<ArcTable>, index?: int32): void;
+    InitTable(tableName: string, index?: int32): ArcTable;
+    InitTables(tableNames: Iterable<string>, index?: int32): void;
+    GetTableAt(index: int32): ArcTable;
+    GetTable(name: string): ArcTable;
+    UpdateTableAt(index: int32, table: ArcTable): void;
+    UpdateTable(name: string, table: ArcTable): void;
+    SetTableAt(index: int32, table: ArcTable): void;
+    SetTable(name: string, table: ArcTable): void;
+    RemoveTableAt(index: int32): void;
+    RemoveTable(name: string): void;
+    MapTableAt(index: int32, updateFun: ((arg0: ArcTable) => void)): void;
+    MapTable(name: string, updateFun: ((arg0: ArcTable) => void)): void;
+    RenameTableAt(index: int32, newName: string): void;
+    RenameTable(name: string, newName: string): void;
+    AddColumnAt(tableIndex: int32, header: CompositeHeader_$union, cells?: CompositeCell_$union[], columnIndex?: int32, forceReplace?: boolean): void;
+    AddColumn(tableName: string, header: CompositeHeader_$union, cells?: CompositeCell_$union[], columnIndex?: int32, forceReplace?: boolean): void;
+    RemoveColumnAt(tableIndex: int32, columnIndex: int32): void;
+    RemoveColumn(tableName: string, columnIndex: int32): void;
+    UpdateColumnAt(tableIndex: int32, columnIndex: int32, header: CompositeHeader_$union, cells?: CompositeCell_$union[]): void;
+    UpdateColumn(tableName: string, columnIndex: int32, header: CompositeHeader_$union, cells?: CompositeCell_$union[]): void;
+    GetColumnAt(tableIndex: int32, columnIndex: int32): CompositeColumn;
+    GetColumn(tableName: string, columnIndex: int32): CompositeColumn;
+    AddRowAt(tableIndex: int32, cells?: CompositeCell_$union[], rowIndex?: int32): void;
+    AddRow(tableName: string, cells?: CompositeCell_$union[], rowIndex?: int32): void;
+    RemoveRowAt(tableIndex: int32, rowIndex: int32): void;
+    RemoveRow(tableName: string, rowIndex: int32): void;
+    UpdateRowAt(tableIndex: int32, rowIndex: int32, cells: CompositeCell_$union[]): void;
+    UpdateRow(tableName: string, rowIndex: int32, cells: CompositeCell_$union[]): void;
+    GetRowAt(tableIndex: int32, rowIndex: int32): CompositeCell_$union[];
+    GetRow(tableName: string, rowIndex: int32): CompositeCell_$union[];
+    static ofSeq(tables: Iterable<ArcTable>): ArcTables;
+    MoveTable(oldIndex: int32, newIndex: int32): void;
+    static updateReferenceTablesBySheets(referenceTables: ArcTables, sheetTables: ArcTables, keepUnusedRefTables?: boolean): ArcTables;
+    GetEnumerator(): IEnumerator<ArcTable>;
+    [Symbol.iterator](): Iterator<ArcTable>;
+    "System.Collections.IEnumerable.GetEnumerator"(): IEnumerator<any>;
+}
+export declare function ArcTables_$reflection(): TypeInfo;
+export declare function ArcTables_$ctor_Z420F2E1A(initTables: ArcTable[]): ArcTables;
+//# sourceMappingURL=ArcTables.d.ts.map

package/dist/ts/ts/Core/Table/ArcTables.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"ArcTables.d.ts","sourceRoot":"","sources":["../../../../../src/ARCtrl/ts/Core/Table/ArcTables.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,QAAQ,EAAE,MAAM,eAAe,CAAC;AACzC,OAAO,EAA4D,MAAM,EAAE,MAAM,uCAAuC,CAAC;AACzH,OAAO,EAAE,KAAK,EAAE,MAAM,sCAAsC,CAAC;AAC7D,OAAO,EAA8E,sBAAsB,EAAE,aAAa,EAAE,MAAM,sBAAsB,CAAC;AACzJ,OAAO,EAAc,WAAW,EAAoF,IAAI,EAAE,MAAM,qCAAqC,CAAC;AAGtK,OAAO,EAAE,eAAe,EAAE,MAAM,sBAAsB,CAAC;AACvD,OAAO,EAAE,oBAAoB,EAAE,MAAM,oBAAoB,CAAC;AAG1D,OAAO,EAAE,UAAU,EAAE,MAAM,qCAAqC,CAAC;AAGjE,OAAO,EAAc,QAAQ,EAAE,MAAM,2CAA2C,CAAC;AAEjF;;GAEG;AACH,wBAAgB,oCAAoC,CAAC,IAAI,EAAE,MAAM,EAAE,MAAM,EAAE,QAAQ,EAAE,GAAG,MAAM,CAAC,KAAK,CAAC,CAEpG;AAED;;GAEG;AACH,wBAAgB,iCAAiC,CAAC,IAAI,EAAE,MAAM,EAAE,MAAM,EAAE,QAAQ,EAAE,GAAG,KAAK,CAQzF;AAED;;GAEG;AACH,wBAAgB,qBAAqB,CAAC,MAAM,EAAE,QAAQ,EAAE,GAAG,IAAI,CAAC,MAAM,EAAE,aAAa,CAAC,CA6CrF;AAED,wBAAgB,uBAAuB,CAAC,GAAG,EAAE,IAAI,CAAC,MAAM,EAAE,aAAa,CAAC,EAAE,MAAM,EAAE,QAAQ,EAAE,GAAG,IAAI,CA8ClG;AAED;;GAEG;AACH,wBAAgB,4CAA4C,CAAC,KAAK,EAAE,KAAK,EAAE,WAAW,EAAE,OAAO,EAAE,MAAM,EAAE,QAAQ,EAAE,GAAG,IAAI,CAQzH;AAED;;GAEG;AACH,wBAAgB,6CAA6C,CAAC,KAAK,EAAE,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAO3F;AAED;;GAEG;AACH,wBAAgB,+CAA+C,CAAC,OAAO,EAAE,MAAM,EAAE,aAAa,EAAE,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAOtH;AAED;;;;GAIG;AACH,wBAAgB,iDAAiD,CAAC,KAAK,EAAE,KAAK,EAAE,OAAO,EAAE,MAAM,EAAE,aAAa,EAAE,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAWtI;AAED,wBAAgB,gDAAgD,CAAC,QAAQ,EAAE,QAAQ,CAAC,MAAM,CAAC,EAAE,aAAa,EAAE,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAUlI;AAED,qBAAa,SAAU,YAAW,QAAQ,CAAC,QAAQ,CAAC;IAChD,MAAM,EAAE,QAAQ,EAAE,CAAC;gBACP,UAAU,EAAE,QAAQ,EAAE;IAGlC,IAAI,MAAM,IAAI,QAAQ,EAAE,CAGvB;IACD,IAAI,MAAM,CAAC,SAAS,EAAE,QAAQ,EAAE,EAG/B;IACD,QAAQ,CAAC,KAAK,EAAE,KAAK,GAAG,QAAQ;IAIhC,IAAI,UAAU,IAAI,UAAU,CAAC,MAAM,CAAC,CAGnC;IACD,IAAI,UAAU,IAAI,KAAK,CAGtB;IACD,QAAQ,CAAC,KAAK,EAAE,QAAQ,EAAE,KAAK,CAAC,EAAE,KAAK,GAAG,IAAI;IAO9C,SAAS,CAAC,MAAM,EAAE,QAAQ,CAAC,QAAQ,CAAC,EAAE,KAAK,CAAC,EAAE,KAAK,GAAG,IAAI;IAO1D,SAAS,CAAC,SAAS,EAAE,MAAM,EAAE,KAAK,CAAC,EAAE,KAAK,GAAG,QAAQ;IASrD,UAAU,CAAC,UAAU,EAAE,QAAQ,CAAC,MAAM,CAAC,EAAE,KAAK,CAAC,EAAE,KAAK,GAAG,IAAI;IAQ7D,UAAU,CAAC,KAAK,EAAE,KAAK,GAAG,QAAQ;IAKlC,QAAQ,CAAC,IAAI,EAAE,MAAM,GAAG,QAAQ;IAKhC,aAAa,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,QAAQ,GAAG,IAAI;IAMlD,WAAW,CAAC,IAAI,EAAE,MAAM,EAAE,KAAK,EAAE,QAAQ,GAAG,IAAI;IAKhD,UAAU,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,QAAQ,GAAG,IAAI;IAM/C,QAAQ,CAAC,IAAI,EAAE,MAAM,EAAE,KAAK,EAAE,QAAQ,GAAG,IAAI;IAW7C,aAAa,CAAC,KAAK,EAAE,KAAK,GAAG,IAAI;IAKjC,WAAW,CAAC,IAAI,EAAE,MAAM,GAAG,IAAI;IAK/B,UAAU,CAAC,KAAK,EAAE,KAAK,EAAE,SAAS,EAAE,CAAC,CAAC,IAAI,EAAE,QAAQ,KAAK,IAAI,CAAC,GAAG,IAAI;IAKrE,QAAQ,CAAC,IAAI,EAAE,MAAM,EAAE,SAAS,EAAE,CAAC,CAAC,IAAI,EAAE,QAAQ,KAAK,IAAI,CAAC,GAAG,IAAI;IAKnE,aAAa,CAAC,KAAK,EAAE,KAAK,EAAE,OAAO,EAAE,MAAM,GAAG,IAAI;IAOlD,WAAW,CAAC,IAAI,EAAE,MAAM,EAAE,OAAO,EAAE,MAAM,GAAG,IAAI;IAKhD,WAAW,CAAC,UAAU,EAAE,KAAK,EAAE,MAAM,EAAE,sBAAsB,EAAE,KAAK,CAAC,EAAE,oBAAoB,EAAE,EAAE,WAAW,CAAC,EAAE,KAAK,EAAE,YAAY,CAAC,EAAE,OAAO,GAAG,IAAI;IAMjJ,SAAS,CAAC,SAAS,EAAE,MAAM,EAAE,MAAM,EAAE,sBAAsB,EAAE,KAAK,CAAC,EAAE,oBAAoB,EAAE,EAAE,WAAW,CAAC,EAAE,KAAK,EAAE,YAAY,CAAC,EAAE,OAAO,GAAG,IAAI;IAK/I,cAAc,CAAC,UAAU,EAAE,KAAK,EAAE,WAAW,EAAE,KAAK,GAAG,IAAI;IAM3D,YAAY,CAAC,SAAS,EAAE,MAAM,EAAE,WAAW,EAAE,KAAK,GAAG,IAAI;IAKzD,cAAc,CAAC,UAAU,EAAE,KAAK,EAAE,WAAW,EAAE,KAAK,EAAE,MAAM,EAAE,sBAAsB,EAAE,KAAK,CAAC,EAAE,oBAAoB,EAAE,GAAG,IAAI;IAM3H,YAAY,CAAC,SAAS,EAAE,MAAM,EAAE,WAAW,EAAE,KAAK,EAAE,MAAM,EAAE,sBAAsB,EAAE,KAAK,CAAC,EAAE,oBAAoB,EAAE,GAAG,IAAI;IAKzH,WAAW,CAAC,UAAU,EAAE,KAAK,EAAE,WAAW,EAAE,KAAK,GAAG,eAAe;IAKnE,SAAS,CAAC,SAAS,EAAE,MAAM,EAAE,WAAW,EAAE,KAAK,GAAG,eAAe;IAKjE,QAAQ,CAAC,UAAU,EAAE,KAAK,EAAE,KAAK,CAAC,EAAE,oBAAoB,EAAE,EAAE,QAAQ,CAAC,EAAE,KAAK,GAAG,IAAI;IAMnF,MAAM,CAAC,SAAS,EAAE,MAAM,EAAE,KAAK,CAAC,EAAE,oBAAoB,EAAE,EAAE,QAAQ,CAAC,EAAE,KAAK,GAAG,IAAI;IAKjF,WAAW,CAAC,UAAU,EAAE,KAAK,EAAE,QAAQ,EAAE,KAAK,GAAG,IAAI;IAMrD,SAAS,CAAC,SAAS,EAAE,MAAM,EAAE,QAAQ,EAAE,KAAK,GAAG,IAAI;IAKnD,WAAW,CAAC,UAAU,EAAE,KAAK,EAAE,QAAQ,EAAE,KAAK,EAAE,KAAK,EAAE,oBAAoB,EAAE,GAAG,IAAI;IAMpF,SAAS,CAAC,SAAS,EAAE,MAAM,EAAE,QAAQ,EAAE,KAAK,EAAE,KAAK,EAAE,oBAAoB,EAAE,GAAG,IAAI;IAKlF,QAAQ,CAAC,UAAU,EAAE,KAAK,EAAE,QAAQ,EAAE,KAAK,GAAG,oBAAoB,EAAE;IAKpE,MAAM,CAAC,SAAS,EAAE,MAAM,EAAE,QAAQ,EAAE,KAAK,GAAG,oBAAoB,EAAE;IAKlE,MAAM,CAAC,KAAK,CAAC,MAAM,EAAE,QAAQ,CAAC,QAAQ,CAAC,GAAG,SAAS;IAGnD,SAAS,CAAC,QAAQ,EAAE,KAAK,EAAE,QAAQ,EAAE,KAAK,GAAG,IAAI;IAMjD,MAAM,CAAC,6BAA6B,CAAC,eAAe,EAAE,SAAS,EAAE,WAAW,EAAE,SAAS,EAAE,mBAAmB,CAAC,EAAE,OAAO,GAAG,SAAS;IAmClI,aAAa,IAAI,WAAW,CAAC,QAAQ,CAAC;IAItC,CAAC,MAAM,CAAC,QAAQ,CAAC,IAAI,QAAQ,CAAC,QAAQ,CAAC;IAGvC,8CAA8C,IAAI,WAAW,CAAC,GAAG,CAAC;CAIrE;AAED,wBAAgB,qBAAqB,IAAI,QAAQ,CAEhD;AAED,wBAAgB,yBAAyB,CAAC,UAAU,EAAE,QAAQ,EAAE,GAAG,SAAS,CAE3E"}

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

@@ -0,0 +1,415 @@
+import { toList, delay, map, choose, append, tryFindIndex, reduce, length, findIndex } from '../../../node_modules/@fable-org/fable-library-js/Seq.js';
+import { ArcTable } from './ArcTable.js';
+import { defaultArg, value, unwrap, map as map$1, bind } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { CompositeHeader_ProtocolREF, CompositeHeader_Input, CompositeHeader_Output } from './CompositeHeader.js';
+import { equals, getEnumerator, toIterator, compare, disposeSafe, stringHash, comparePrimitives } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
+import { ResizeArray_map, ResizeArray_groupBy, ResizeArray_collect, ResizeArray_iter, ResizeArray_fold, Dictionary_tryFind } from '../Helper/Collections.js';
+import { addToSet, addToDict } from '../../../node_modules/@fable-org/fable-library-js/MapUtil.js';
+import { distinct } from '../../../node_modules/@fable-org/fable-library-js/Seq2.js';
+import { intersect, ofSeq as ofSeq$1, FSharpSet__get_IsEmpty } from '../../../node_modules/@fable-org/fable-library-js/Set.js';
+import { insertRangeInPlace } from '../../../node_modules/@fable-org/fable-library-js/Array.js';
+import { ofSeq, tryFind } from '../../../node_modules/@fable-org/fable-library-js/Map.js';
+
+function ArcTablesAux_tryFindIndexByTableName(name, tables) {
+  return tryFindIndex((t) => t.Name === name, tables);
+}
+function ArcTablesAux_findIndexByTableName(name, tables) {
+  const matchValue = tryFindIndex((t) => t.Name === name, tables);
+  if (matchValue == null) {
+    throw new Error(`Unable to find table with name '${name}'!`);
+  } else {
+    return value(matchValue) | 0;
+  }
+}
+function ArcTablesAux_getIOMap(tables) {
+  const mappings = /* @__PURE__ */ new Map([]);
+  const includeInMap = (name, ioType) => {
+    if (name !== "") {
+      const matchValue = Dictionary_tryFind(name, mappings);
+      if (matchValue == null) {
+        addToDict(mappings, name, ioType);
+      } else {
+        const oldIOType = value(matchValue);
+        const newIOType = oldIOType.Merge(ioType);
+        mappings.set(name, newIOType);
+      }
+    }
+  };
+  let enumerator = 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 = value(matchValue_1);
+        const ioType_1 = value(ic.Header.TryInput());
+        ResizeArray_iter((c) => {
+          includeInMap(c.ToFreeTextCell().AsFreeText, ioType_1);
+        }, ic.Cells);
+      }
+      const matchValue_2 = table.TryGetOutputColumn();
+      if (matchValue_2 == null) {
+      } else {
+        const oc = value(matchValue_2);
+        const ioType_2 = value(oc.Header.TryOutput());
+        ResizeArray_iter((c_1) => {
+          includeInMap(c_1.ToFreeTextCell().AsFreeText, ioType_2);
+        }, oc.Cells);
+      }
+    }
+  } finally {
+    disposeSafe(enumerator);
+  }
+  return mappings;
+}
+function ArcTablesAux_applyIOMap(map, tables) {
+  let enumerator = 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 = value(matchValue);
+        const index = findIndex((x) => x.isInput, table.Headers) | 0;
+        const newIOType = ResizeArray_fold((io, c) => {
+          const matchValue_1 = Dictionary_tryFind(c.ToFreeTextCell().AsFreeText, map);
+          if (matchValue_1 == null) {
+            return io;
+          } else {
+            const newIO = value(matchValue_1);
+            return io.Merge(newIO);
+          }
+        }, value(ic.Header.TryInput()), ic.Cells);
+        table.UpdateHeader(index, CompositeHeader_Input(newIOType));
+      }
+      const matchValue_2 = table.TryGetOutputColumn();
+      if (matchValue_2 == null) {
+      } else {
+        const oc = value(matchValue_2);
+        const index_1 = findIndex((x_1) => x_1.isOutput, table.Headers) | 0;
+        const newIOType_1 = ResizeArray_fold((io_1, c_1) => {
+          const matchValue_3 = Dictionary_tryFind(c_1.ToFreeTextCell().AsFreeText, map);
+          if (matchValue_3 == null) {
+            return io_1;
+          } else {
+            const newIO_1 = value(matchValue_3);
+            return io_1.Merge(newIO_1);
+          }
+        }, value(oc.Header.TryOutput()), oc.Cells);
+        table.UpdateHeader(index_1, CompositeHeader_Output(newIOType_1));
+      }
+    }
+  } finally {
+    disposeSafe(enumerator);
+  }
+}
+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 ? compare(x, y) > 0 : compare(x, y) >= 0) {
+    throw new Error(`Specified index is out of range! Assay contains only ${sheets.length} tables.`);
+  }
+}
+function ArcTablesAux_SanityChecks_validateNamesUnique(names) {
+  if (!(length(names) === length(distinct(names, {
+    Equals: (x, y) => x === y,
+    GetHashCode: stringHash
+  })))) {
+    throw new Error("Cannot add multiple tables with the same name! Table names inside one assay must be unqiue");
+  }
+}
+function ArcTablesAux_SanityChecks_validateNewNameUnique(newName, existingNames) {
+  const matchValue = 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 ${value(matchValue)} has the same name.`);
+  }
+}
+function ArcTablesAux_SanityChecks_validateNewNameAtUnique(index, newName, existingNames) {
+  const matchValue = tryFindIndex((x) => x === newName, existingNames);
+  if (matchValue == null) ; else if (index === value(matchValue)) {
+    value(matchValue) | 0;
+  } else {
+    const i_2 = 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 = intersect(ofSeq$1(newNames, {
+    Compare: comparePrimitives
+  }), ofSeq$1(existingNames, {
+    Compare: comparePrimitives
+  }));
+  if (!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(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 toList(delay(() => 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 = 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 = defaultArg(index, this$.TableCount) | 0;
+    ArcTablesAux_SanityChecks_validateSheetIndex(index_1, true, this$.Tables);
+    ArcTablesAux_SanityChecks_validateNewNamesUnique(map((x) => x.Name, tables), this$.TableNames);
+    insertRangeInPlace(index_1, tables, this$.Tables);
+  }
+  InitTable(tableName, index) {
+    const this$ = this;
+    const index_1 = defaultArg(index, this$.TableCount) | 0;
+    const table = 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 = defaultArg(index, this$.TableCount) | 0;
+    const tables = map((x) => ArcTable.init(x), tableNames);
+    ArcTablesAux_SanityChecks_validateSheetIndex(index_1, true, this$.Tables);
+    ArcTablesAux_SanityChecks_validateNewNamesUnique(map((x_1) => x_1.Name, tables), this$.TableNames);
+    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 = 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, unwrap(cells), unwrap(columnIndex), unwrap(forceReplace));
+    });
+  }
+  AddColumn(tableName, header, cells, columnIndex, forceReplace) {
+    const this$ = this;
+    const i = ArcTablesAux_findIndexByTableName(tableName, this$.Tables) | 0;
+    this$.AddColumnAt(i, header, unwrap(cells), unwrap(columnIndex), 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, unwrap(cells));
+    });
+  }
+  UpdateColumn(tableName, columnIndex, header, cells) {
+    const this$ = this;
+    const tableIndex = ArcTablesAux_findIndexByTableName(tableName, this$.Tables) | 0;
+    this$.UpdateColumnAt(tableIndex, columnIndex, header, 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(unwrap(cells), unwrap(rowIndex));
+    });
+  }
+  AddRow(tableName, cells, rowIndex) {
+    const this$ = this;
+    const i = ArcTablesAux_findIndexByTableName(tableName, this$.Tables) | 0;
+    this$.AddRowAt(i, unwrap(cells), 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 = defaultArg(keepUnusedRefTables, false);
+    const usedTables = /* @__PURE__ */ new Set([]);
+    const referenceTableMap = ofSeq(choose((t) => map$1((c) => [c.Cells[0].AsFreeText, t], t.TryGetProtocolNameColumn()), referenceTables.Tables), {
+      Compare: comparePrimitives
+    });
+    return new ArcTables((collection = (s = ResizeArray_map((tupledArg) => reduce((table, table_1) => ArcTable.append(table, table_1), tupledArg[1]), ResizeArray_groupBy((t_2) => t_2.Name, ResizeArray_map((t_1) => {
+      const k = defaultArg(bind((c_1) => {
+        if (c_1.AsFreeText === "") {
+          return void 0;
+        } else {
+          return c_1.AsFreeText;
+        }
+      }, bind((i) => t_1.TryGetCellAt(i, 0), tryFindIndex((x_1) => equals(x_1, CompositeHeader_ProtocolREF()), t_1.Headers))), t_1.Name);
+      const matchValue = tryFind(k, referenceTableMap);
+      if (matchValue == null) {
+        return t_1;
+      } else {
+        const rt = value(matchValue);
+        addToSet(k, usedTables);
+        const updatedTable = ArcTable.updateReferenceByAnnotationTable(rt, t_1);
+        return ArcTable.fromArcTableValues(t_1.Name, updatedTable.Headers, updatedTable.Values);
+      }
+    }, (a = sheetTables.Tables, ResizeArray_collect(ArcTable.SplitByProtocolREF, a))))), keepUnusedRefTables_1 ? append(choose((kv) => {
+      if (usedTables.has(kv[0])) {
+        return void 0;
+      } else {
+        return kv[1];
+      }
+    }, referenceTableMap), s) : s), Array.from(collection)));
+  }
+  GetEnumerator() {
+    const this$ = this;
+    return getEnumerator(this$.Tables);
+  }
+  [Symbol.iterator]() {
+    return toIterator(getEnumerator(this));
+  }
+  "System.Collections.IEnumerable.GetEnumerator"() {
+    const this$ = this;
+    return getEnumerator(this$.Tables);
+  }
+}
+
+export { ArcTables, ArcTablesAux_SanityChecks_validateNamesUnique, ArcTablesAux_SanityChecks_validateNewNameAtUnique, ArcTablesAux_SanityChecks_validateNewNameUnique, ArcTablesAux_SanityChecks_validateNewNamesUnique, ArcTablesAux_SanityChecks_validateSheetIndex, ArcTablesAux_applyIOMap, ArcTablesAux_findIndexByTableName, ArcTablesAux_getIOMap, ArcTablesAux_tryFindIndexByTableName };

package/dist/ts/ts/Core/Table/CompositeCell.d.ts

@@ -0,0 +1,58 @@
+import { OntologyAnnotation } from '../OntologyAnnotation.js';
+import { Data } from '../Data.js';
+import { CompositeHeader_$union } from './CompositeHeader.js';
+import { Union } from '@fable-org/fable-library-js/Types.js';
+import { TypeInfo } from '@fable-org/fable-library-js/Reflection.js';
+export type CompositeCell_$union = CompositeCell<0> | CompositeCell<1> | CompositeCell<2> | CompositeCell<3>;
+export type CompositeCell_$cases = {
+    0: ["Term", [OntologyAnnotation]];
+    1: ["FreeText", [string]];
+    2: ["Unitized", [string, OntologyAnnotation]];
+    3: ["Data", [Data]];
+};
+export declare function CompositeCell_Term(Item: OntologyAnnotation): CompositeCell<0>;
+export declare function CompositeCell_FreeText(Item: string): CompositeCell<1>;
+export declare function CompositeCell_Unitized(Item1: string, Item2: OntologyAnnotation): CompositeCell<2>;
+export declare function CompositeCell_Data(Item: Data): CompositeCell<3>;
+export declare class CompositeCell<Tag extends keyof CompositeCell_$cases> extends Union<Tag, CompositeCell_$cases[Tag][0]> {
+    readonly tag: Tag;
+    readonly fields: CompositeCell_$cases[Tag][1];
+    constructor(tag: Tag, fields: CompositeCell_$cases[Tag][1]);
+    cases(): string[];
+    get isUnitized(): boolean;
+    get isTerm(): boolean;
+    get isFreeText(): boolean;
+    get isData(): boolean;
+    GetEmptyCell(): CompositeCell_$union;
+    GetContent(): string[];
+    ToUnitizedCell(): CompositeCell_$union;
+    ToTermCell(): CompositeCell_$union;
+    ToFreeTextCell(): CompositeCell_$union;
+    ToDataCell(): CompositeCell_$union;
+    get AsUnitized(): [string, OntologyAnnotation];
+    get AsTerm(): OntologyAnnotation;
+    get AsFreeText(): string;
+    get AsData(): Data;
+    static createTerm(oa: OntologyAnnotation): CompositeCell_$union;
+    static createTermFromString(name?: string, tsr?: string, tan?: string): CompositeCell_$union;
+    static createUnitized(value: string, oa?: OntologyAnnotation): CompositeCell_$union;
+    static createUnitizedFromString(value: string, name?: string, tsr?: string, tan?: string): CompositeCell_$union;
+    static createFreeText(value: string): CompositeCell_$union;
+    static createData(d: Data): CompositeCell_$union;
+    static createDataFromString(value: string, format?: string, selectorFormat?: string): CompositeCell_$union;
+    static get emptyTerm(): CompositeCell_$union;
+    static get emptyFreeText(): CompositeCell_$union;
+    static get emptyUnitized(): CompositeCell_$union;
+    static get emptyData(): CompositeCell_$union;
+    UpdateWithOA(oa: OntologyAnnotation): CompositeCell_$union;
+    static updateWithOA(oa: OntologyAnnotation, cell: CompositeCell_$union): CompositeCell_$union;
+    toString(): string;
+    Copy(): CompositeCell_$union;
+    ValidateAgainstHeader(header: CompositeHeader_$union, raiseException?: boolean): boolean;
+    static term(oa: OntologyAnnotation): CompositeCell_$union;
+    static freeText(s: string): CompositeCell_$union;
+    static unitized(v: string, oa: OntologyAnnotation): CompositeCell_$union;
+    static data(d: Data): CompositeCell_$union;
+}
+export declare function CompositeCell_$reflection(): TypeInfo;
+//# sourceMappingURL=CompositeCell.d.ts.map

package/dist/ts/ts/Core/Table/CompositeCell.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"CompositeCell.d.ts","sourceRoot":"","sources":["../../../../../src/ARCtrl/ts/Core/Table/CompositeCell.ts"],"names":[],"mappings":"AAAA,OAAO,EAAkC,kBAAkB,EAAE,MAAM,0BAA0B,CAAC;AAE9F,OAAO,EAAoB,IAAI,EAAE,MAAM,YAAY,CAAC;AACpD,OAAO,EAAE,sBAAsB,EAAE,MAAM,sBAAsB,CAAC;AAC9D,OAAO,EAAE,KAAK,EAAE,MAAM,sCAAsC,CAAC;AAC7D,OAAO,EAA2B,QAAQ,EAAE,MAAM,2CAA2C,CAAC;AAE9F,MAAM,MAAM,oBAAoB,GAC1B,aAAa,CAAC,CAAC,CAAC,GAChB,aAAa,CAAC,CAAC,CAAC,GAChB,aAAa,CAAC,CAAC,CAAC,GAChB,aAAa,CAAC,CAAC,CAAC,CAAA;AAEtB,MAAM,MAAM,oBAAoB,GAAG;IAC/B,CAAC,EAAE,CAAC,MAAM,EAAE,CAAC,kBAAkB,CAAC,CAAC,CAAC;IAClC,CAAC,EAAE,CAAC,UAAU,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC;IAC1B,CAAC,EAAE,CAAC,UAAU,EAAE,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAAC,CAAC;IAC9C,CAAC,EAAE,CAAC,MAAM,EAAE,CAAC,IAAI,CAAC,CAAC,CAAA;CACtB,CAAA;AAED,wBAAgB,kBAAkB,CAAC,IAAI,EAAE,kBAAkB,oBAE1D;AAED,wBAAgB,sBAAsB,CAAC,IAAI,EAAE,MAAM,oBAElD;AAED,wBAAgB,sBAAsB,CAAC,KAAK,EAAE,MAAM,EAAE,KAAK,EAAE,kBAAkB,oBAE9E;AAED,wBAAgB,kBAAkB,CAAC,IAAI,EAAE,IAAI,oBAE5C;AAED,qBAAa,aAAa,CAAC,GAAG,SAAS,MAAM,oBAAoB,CAAE,SAAQ,KAAK,CAAC,GAAG,EAAE,oBAAoB,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;IACnG,QAAQ,CAAC,GAAG,EAAE,GAAG;IAAE,QAAQ,CAAC,MAAM,EAAE,oBAAoB,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;gBAAvD,GAAG,EAAE,GAAG,EAAW,MAAM,EAAE,oBAAoB,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;IAG5E,KAAK;IAGL,IAAI,UAAU,IAAI,OAAO,CAGxB;IACD,IAAI,MAAM,IAAI,OAAO,CAGpB;IACD,IAAI,UAAU,IAAI,OAAO,CAGxB;IACD,IAAI,MAAM,IAAI,OAAO,CAGpB;IACD,YAAY,IAAI,oBAAoB;IAIpC,UAAU,IAAI,MAAM,EAAE;IAmBtB,cAAc,IAAI,oBAAoB;IAiBtC,UAAU,IAAI,oBAAoB;IAiBlC,cAAc,IAAI,oBAAoB;IAmBtC,UAAU,IAAI,oBAAoB;IAmBlC,IAAI,UAAU,IAAI,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAQ7C;IACD,IAAI,MAAM,IAAI,kBAAkB,CAQ/B;IACD,IAAI,UAAU,IAAI,MAAM,CAQvB;IACD,IAAI,MAAM,IAAI,IAAI,CAQjB;IACD,MAAM,CAAC,UAAU,CAAC,EAAE,EAAE,kBAAkB,GAAG,oBAAoB;IAG/D,MAAM,CAAC,oBAAoB,CAAC,IAAI,CAAC,EAAE,MAAM,EAAE,GAAG,CAAC,EAAE,MAAM,EAAE,GAAG,CAAC,EAAE,MAAM,GAAG,oBAAoB;IAG5F,MAAM,CAAC,cAAc,CAAC,KAAK,EAAE,MAAM,EAAE,EAAE,CAAC,EAAE,kBAAkB,GAAG,oBAAoB;IAGnF,MAAM,CAAC,wBAAwB,CAAC,KAAK,EAAE,MAAM,EAAE,IAAI,CAAC,EAAE,MAAM,EAAE,GAAG,CAAC,EAAE,MAAM,EAAE,GAAG,CAAC,EAAE,MAAM,GAAG,oBAAoB;IAI/G,MAAM,CAAC,cAAc,CAAC,KAAK,EAAE,MAAM,GAAG,oBAAoB;IAG1D,MAAM,CAAC,UAAU,CAAC,CAAC,EAAE,IAAI,GAAG,oBAAoB;IAGhD,MAAM,CAAC,oBAAoB,CAAC,KAAK,EAAE,MAAM,EAAE,MAAM,CAAC,EAAE,MAAM,EAAE,cAAc,CAAC,EAAE,MAAM,GAAG,oBAAoB;IAG1G,MAAM,KAAK,SAAS,IAAI,oBAAoB,CAE3C;IACD,MAAM,KAAK,aAAa,IAAI,oBAAoB,CAE/C;IACD,MAAM,KAAK,aAAa,IAAI,oBAAoB,CAE/C;IACD,MAAM,KAAK,SAAS,IAAI,oBAAoB,CAE3C;IACD,YAAY,CAAC,EAAE,EAAE,kBAAkB,GAAG,oBAAoB;IAkB1D,MAAM,CAAC,YAAY,CAAC,EAAE,EAAE,kBAAkB,EAAE,IAAI,EAAE,oBAAoB,GAAG,oBAAoB;IAG7F,QAAQ,IAAI,MAAM;IAmBlB,IAAI,IAAI,oBAAoB;IAmB5B,qBAAqB,CAAC,MAAM,EAAE,sBAAsB,EAAE,cAAc,CAAC,EAAE,OAAO,GAAG,OAAO;IA0BxF,MAAM,CAAC,IAAI,CAAC,EAAE,EAAE,kBAAkB,GAAG,oBAAoB;IAGzD,MAAM,CAAC,QAAQ,CAAC,CAAC,EAAE,MAAM,GAAG,oBAAoB;IAGhD,MAAM,CAAC,QAAQ,CAAC,CAAC,EAAE,MAAM,EAAE,EAAE,EAAE,kBAAkB,GAAG,oBAAoB;IAGxE,MAAM,CAAC,IAAI,CAAC,CAAC,EAAE,IAAI,GAAG,oBAAoB;CAG7C;AAED,wBAAgB,yBAAyB,IAAI,QAAQ,CAEpD"}