@nfdi4plants/arctrl 2.5.1 → 3.0.0-alpha.2

package/Spreadsheet/Metadata/Protocols.js

@@ -1,116 +0,0 @@
-import { reverse, cons, iterate, iterateIndexed, map as map_1, initialize, singleton, length, empty, ofSeq, ofArray } from "../../fable_modules/fable-library-js.4.24.0/List.js";
-import { OntologyAnnotation } from "../../Core/OntologyAnnotation.js";
-import { defaultArg, map, unwrap } from "../../fable_modules/fable-library-js.4.24.0/Option.js";
-import { Component_toAggregatedStrings, ProtocolParameter_toAggregatedStrings, Option_fromValueWithDefault, Component_fromAggregatedStrings, ProtocolParameter_fromAggregatedStrings } from "./Conversions.js";
-import { Protocol_create_Z414665E7, Protocol_make } from "../../Core/Process/Protocol.js";
-import { URIModule_fromString } from "../../Core/URI.js";
-import { SparseTable_ToRows_759CAFC1, SparseTable_FromRows_Z5579EC29, SparseTable, SparseTable_Create_Z2192E64B, SparseTable__TryGetValue_11FD62A8, SparseTable__TryGetValueDefault_5BAE6133, SparseTable_GetEmptyComments_3ECCA699 } from "./SparseTable.js";
-import { Comment_toString, Comment_fromString } from "./Comment.js";
-import { addToDict } from "../../fable_modules/fable-library-js.4.24.0/MapUtil.js";
-import { List_distinct } from "../../fable_modules/fable-library-js.4.24.0/Seq2.js";
-import { stringHash } from "../../fable_modules/fable-library-js.4.24.0/Util.js";
-
-export const nameLabel = "Name";
-
-export const protocolTypeLabel = "Type";
-
-export const typeTermAccessionNumberLabel = "Type Term Accession Number";
-
-export const typeTermSourceREFLabel = "Type Term Source REF";
-
-export const descriptionLabel = "Description";
-
-export const uriLabel = "URI";
-
-export const versionLabel = "Version";
-
-export const parametersNameLabel = "Parameters Name";
-
-export const parametersTermAccessionNumberLabel = "Parameters Term Accession Number";
-
-export const parametersTermSourceREFLabel = "Parameters Term Source REF";
-
-export const componentsNameLabel = "Components Name";
-
-export const componentsTypeLabel = "Components Type";
-
-export const componentsTypeTermAccessionNumberLabel = "Components Type Term Accession Number";
-
-export const componentsTypeTermSourceREFLabel = "Components Type Term Source REF";
-
-export const labels = ofArray([nameLabel, protocolTypeLabel, typeTermAccessionNumberLabel, typeTermSourceREFLabel, descriptionLabel, uriLabel, versionLabel, parametersNameLabel, parametersTermAccessionNumberLabel, parametersTermSourceREFLabel, componentsNameLabel, componentsTypeLabel, componentsTypeTermAccessionNumberLabel, componentsTypeTermSourceREFLabel]);
-
-export function fromString(name, protocolType, typeTermAccessionNumber, typeTermSourceREF, description, uri, version, parametersName, parametersTermAccessionNumber, parametersTermSourceREF, componentsName, componentsType, componentsTypeTermAccessionNumber, componentsTypeTermSourceREF, comments) {
-    const protocolType_1 = OntologyAnnotation.create(unwrap(protocolType), unwrap(typeTermSourceREF), unwrap(typeTermAccessionNumber));
-    const parameters = ofSeq(ProtocolParameter_fromAggregatedStrings(";", parametersName, parametersTermSourceREF, parametersTermAccessionNumber));
-    const components = Component_fromAggregatedStrings(";", componentsName, componentsType, componentsTypeTermSourceREF, componentsTypeTermAccessionNumber);
-    return Protocol_make(undefined, map(URIModule_fromString, name), Option_fromValueWithDefault(new OntologyAnnotation(), protocolType_1), description, map(URIModule_fromString, uri), version, Option_fromValueWithDefault(empty(), parameters), Option_fromValueWithDefault(empty(), components), Option_fromValueWithDefault(empty(), comments));
-}
-
-export function fromSparseTable(matrix) {
-    if ((matrix.ColumnCount === 0) && (length(matrix.CommentKeys) !== 0)) {
-        return singleton(Protocol_create_Z414665E7(undefined, undefined, undefined, undefined, undefined, undefined, undefined, undefined, ofSeq(SparseTable_GetEmptyComments_3ECCA699(matrix))));
-    }
-    else {
-        return initialize(matrix.ColumnCount, (i) => {
-            const comments_1 = map_1((k) => Comment_fromString(k, SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [k, i])), matrix.CommentKeys);
-            return fromString(SparseTable__TryGetValue_11FD62A8(matrix, [nameLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [protocolTypeLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [typeTermAccessionNumberLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [typeTermSourceREFLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [descriptionLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [uriLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [versionLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [parametersNameLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [parametersTermAccessionNumberLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [parametersTermSourceREFLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [componentsNameLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [componentsTypeLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [componentsTypeTermAccessionNumberLabel, i]), SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [componentsTypeTermSourceREFLabel, i]), comments_1);
-        });
-    }
-}
-
-export function toSparseTable(protocols) {
-    const matrix = SparseTable_Create_Z2192E64B(undefined, labels, undefined, length(protocols) + 1);
-    let commentKeys = empty();
-    iterateIndexed((i, p) => {
-        const i_1 = (i + 1) | 0;
-        let pt_1;
-        const pt = defaultArg(p.ProtocolType, new OntologyAnnotation());
-        pt_1 = OntologyAnnotation.toStringObject(pt, true);
-        const pAgg = ProtocolParameter_toAggregatedStrings(";", defaultArg(p.Parameters, empty()));
-        const cAgg = Component_toAggregatedStrings(";", defaultArg(p.Components, empty()));
-        addToDict(matrix.Matrix, [nameLabel, i_1], defaultArg(p.Name, ""));
-        addToDict(matrix.Matrix, [protocolTypeLabel, i_1], pt_1.TermName);
-        addToDict(matrix.Matrix, [typeTermAccessionNumberLabel, i_1], pt_1.TermAccessionNumber);
-        addToDict(matrix.Matrix, [typeTermSourceREFLabel, i_1], pt_1.TermSourceREF);
-        addToDict(matrix.Matrix, [descriptionLabel, i_1], defaultArg(p.Description, ""));
-        addToDict(matrix.Matrix, [uriLabel, i_1], defaultArg(p.Uri, ""));
-        addToDict(matrix.Matrix, [versionLabel, i_1], defaultArg(p.Version, ""));
-        addToDict(matrix.Matrix, [parametersNameLabel, i_1], pAgg.TermNameAgg);
-        addToDict(matrix.Matrix, [parametersTermAccessionNumberLabel, i_1], pAgg.TermAccessionNumberAgg);
-        addToDict(matrix.Matrix, [parametersTermSourceREFLabel, i_1], pAgg.TermSourceREFAgg);
-        addToDict(matrix.Matrix, [componentsNameLabel, i_1], cAgg.NameAgg);
-        addToDict(matrix.Matrix, [componentsTypeLabel, i_1], cAgg.TermNameAgg);
-        addToDict(matrix.Matrix, [componentsTypeTermAccessionNumberLabel, i_1], cAgg.TermAccessionNumberAgg);
-        addToDict(matrix.Matrix, [componentsTypeTermSourceREFLabel, i_1], cAgg.TermSourceREFAgg);
-        const matchValue = p.Comments;
-        if (matchValue != null) {
-            iterate((comment) => {
-                const patternInput = Comment_toString(comment);
-                const n = patternInput[0];
-                commentKeys = cons(n, commentKeys);
-                addToDict(matrix.Matrix, [n, i_1], patternInput[1]);
-            }, matchValue);
-        }
-    }, protocols);
-    return new SparseTable(matrix.Matrix, matrix.Keys, reverse(List_distinct(commentKeys, {
-        Equals: (x, y) => (x === y),
-        GetHashCode: stringHash,
-    })), matrix.ColumnCount);
-}
-
-export function fromRows(prefix, lineNumber, rows) {
-    const tupledArg = (prefix == null) ? SparseTable_FromRows_Z5579EC29(rows, labels, lineNumber) : SparseTable_FromRows_Z5579EC29(rows, labels, lineNumber, prefix);
-    return [tupledArg[0], tupledArg[1], tupledArg[2], fromSparseTable(tupledArg[3])];
-}
-
-export function toRows(prefix, protocols) {
-    const m = toSparseTable(protocols);
-    if (prefix == null) {
-        return SparseTable_ToRows_759CAFC1(m);
-    }
-    else {
-        return SparseTable_ToRows_759CAFC1(m, prefix);
-    }
-}
-

package/Spreadsheet/Metadata/Publication.js

@@ -1,94 +0,0 @@
-import { reverse, cons, iterateIndexed, empty, map as map_1, initialize, singleton, length, ofArray } from "../../fable_modules/fable-library-js.4.24.0/List.js";
-import { OntologyAnnotation } from "../../Core/OntologyAnnotation.js";
-import { defaultArg, map, unwrap } from "../../fable_modules/fable-library-js.4.24.0/Option.js";
-import { URIModule_fromString } from "../../Core/URI.js";
-import { ResizeArray_iter, Option_fromValueWithDefault } from "../../Core/Helper/Collections.js";
-import { Publication } from "../../Core/Publication.js";
-import { SparseTable_ToRows_759CAFC1, SparseTable_FromRows_Z5579EC29, SparseTable, SparseTable_Create_Z2192E64B, SparseTable__TryGetValue_11FD62A8, SparseTable__TryGetValueDefault_5BAE6133, SparseTable_GetEmptyComments_3ECCA699 } from "./SparseTable.js";
-import { Comment_toString, Comment_fromString } from "./Comment.js";
-import { addToDict } from "../../fable_modules/fable-library-js.4.24.0/MapUtil.js";
-import { List_distinct } from "../../fable_modules/fable-library-js.4.24.0/Seq2.js";
-import { stringHash } from "../../fable_modules/fable-library-js.4.24.0/Util.js";
-
-export const pubMedIDLabel = "PubMed ID";
-
-export const doiLabel = "DOI";
-
-export const authorListLabel = "Author List";
-
-export const titleLabel = "Title";
-
-export const statusLabel = "Status";
-
-export const statusTermAccessionNumberLabel = "Status Term Accession Number";
-
-export const statusTermSourceREFLabel = "Status Term Source REF";
-
-export const labels = ofArray([pubMedIDLabel, doiLabel, authorListLabel, titleLabel, statusLabel, statusTermAccessionNumberLabel, statusTermSourceREFLabel]);
-
-export function fromString(pubMedID, doi, author, title, status, statusTermSourceREF, statusTermAccessionNumber, comments) {
-    const status_1 = new OntologyAnnotation(unwrap(status), unwrap(statusTermSourceREF), unwrap(statusTermAccessionNumber));
-    const pubMedID_1 = map(URIModule_fromString, pubMedID);
-    const status_2 = Option_fromValueWithDefault(new OntologyAnnotation(), status_1);
-    return Publication.make(pubMedID_1, doi, author, title, status_2, comments);
-}
-
-export function fromSparseTable(matrix) {
-    let returnVal;
-    if ((matrix.ColumnCount === 0) && (length(matrix.CommentKeys) !== 0)) {
-        const comments = SparseTable_GetEmptyComments_3ECCA699(matrix);
-        return singleton((returnVal = Publication.create(), (returnVal.Comments = comments, returnVal)));
-    }
-    else {
-        return initialize(matrix.ColumnCount, (i) => {
-            let comments_1;
-            const collection = map_1((k) => Comment_fromString(k, SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [k, i])), matrix.CommentKeys);
-            comments_1 = Array.from(collection);
-            return fromString(SparseTable__TryGetValue_11FD62A8(matrix, [pubMedIDLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [doiLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [authorListLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [titleLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [statusLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [statusTermSourceREFLabel, i]), SparseTable__TryGetValue_11FD62A8(matrix, [statusTermAccessionNumberLabel, i]), comments_1);
-        });
-    }
-}
-
-export function toSparseTable(publications) {
-    const matrix = SparseTable_Create_Z2192E64B(undefined, labels, undefined, length(publications) + 1);
-    let commentKeys = empty();
-    iterateIndexed((i, p) => {
-        const i_1 = (i + 1) | 0;
-        let s_1;
-        const s = defaultArg(p.Status, new OntologyAnnotation());
-        s_1 = OntologyAnnotation.toStringObject(s, true);
-        addToDict(matrix.Matrix, [pubMedIDLabel, i_1], defaultArg(p.PubMedID, ""));
-        addToDict(matrix.Matrix, [doiLabel, i_1], defaultArg(p.DOI, ""));
-        addToDict(matrix.Matrix, [authorListLabel, i_1], defaultArg(p.Authors, ""));
-        addToDict(matrix.Matrix, [titleLabel, i_1], defaultArg(p.Title, ""));
-        addToDict(matrix.Matrix, [statusLabel, i_1], s_1.TermName);
-        addToDict(matrix.Matrix, [statusTermAccessionNumberLabel, i_1], s_1.TermAccessionNumber);
-        addToDict(matrix.Matrix, [statusTermSourceREFLabel, i_1], s_1.TermSourceREF);
-        ResizeArray_iter((comment) => {
-            const patternInput = Comment_toString(comment);
-            const n = patternInput[0];
-            commentKeys = cons(n, commentKeys);
-            addToDict(matrix.Matrix, [n, i_1], patternInput[1]);
-        }, p.Comments);
-    }, publications);
-    return new SparseTable(matrix.Matrix, matrix.Keys, reverse(List_distinct(commentKeys, {
-        Equals: (x, y) => (x === y),
-        GetHashCode: stringHash,
-    })), matrix.ColumnCount);
-}
-
-export function fromRows(prefix, lineNumber, rows) {
-    const tupledArg = (prefix == null) ? SparseTable_FromRows_Z5579EC29(rows, labels, lineNumber) : SparseTable_FromRows_Z5579EC29(rows, labels, lineNumber, prefix);
-    return [tupledArg[0], tupledArg[1], tupledArg[2], fromSparseTable(tupledArg[3])];
-}
-
-export function toRows(prefix, publications) {
-    const m = toSparseTable(publications);
-    if (prefix == null) {
-        return SparseTable_ToRows_759CAFC1(m);
-    }
-    else {
-        return SparseTable_ToRows_759CAFC1(m, prefix);
-    }
-}
-

package/Spreadsheet/Metadata/SparseTable.js

@@ -1,459 +0,0 @@
-import { append as append_1, delay, tryItem, length as length_1, isEmpty, iterate, fold, tryPick, maxBy, initialize, choose, map, indexed } from "../../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { defaultArg, map as map_1 } from "../../fable_modules/fable-library-js.4.24.0/Option.js";
-import { tryFind, ofSeq } from "../../fable_modules/fable-library-js.4.24.0/Map.js";
-import { arrayHash, equalArrays, equals, comparePrimitives } from "../../fable_modules/fable-library-js.4.24.0/Util.js";
-import { RowBuilder_get_Empty, RowBuilder__Combine_19F30600, RowBuilder_$ctor } from "../../fable_modules/FsSpreadsheet.6.3.1/DSL/RowBuilder.fs.js";
-import { CellBuilder_$ctor, CellBuilder__AsCellElement_6F87C2ED } from "../../fable_modules/FsSpreadsheet.6.3.1/DSL/CellBuilder.fs.js";
-import { Messages_format, SheetEntity$1_some_2B595 } from "../../fable_modules/FsSpreadsheet.6.3.1/DSL/Types.fs.js";
-import { DataType } from "../../fable_modules/FsSpreadsheet.6.3.1/Cells/FsCell.fs.js";
-import { map as map_2, initialize as initialize_1, exists, find, cons, append, empty, singleton } from "../../fable_modules/fable-library-js.4.24.0/List.js";
-import { ColumnIndex, RowElement } from "../../fable_modules/FsSpreadsheet.6.3.1/DSL/Types.fs.js";
-import { FsRangeAddress_$ctor_7E77A4A0 } from "../../fable_modules/FsSpreadsheet.6.3.1/Ranges/FsRangeAddress.fs.js";
-import { FsAddress_$ctor_Z37302880 } from "../../fable_modules/FsSpreadsheet.6.3.1/FsAddress.fs.js";
-import { Record } from "../../fable_modules/fable-library-js.4.24.0/Types.js";
-import { record_type, list_type, class_type, tuple_type, int32_type, string_type } from "../../fable_modules/fable-library-js.4.24.0/Reflection.js";
-import { Seq_trySkip, Dictionary_tryGetValue } from "../CollectionAux.js";
-import { addToDict, getItemFromDict } from "../../fable_modules/fable-library-js.4.24.0/MapUtil.js";
-import { Dictionary } from "../../fable_modules/fable-library-js.4.24.0/MutableMap.js";
-import { printf, toFail } from "../../fable_modules/fable-library-js.4.24.0/String.js";
-import { Comment$, Remark } from "../../Core/Comment.js";
-import { Comment_wrapCommentKey, Comment_$007CComment$007C_$007C, Remark_$007CRemark$007C_$007C } from "./Comment.js";
-
-export function SparseRowModule_fromValues(v) {
-    return indexed(v);
-}
-
-export function SparseRowModule_getValues(i) {
-    return map((tuple) => tuple[1], i);
-}
-
-export function SparseRowModule_fromAllValues(v) {
-    return choose((tupledArg) => map_1((v_1) => [tupledArg[0], v_1], tupledArg[1]), indexed(v));
-}
-
-export function SparseRowModule_getAllValues(i) {
-    const m = ofSeq(i, {
-        Compare: comparePrimitives,
-    });
-    return initialize(maxBy((tuple) => tuple[0], i, {
-        Compare: comparePrimitives,
-    })[0] + 1, (i_1) => tryFind(i_1, m));
-}
-
-export function SparseRowModule_fromFsRow(r) {
-    return choose((c) => {
-        if (equals(c.Value, "")) {
-            return undefined;
-        }
-        else {
-            return [c.ColumnNumber - 1, c.ValueAsString()];
-        }
-    }, r.Cells);
-}
-
-export function SparseRowModule_tryGetValueAt(i, vs) {
-    return tryPick((tupledArg) => {
-        if (tupledArg[0] === i) {
-            return tupledArg[1];
-        }
-        else {
-            return undefined;
-        }
-    }, vs);
-}
-
-export function SparseRowModule_toDSLRow(vs) {
-    const builder$0040 = RowBuilder_$ctor();
-    let this$_9;
-    const ns = map((_arg) => {
-        const v = _arg;
-        if (v == null) {
-            let c_1;
-            const this$_5 = CellBuilder__AsCellElement_6F87C2ED(CellBuilder_$ctor(), SheetEntity$1_some_2B595(singleton([new DataType(0, []), ""])));
-            let matchResult, errs_1, f_1, ms_2_1;
-            switch (this$_5.tag) {
-                case 1: {
-                    if (equals(this$_5.fields[0], empty())) {
-                        matchResult = 1;
-                        ms_2_1 = this$_5.fields[0];
-                    }
-                    else {
-                        matchResult = 2;
-                    }
-                    break;
-                }
-                case 2: {
-                    if (equals(this$_5.fields[0], empty())) {
-                        matchResult = 1;
-                        ms_2_1 = this$_5.fields[0];
-                    }
-                    else {
-                        matchResult = 2;
-                    }
-                    break;
-                }
-                default: {
-                    matchResult = 0;
-                    errs_1 = this$_5.fields[1];
-                    f_1 = this$_5.fields[0];
-                }
-            }
-            switch (matchResult) {
-                case 0: {
-                    c_1 = f_1;
-                    break;
-                }
-                case 1: {
-                    throw new Error("SheetEntity does not contain Value.");
-                    break;
-                }
-                default: {
-                    let matchResult_1, ms_3_1;
-                    switch (this$_5.tag) {
-                        case 1: {
-                            matchResult_1 = 0;
-                            ms_3_1 = this$_5.fields[0];
-                            break;
-                        }
-                        case 2: {
-                            matchResult_1 = 0;
-                            ms_3_1 = this$_5.fields[0];
-                            break;
-                        }
-                        default:
-                            matchResult_1 = 1;
-                    }
-                    switch (matchResult_1) {
-                        case 0: {
-                            throw new Error(`SheetEntity does not contain Value: 
-	${Messages_format(ms_3_1)}`);
-                            break;
-                        }
-                        default:
-                            throw new Error("Match failure: FsSpreadsheet.DSL.SheetEntity`1");
-                    }
-                }
-            }
-            return SheetEntity$1_some_2B595(singleton((c_1[1] == null) ? (new RowElement(1, [c_1[0]])) : (new RowElement(0, [new ColumnIndex(c_1[1]), c_1[0]]))));
-        }
-        else {
-            const v_1 = v;
-            let c;
-            const this$_2 = CellBuilder__AsCellElement_6F87C2ED(CellBuilder_$ctor(), SheetEntity$1_some_2B595(singleton([new DataType(0, []), v_1])));
-            let matchResult_2, errs, f, ms_2;
-            switch (this$_2.tag) {
-                case 1: {
-                    if (equals(this$_2.fields[0], empty())) {
-                        matchResult_2 = 1;
-                        ms_2 = this$_2.fields[0];
-                    }
-                    else {
-                        matchResult_2 = 2;
-                    }
-                    break;
-                }
-                case 2: {
-                    if (equals(this$_2.fields[0], empty())) {
-                        matchResult_2 = 1;
-                        ms_2 = this$_2.fields[0];
-                    }
-                    else {
-                        matchResult_2 = 2;
-                    }
-                    break;
-                }
-                default: {
-                    matchResult_2 = 0;
-                    errs = this$_2.fields[1];
-                    f = this$_2.fields[0];
-                }
-            }
-            switch (matchResult_2) {
-                case 0: {
-                    c = f;
-                    break;
-                }
-                case 1: {
-                    throw new Error("SheetEntity does not contain Value.");
-                    break;
-                }
-                default: {
-                    let matchResult_3, ms_3;
-                    switch (this$_2.tag) {
-                        case 1: {
-                            matchResult_3 = 0;
-                            ms_3 = this$_2.fields[0];
-                            break;
-                        }
-                        case 2: {
-                            matchResult_3 = 0;
-                            ms_3 = this$_2.fields[0];
-                            break;
-                        }
-                        default:
-                            matchResult_3 = 1;
-                    }
-                    switch (matchResult_3) {
-                        case 0: {
-                            throw new Error(`SheetEntity does not contain Value: 
-	${Messages_format(ms_3)}`);
-                            break;
-                        }
-                        default:
-                            throw new Error("Match failure: FsSpreadsheet.DSL.SheetEntity`1");
-                    }
-                }
-            }
-            return SheetEntity$1_some_2B595(singleton((c[1] == null) ? (new RowElement(1, [c[0]])) : (new RowElement(0, [new ColumnIndex(c[1]), c[0]]))));
-        }
-    }, SparseRowModule_getAllValues(vs));
-    this$_9 = fold((state, we) => RowBuilder__Combine_19F30600(builder$0040, state, we), RowBuilder_get_Empty(), ns);
-    let matchResult_4, errs_2, f_3, ms_2_2;
-    switch (this$_9.tag) {
-        case 1: {
-            if (equals(this$_9.fields[0], empty())) {
-                matchResult_4 = 1;
-                ms_2_2 = this$_9.fields[0];
-            }
-            else {
-                matchResult_4 = 2;
-            }
-            break;
-        }
-        case 2: {
-            if (equals(this$_9.fields[0], empty())) {
-                matchResult_4 = 1;
-                ms_2_2 = this$_9.fields[0];
-            }
-            else {
-                matchResult_4 = 2;
-            }
-            break;
-        }
-        default: {
-            matchResult_4 = 0;
-            errs_2 = this$_9.fields[1];
-            f_3 = this$_9.fields[0];
-        }
-    }
-    switch (matchResult_4) {
-        case 0:
-            return f_3;
-        case 1:
-            throw new Error("SheetEntity does not contain Value.");
-        default: {
-            let matchResult_5, ms_3_2;
-            switch (this$_9.tag) {
-                case 1: {
-                    matchResult_5 = 0;
-                    ms_3_2 = this$_9.fields[0];
-                    break;
-                }
-                case 2: {
-                    matchResult_5 = 0;
-                    ms_3_2 = this$_9.fields[0];
-                    break;
-                }
-                default:
-                    matchResult_5 = 1;
-            }
-            switch (matchResult_5) {
-                case 0:
-                    throw new Error(`SheetEntity does not contain Value: 
-	${Messages_format(ms_3_2)}`);
-                default:
-                    throw new Error("Match failure: FsSpreadsheet.DSL.SheetEntity`1");
-            }
-        }
-    }
-}
-
-export function SparseRowModule_readFromSheet(sheet) {
-    return map(SparseRowModule_fromFsRow, sheet.Rows);
-}
-
-export function SparseRowModule_writeToSheet(rowI, row, sheet) {
-    const fsRow = sheet.RowWithRange(FsRangeAddress_$ctor_7E77A4A0(FsAddress_$ctor_Z37302880(rowI, 1), FsAddress_$ctor_Z37302880(rowI, 1)), true);
-    iterate((tupledArg) => {
-        const v = tupledArg[1];
-        if (v.trim() !== "") {
-            fsRow.Item(tupledArg[0] + 1).SetValueAs(v);
-        }
-    }, row);
-}
-
-export class SparseTable extends Record {
-    constructor(Matrix, Keys, CommentKeys, ColumnCount) {
-        super();
-        this.Matrix = Matrix;
-        this.Keys = Keys;
-        this.CommentKeys = CommentKeys;
-        this.ColumnCount = (ColumnCount | 0);
-    }
-}
-
-export function SparseTable_$reflection() {
-    return record_type("ARCtrl.Spreadsheet.SparseTable", [], SparseTable, () => [["Matrix", class_type("System.Collections.Generic.Dictionary`2", [tuple_type(string_type, int32_type), string_type])], ["Keys", list_type(string_type)], ["CommentKeys", list_type(string_type)], ["ColumnCount", int32_type]]);
-}
-
-export function SparseTable__TryGetValue_11FD62A8(this$, key) {
-    return Dictionary_tryGetValue(key, this$.Matrix);
-}
-
-export function SparseTable__TryGetValueDefault_5BAE6133(this$, defaultValue, key) {
-    if (this$.Matrix.has(key)) {
-        return getItemFromDict(this$.Matrix, key);
-    }
-    else {
-        return defaultValue;
-    }
-}
-
-export function SparseTable_Create_Z2192E64B(matrix, keys, commentKeys, length) {
-    return new SparseTable(defaultArg(matrix, new Dictionary([], {
-        Equals: equalArrays,
-        GetHashCode: arrayHash,
-    })), defaultArg(keys, empty()), defaultArg(commentKeys, empty()), defaultArg(length, 0));
-}
-
-export function SparseTable_AddRow(key, values, matrix) {
-    iterate((tupledArg) => {
-        addToDict(matrix.Matrix, [key, tupledArg[0]], tupledArg[1]);
-    }, values);
-    const length = (isEmpty(values) ? 0 : (1 + maxBy((tuple) => tuple[0], values, {
-        Compare: comparePrimitives,
-    })[0])) | 0;
-    return new SparseTable(matrix.Matrix, append(matrix.Keys, singleton(key)), matrix.CommentKeys, (length > matrix.ColumnCount) ? length : matrix.ColumnCount);
-}
-
-export function SparseTable_AddEmptyComment(key, matrix) {
-    return new SparseTable(matrix.Matrix, matrix.Keys, append(matrix.CommentKeys, singleton(key)), matrix.ColumnCount);
-}
-
-export function SparseTable_AddComment(key, values, matrix) {
-    if (length_1(values) === 0) {
-        return SparseTable_AddEmptyComment(key, matrix);
-    }
-    else {
-        iterate((tupledArg) => {
-            addToDict(matrix.Matrix, [key, tupledArg[0]], tupledArg[1]);
-        }, values);
-        const length = (isEmpty(values) ? 0 : (1 + maxBy((tuple) => tuple[0], values, {
-            Compare: comparePrimitives,
-        })[0])) | 0;
-        return new SparseTable(matrix.Matrix, matrix.Keys, append(matrix.CommentKeys, singleton(key)), (length > matrix.ColumnCount) ? length : matrix.ColumnCount);
-    }
-}
-
-export function SparseTable_FromRows_Z5579EC29(en, labels, lineNumber, prefix) {
-    try {
-        const prefix_1 = (prefix == null) ? "" : (prefix + " ");
-        const loop = (matrix_mut, remarks_mut, lineNumber_1_mut) => {
-            let v_2, k_1;
-            loop:
-            while (true) {
-                const matrix = matrix_mut, remarks = remarks_mut, lineNumber_1 = lineNumber_1_mut;
-                if (en["System.Collections.IEnumerator.MoveNext"]()) {
-                    const row = map((tupledArg) => [tupledArg[0] - 1, tupledArg[1]], en["System.Collections.Generic.IEnumerator`1.get_Current"]());
-                    const matchValue = map_1((tuple) => tuple[1], tryItem(0, row));
-                    const vals = Seq_trySkip(1, row);
-                    const key = matchValue;
-                    let matchResult, k, v_1;
-                    if (key != null) {
-                        const activePatternResult = Comment_$007CComment$007C_$007C(key);
-                        if (activePatternResult != null) {
-                            if (vals != null) {
-                                matchResult = 0;
-                                k = activePatternResult;
-                                v_1 = vals;
-                            }
-                            else {
-                                matchResult = 1;
-                            }
-                        }
-                        else {
-                            matchResult = 1;
-                        }
-                    }
-                    else {
-                        matchResult = 1;
-                    }
-                    switch (matchResult) {
-                        case 0: {
-                            matrix_mut = SparseTable_AddComment(k, v_1, matrix);
-                            remarks_mut = remarks;
-                            lineNumber_1_mut = (lineNumber_1 + 1);
-                            continue loop;
-                        }
-                        default: {
-                            let matchResult_1, k_2, k_3, v_3, k_4;
-                            const activePatternResult_1 = Remark_$007CRemark$007C_$007C(key);
-                            if (activePatternResult_1 != null) {
-                                matchResult_1 = 0;
-                                k_2 = activePatternResult_1;
-                            }
-                            else if (key != null) {
-                                if (vals != null) {
-                                    if ((v_2 = vals, (k_1 = key, exists((label) => (k_1 === (prefix_1 + label)), labels)))) {
-                                        matchResult_1 = 1;
-                                        k_3 = key;
-                                        v_3 = vals;
-                                    }
-                                    else {
-                                        matchResult_1 = 2;
-                                        k_4 = key;
-                                    }
-                                }
-                                else {
-                                    matchResult_1 = 2;
-                                    k_4 = key;
-                                }
-                            }
-                            else {
-                                matchResult_1 = 3;
-                            }
-                            switch (matchResult_1) {
-                                case 0: {
-                                    matrix_mut = matrix;
-                                    remarks_mut = cons(Remark.make(lineNumber_1, k_2), remarks);
-                                    lineNumber_1_mut = (lineNumber_1 + 1);
-                                    continue loop;
-                                }
-                                case 1: {
-                                    matrix_mut = SparseTable_AddRow(find((label_1) => (k_3 === (prefix_1 + label_1)), labels), v_3, matrix);
-                                    remarks_mut = remarks;
-                                    lineNumber_1_mut = (lineNumber_1 + 1);
-                                    continue loop;
-                                }
-                                case 2:
-                                    return [k_4, lineNumber_1, remarks, matrix];
-                                default:
-                                    return [undefined, lineNumber_1, remarks, matrix];
-                            }
-                        }
-                    }
-                }
-                else {
-                    return [undefined, lineNumber_1, remarks, matrix];
-                }
-                break;
-            }
-        };
-        return loop(SparseTable_Create_Z2192E64B(), empty(), lineNumber);
-    }
-    catch (err) {
-        const arg_1 = err.message;
-        return toFail(printf("Error parsing block in investigation file starting from line number %i: %s"))(lineNumber)(arg_1);
-    }
-}
-
-export function SparseTable_ToRows_759CAFC1(matrix, prefix) {
-    const prefix_1 = (prefix == null) ? "" : (prefix + " ");
-    return delay(() => append_1(map((key) => SparseRowModule_fromValues(cons(prefix_1 + key, initialize_1(matrix.ColumnCount - 1, (i) => SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [key, i + 1])))), matrix.Keys), delay(() => map((key_1) => SparseRowModule_fromValues(cons(Comment_wrapCommentKey(key_1), initialize_1(matrix.ColumnCount - 1, (i_1) => SparseTable__TryGetValueDefault_5BAE6133(matrix, "", [key_1, i_1 + 1])))), matrix.CommentKeys))));
-}
-
-export function SparseTable_GetEmptyComments_3ECCA699(matrix) {
-    const collection = map_2((key) => Comment$.create(key), matrix.CommentKeys);
-    return Array.from(collection);
-}
-