@nfdi4plants/arctrl 1.1.0 → 2.0.0-alpha.1

package/ISA/ISA.Json/ArcTypes/ArcTable.js

@@ -1,178 +0,0 @@
-import { toString, tuple2, map as map_1, list, object } from "../../../fable_modules/Thoth.Json.10.1.0/Encode.fs.js";
-import { iterate, toArray, collect, empty, map, singleton, append, delay, toList } from "../../../fable_modules/fable-library.4.5.0/Seq.js";
-import { CompositeHeader_decoder, CompositeHeader_encoder } from "./CompositeHeader.js";
-import { CompositeCell_decoder, CompositeCell_encoder } from "./CompositeCell.js";
-import { empty as empty_2, ofSeq } from "../../../fable_modules/fable-library.4.5.0/Map.js";
-import { safeHash, equals, arrayHash, equalArrays, uncurry2, compareArrays } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { fromString, value as value_5, array as array_1, string, int, tuple2 as tuple2_1, map$0027, list as list_1, object as object_1 } from "../../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { toArray as toArray_1, defaultArg } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { empty as empty_1 } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { Dictionary } from "../../../fable_modules/fable-library.4.5.0/MutableMap.js";
-import { ArcTable } from "../../ISA/ArcTypes/ArcTable.js";
-import { CellTable_arrayFromMap, CellTable_encoder, CellTable_decoder, CellTable_decodeCell, CellTable_encodeCell } from "./CellTable.js";
-import { addToDict, getItemFromDict } from "../../../fable_modules/fable-library.4.5.0/MapUtil.js";
-import { rangeDouble } from "../../../fable_modules/fable-library.4.5.0/Range.js";
-import { iterateIndexed } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { StringTable_arrayFromMap, StringTable_encoder, StringTable_decoder, StringTable_decodeString, StringTable_encodeString } from "../StringTable.js";
-import { printf, toFail } from "../../../fable_modules/fable-library.4.5.0/String.js";
-import { OATable_arrayFromMap, OATable_encoder, OATable_decoder } from "./OATable.js";
-
-export function ArcTable_encoder(table) {
-    return object(toList(delay(() => append(singleton(["name", table.Name]), delay(() => append((table.Headers.length !== 0) ? singleton(["header", list(toList(delay(() => map(CompositeHeader_encoder, table.Headers))))]) : empty(), delay(() => ((table.Values.size !== 0) ? singleton(["values", map_1((tupledArg) => tuple2((value) => value, (value_2) => value_2, tupledArg[0], tupledArg[1]), CompositeCell_encoder, ofSeq(toList(delay(() => collect((matchValue) => {
-        const activePatternResult = matchValue;
-        return singleton([activePatternResult[0], activePatternResult[1]]);
-    }, table.Values))), {
-        Compare: compareArrays,
-    }))]) : empty()))))))));
-}
-
-export const ArcTable_decoder = (path_2) => ((v) => object_1((get$) => {
-    let objectArg, arg_5, objectArg_1, objectArg_2;
-    let decodedHeader;
-    const collection = defaultArg((objectArg = get$.Optional, objectArg.Field("header", (path, value) => list_1(uncurry2(CompositeHeader_decoder), path, value))), empty_1());
-    decodedHeader = Array.from(collection);
-    const decodedValues = new Dictionary(defaultArg((arg_5 = map$0027(uncurry2(tuple2_1(uncurry2(int), uncurry2(int))), uncurry2((arg_2) => {
-        const clo = CompositeCell_decoder(arg_2);
-        return clo;
-    })), (objectArg_1 = get$.Optional, objectArg_1.Field("values", uncurry2(arg_5)))), empty_2({
-        Compare: compareArrays,
-    })), {
-        Equals: equalArrays,
-        GetHashCode: arrayHash,
-    });
-    return ArcTable.create((objectArg_2 = get$.Required, objectArg_2.Field("name", string)), decodedHeader, decodedValues);
-}, path_2, v));
-
-export function ArcTable_compressedColumnEncoder(columnIndex, rowCount, cellTable, table) {
-    if (table.Headers[columnIndex].IsIOType ? true : (rowCount < 100)) {
-        return toArray(delay(() => map((r) => CellTable_encodeCell(cellTable, getItemFromDict(table.Values, [columnIndex, r])), rangeDouble(0, 1, rowCount - 1))));
-    }
-    else {
-        let current = getItemFromDict(table.Values, [columnIndex, 0]);
-        let from = 0;
-        return toArray(delay(() => append(collect((i) => {
-            const next = getItemFromDict(table.Values, [columnIndex, i]);
-            return !equals(next, current) ? append(singleton(object([["f", from], ["t", i - 1], ["v", CellTable_encodeCell(cellTable, current)]])), delay(() => {
-                current = next;
-                from = (i | 0);
-                return empty();
-            })) : empty();
-        }, rangeDouble(1, 1, rowCount - 1)), delay(() => singleton(object([["f", from], ["t", rowCount - 1], ["v", CellTable_encodeCell(cellTable, current)]]))))));
-    }
-}
-
-export function ArcTable_compressedColumnDecoder(columnIndex, cellTable, table, column) {
-    const matchValue = array_1((s, o) => CellTable_decodeCell(cellTable, s, o), "", column);
-    if (matchValue.tag === 1) {
-        array_1((s_1, jv) => object_1((get$) => {
-            let from;
-            const objectArg = get$.Required;
-            from = objectArg.Field("f", uncurry2(int));
-            let to_;
-            const objectArg_1 = get$.Required;
-            to_ = objectArg_1.Field("t", uncurry2(int));
-            let value;
-            const objectArg_2 = get$.Required;
-            value = objectArg_2.Field("v", (s_2, o_1) => CellTable_decodeCell(cellTable, s_2, o_1));
-            for (let i = from; i <= to_; i++) {
-                addToDict(table.Values, [columnIndex, i], value);
-            }
-        }, s_1, jv), "", column);
-    }
-    else {
-        iterateIndexed((r, cell) => {
-            addToDict(table.Values, [columnIndex, r], cell);
-        }, matchValue.fields[0]);
-    }
-}
-
-export function ArcTable_compressedEncoder(stringTable, oaTable, cellTable, table) {
-    return object(toList(delay(() => append(singleton(["n", StringTable_encodeString(stringTable, table.Name)]), delay(() => append((table.Headers.length !== 0) ? singleton(["h", list(toList(delay(() => map(CompositeHeader_encoder, table.Headers))))]) : empty(), delay(() => {
-        if (table.Values.size !== 0) {
-            const rowCount = table.RowCount | 0;
-            return singleton(["c", toArray(delay(() => map((c) => ArcTable_compressedColumnEncoder(c, rowCount, cellTable, table), rangeDouble(0, 1, table.ColumnCount - 1))))]);
-        }
-        else {
-            return empty();
-        }
-    })))))));
-}
-
-export function ArcTable_compressedDecoder(stringTable, oaTable, cellTable) {
-    return (path_2) => ((v_1) => object_1((get$) => {
-        let objectArg, objectArg_1, objectArg_2;
-        let decodedHeader;
-        const collection = defaultArg((objectArg = get$.Optional, objectArg.Field("h", (path, value) => list_1(uncurry2(CompositeHeader_decoder), path, value))), empty_1());
-        decodedHeader = Array.from(collection);
-        const table = ArcTable.create((objectArg_1 = get$.Required, objectArg_1.Field("n", (s, o) => StringTable_decodeString(stringTable, s, o))), decodedHeader, new Dictionary([], {
-            Equals: equalArrays,
-            GetHashCode: arrayHash,
-        }));
-        iterate((array) => {
-            iterateIndexed((c, col) => {
-                ArcTable_compressedColumnDecoder(c, cellTable, table, col);
-            }, array);
-        }, toArray_1((objectArg_2 = get$.Optional, objectArg_2.Field("c", (path_1, value_2) => array_1(value_5, path_1, value_2)))));
-        return table;
-    }, path_2, v_1));
-}
-
-export function ARCtrl_ISA_ArcTable__ArcTable_fromJsonString_Static_Z721C83C5(jsonString) {
-    const matchValue = fromString(uncurry2(ArcTable_decoder), jsonString);
-    if (matchValue.tag === 1) {
-        return toFail(printf("Error. Unable to parse json string to ArcTable: %s"))(matchValue.fields[0]);
-    }
-    else {
-        return matchValue.fields[0];
-    }
-}
-
-export function ARCtrl_ISA_ArcTable__ArcTable_ToJsonString_71136F3F(this$, spaces) {
-    return toString(defaultArg(spaces, 0), ArcTable_encoder(this$));
-}
-
-export function ARCtrl_ISA_ArcTable__ArcTable_toJsonString_Static_1B2566EA(a) {
-    return ARCtrl_ISA_ArcTable__ArcTable_ToJsonString_71136F3F(a);
-}
-
-export function ARCtrl_ISA_ArcTable__ArcTable_fromCompressedJsonString_Static_Z721C83C5(jsonString) {
-    const matchValue = fromString((path, v) => object_1((get$) => {
-        let arg_5, objectArg_2;
-        let stringTable;
-        const objectArg = get$.Required;
-        stringTable = objectArg.Field("stringTable", uncurry2(StringTable_decoder));
-        let oaTable;
-        const arg_3 = OATable_decoder(stringTable);
-        const objectArg_1 = get$.Required;
-        oaTable = objectArg_1.Field("oaTable", uncurry2(arg_3));
-        const arg_7 = ArcTable_compressedDecoder(stringTable, oaTable, (arg_5 = CellTable_decoder(stringTable, oaTable), (objectArg_2 = get$.Required, objectArg_2.Field("cellTable", uncurry2(arg_5)))));
-        const objectArg_3 = get$.Required;
-        return objectArg_3.Field("table", uncurry2(arg_7));
-    }, path, v), jsonString);
-    if (matchValue.tag === 1) {
-        return toFail(printf("Error. Unable to parse json string to ArcTable: %s"))(matchValue.fields[0]);
-    }
-    else {
-        return matchValue.fields[0];
-    }
-}
-
-export function ARCtrl_ISA_ArcTable__ArcTable_ToCompressedJsonString_71136F3F(this$, spaces) {
-    const spaces_1 = defaultArg(spaces, 0) | 0;
-    const stringTable = new Map([]);
-    const oaTable = new Dictionary([], {
-        Equals: equals,
-        GetHashCode: safeHash,
-    });
-    const cellTable = new Dictionary([], {
-        Equals: equals,
-        GetHashCode: safeHash,
-    });
-    const arcTable = ArcTable_compressedEncoder(stringTable, oaTable, cellTable, this$);
-    return toString(spaces_1, object([["cellTable", CellTable_encoder(stringTable, oaTable, CellTable_arrayFromMap(cellTable))], ["oaTable", OATable_encoder(stringTable, OATable_arrayFromMap(oaTable))], ["stringTable", StringTable_encoder(StringTable_arrayFromMap(stringTable))], ["table", arcTable]]));
-}
-
-export function ARCtrl_ISA_ArcTable__ArcTable_toCompressedJsonString_Static_1B2566EA(a) {
-    return ARCtrl_ISA_ArcTable__ArcTable_ToCompressedJsonString_71136F3F(a);
-}
-

package/ISA/ISA.Json/ArcTypes/CellTable.js

@@ -1,46 +0,0 @@
-import { sortBy, map, toArray } from "../../../fable_modules/fable-library.4.5.0/Seq.js";
-import { uncurry2, comparePrimitives } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { map as map_1 } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { CompositeCell_compressedDecoder, CompositeCell_compressedEncoder } from "./CompositeCell.js";
-import { int, array as array_1 } from "../../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { Dict_tryFind } from "../../ISA/Helper.js";
-import { addToDict } from "../../../fable_modules/fable-library.4.5.0/MapUtil.js";
-import { FSharpResult$2 } from "../../../fable_modules/fable-library.4.5.0/Choice.js";
-
-export function CellTable_arrayFromMap(otm) {
-    return toArray(map((kv_1) => kv_1[0], sortBy((kv) => kv[1], otm, {
-        Compare: comparePrimitives,
-    })));
-}
-
-export function CellTable_encoder(stringTable, oaTable, ot) {
-    return map_1((cc) => CompositeCell_compressedEncoder(stringTable, oaTable, cc), ot);
-}
-
-export function CellTable_decoder(stringTable, oaTable) {
-    const decoder = CompositeCell_compressedDecoder(stringTable, oaTable);
-    return (path) => ((value) => array_1(uncurry2(decoder), path, value));
-}
-
-export function CellTable_encodeCell(otm, cc) {
-    const matchValue = Dict_tryFind(cc, otm);
-    if (matchValue == null) {
-        const i_1 = otm.size | 0;
-        addToDict(otm, cc, i_1);
-        return i_1;
-    }
-    else {
-        return matchValue;
-    }
-}
-
-export function CellTable_decodeCell(ot, s, o) {
-    const matchValue = int(s)(o);
-    if (matchValue.tag === 1) {
-        return new FSharpResult$2(1, [matchValue.fields[0]]);
-    }
-    else {
-        return new FSharpResult$2(0, [ot[matchValue.fields[0]]]);
-    }
-}
-

package/ISA/ISA.Json/ArcTypes/CompositeCell.js

@@ -1,77 +0,0 @@
-import { OntologyAnnotation_decoder, OntologyAnnotation_encoder } from "../Ontology.js";
-import { ConverterOptions_$ctor } from "../ConverterOptions.js";
-import { ofArray, singleton } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { toString, list, object } from "../../../fable_modules/Thoth.Json.10.1.0/Encode.fs.js";
-import { fromString, index, string, object as object_1 } from "../../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { CompositeCell } from "../../ISA/ArcTypes/CompositeCell.js";
-import { uncurry2 } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { printf, toFail } from "../../../fable_modules/fable-library.4.5.0/String.js";
-import { OATable_decodeOA, OATable_encodeOA } from "./OATable.js";
-import { StringTable_decodeString, StringTable_encodeString } from "../StringTable.js";
-import { defaultArg } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-
-export function CompositeCell_encoder(cc) {
-    const oaToJsonString = (oa) => OntologyAnnotation_encoder(ConverterOptions_$ctor(), oa);
-    const patternInput = (cc.tag === 0) ? ["Term", singleton(oaToJsonString(cc.fields[0]))] : ((cc.tag === 2) ? ["Unitized", ofArray([cc.fields[0], oaToJsonString(cc.fields[1])])] : ["FreeText", singleton(cc.fields[0])]);
-    return object([["celltype", patternInput[0]], ["values", list(patternInput[1])]]);
-}
-
-export const CompositeCell_decoder = (path_7) => ((v_1) => object_1((get$) => {
-    let objectArg_1, arg_5, decoder_1, objectArg_2, objectArg_3, arg_9, decoder_3, objectArg_4;
-    let matchValue;
-    const objectArg = get$.Required;
-    matchValue = objectArg.Field("celltype", string);
-    switch (matchValue) {
-        case "FreeText":
-            return new CompositeCell(1, [(objectArg_1 = get$.Required, objectArg_1.Field("values", (path_2, value_2) => index(0, string, path_2, value_2)))]);
-        case "Term":
-            return new CompositeCell(0, [(arg_5 = ((decoder_1 = OntologyAnnotation_decoder(ConverterOptions_$ctor()), (path_3) => ((value_3) => index(0, uncurry2(decoder_1), path_3, value_3)))), (objectArg_2 = get$.Required, objectArg_2.Field("values", uncurry2(arg_5))))]);
-        case "Unitized":
-            return new CompositeCell(2, [(objectArg_3 = get$.Required, objectArg_3.Field("values", (path_4, value_4) => index(0, string, path_4, value_4))), (arg_9 = ((decoder_3 = OntologyAnnotation_decoder(ConverterOptions_$ctor()), (path_6) => ((value_6) => index(1, uncurry2(decoder_3), path_6, value_6)))), (objectArg_4 = get$.Required, objectArg_4.Field("values", uncurry2(arg_9))))]);
-        default:
-            return toFail(printf("Error reading CompositeCell from json string: %A"))(matchValue);
-    }
-}, path_7, v_1));
-
-export function CompositeCell_compressedEncoder(stringTable, oaTable, cc) {
-    const patternInput = (cc.tag === 0) ? ["Term", singleton(OATable_encodeOA(oaTable, cc.fields[0]))] : ((cc.tag === 2) ? ["Unitized", ofArray([StringTable_encodeString(stringTable, cc.fields[0]), OATable_encodeOA(oaTable, cc.fields[1])])] : ["FreeText", singleton(StringTable_encodeString(stringTable, cc.fields[0]))]);
-    return object([["t", StringTable_encodeString(stringTable, patternInput[0])], ["v", list(patternInput[1])]]);
-}
-
-export function CompositeCell_compressedDecoder(stringTable, oaTable) {
-    return (path_4) => ((v_1) => object_1((get$) => {
-        let objectArg_1, objectArg_2, objectArg_3, objectArg_4;
-        let matchValue;
-        const objectArg = get$.Required;
-        matchValue = objectArg.Field("t", (s, o) => StringTable_decodeString(stringTable, s, o));
-        switch (matchValue) {
-            case "FreeText":
-                return new CompositeCell(1, [(objectArg_1 = get$.Required, objectArg_1.Field("v", (path, value) => index(0, (s_1, o_1) => StringTable_decodeString(stringTable, s_1, o_1), path, value)))]);
-            case "Term":
-                return new CompositeCell(0, [(objectArg_2 = get$.Required, objectArg_2.Field("v", (path_1, value_1) => index(0, (s_3, o_2) => OATable_decodeOA(oaTable, s_3, o_2), path_1, value_1)))]);
-            case "Unitized":
-                return new CompositeCell(2, [(objectArg_3 = get$.Required, objectArg_3.Field("v", (path_2, value_2) => index(0, (s_4, o_3) => StringTable_decodeString(stringTable, s_4, o_3), path_2, value_2))), (objectArg_4 = get$.Required, objectArg_4.Field("v", (path_3, value_3) => index(1, (s_5, o_4) => OATable_decodeOA(oaTable, s_5, o_4), path_3, value_3)))]);
-            default:
-                return toFail(printf("Error reading CompositeCell from json string: %A"))(matchValue);
-        }
-    }, path_4, v_1));
-}
-
-export function ARCtrl_ISA_CompositeCell__CompositeCell_fromJsonString_Static_Z721C83C5(jsonString) {
-    const matchValue = fromString(uncurry2(CompositeCell_decoder), jsonString);
-    if (matchValue.tag === 1) {
-        return toFail(printf("Error. Unable to parse json string to CompositeCell: %s"))(matchValue.fields[0]);
-    }
-    else {
-        return matchValue.fields[0];
-    }
-}
-
-export function ARCtrl_ISA_CompositeCell__CompositeCell_ToJsonString_71136F3F(this$, spaces) {
-    return toString(defaultArg(spaces, 0), CompositeCell_encoder(this$));
-}
-
-export function ARCtrl_ISA_CompositeCell__CompositeCell_toJsonString_Static_1B703D57(a) {
-    return ARCtrl_ISA_CompositeCell__CompositeCell_ToJsonString_71136F3F(a);
-}
-

package/ISA/ISA.Json/ArcTypes/CompositeHeader.js

@@ -1,82 +0,0 @@
-import { OntologyAnnotation_decoder, OntologyAnnotation_encoder } from "../Ontology.js";
-import { ConverterOptions_$ctor } from "../ConverterOptions.js";
-import { empty, singleton } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { IOType_decoder, IOType_encoder } from "./IOType.js";
-import { toString, list, object } from "../../../fable_modules/Thoth.Json.10.1.0/Encode.fs.js";
-import { fromString, index, string, object as object_1 } from "../../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { uncurry2 } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { CompositeHeader } from "../../ISA/ArcTypes/CompositeHeader.js";
-import { printf, toFail } from "../../../fable_modules/fable-library.4.5.0/String.js";
-import { defaultArg } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-
-export function CompositeHeader_encoder(ch) {
-    const oaToJsonString = (oa) => OntologyAnnotation_encoder(ConverterOptions_$ctor(), oa);
-    const patternInput = (ch.tag === 3) ? ["Parameter", singleton(oaToJsonString(ch.fields[0]))] : ((ch.tag === 2) ? ["Factor", singleton(oaToJsonString(ch.fields[0]))] : ((ch.tag === 1) ? ["Characteristic", singleton(oaToJsonString(ch.fields[0]))] : ((ch.tag === 0) ? ["Component", singleton(oaToJsonString(ch.fields[0]))] : ((ch.tag === 4) ? ["ProtocolType", empty()] : ((ch.tag === 8) ? ["ProtocolREF", empty()] : ((ch.tag === 5) ? ["ProtocolDescription", empty()] : ((ch.tag === 6) ? ["ProtocolUri", empty()] : ((ch.tag === 7) ? ["ProtocolVersion", empty()] : ((ch.tag === 9) ? ["Performer", empty()] : ((ch.tag === 10) ? ["Date", empty()] : ((ch.tag === 11) ? ["Input", singleton(IOType_encoder(ch.fields[0]))] : ((ch.tag === 12) ? ["Output", singleton(IOType_encoder(ch.fields[0]))] : [ch.fields[0], empty()]))))))))))));
-    return object([["headertype", patternInput[0]], ["values", list(patternInput[1])]]);
-}
-
-export const CompositeHeader_decoder = (path_3) => ((v) => object_1((get$) => {
-    let headerType;
-    const objectArg = get$.Required;
-    headerType = objectArg.Field("headertype", string);
-    const oa = () => {
-        let arg_3;
-        const decoder = OntologyAnnotation_decoder(ConverterOptions_$ctor());
-        arg_3 = ((path_1) => ((value_1) => index(0, uncurry2(decoder), path_1, value_1)));
-        const objectArg_1 = get$.Required;
-        return objectArg_1.Field("values", uncurry2(arg_3));
-    };
-    const io = () => {
-        const objectArg_2 = get$.Required;
-        return objectArg_2.Field("values", (path_2, value_2) => index(0, uncurry2(IOType_decoder), path_2, value_2));
-    };
-    switch (headerType) {
-        case "Characteristic":
-            return new CompositeHeader(1, [oa()]);
-        case "Parameter":
-            return new CompositeHeader(3, [oa()]);
-        case "Component":
-            return new CompositeHeader(0, [oa()]);
-        case "Factor":
-            return new CompositeHeader(2, [oa()]);
-        case "Input":
-            return new CompositeHeader(11, [io()]);
-        case "Output":
-            return new CompositeHeader(12, [io()]);
-        case "ProtocolType":
-            return new CompositeHeader(4, []);
-        case "ProtocolREF":
-            return new CompositeHeader(8, []);
-        case "ProtocolDescription":
-            return new CompositeHeader(5, []);
-        case "ProtocolUri":
-            return new CompositeHeader(6, []);
-        case "ProtocolVersion":
-            return new CompositeHeader(7, []);
-        case "Performer":
-            return new CompositeHeader(9, []);
-        case "Date":
-            return new CompositeHeader(10, []);
-        default:
-            return new CompositeHeader(13, [headerType]);
-    }
-}, path_3, v));
-
-export function ARCtrl_ISA_CompositeHeader__CompositeHeader_fromJsonString_Static_Z721C83C5(jsonString) {
-    const matchValue = fromString(uncurry2(CompositeHeader_decoder), jsonString);
-    if (matchValue.tag === 1) {
-        return toFail(printf("Error. Unable to parse json string to CompositeHeader: %s"))(matchValue.fields[0]);
-    }
-    else {
-        return matchValue.fields[0];
-    }
-}
-
-export function ARCtrl_ISA_CompositeHeader__CompositeHeader_ToJsonString_71136F3F(this$, spaces) {
-    return toString(defaultArg(spaces, 0), CompositeHeader_encoder(this$));
-}
-
-export function ARCtrl_ISA_CompositeHeader__CompositeHeader_toJsonString_Static_Z331CE692(a) {
-    return ARCtrl_ISA_CompositeHeader__CompositeHeader_ToJsonString_71136F3F(a);
-}
-

package/ISA/ISA.Json/ArcTypes/IOType.js

@@ -1,35 +0,0 @@
-import { toString } from "../../../fable_modules/fable-library.4.5.0/Types.js";
-import { fromString, string, succeed, andThen } from "../../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { uncurry2, uncurry3 } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { IOType } from "../../ISA/ArcTypes/CompositeHeader.js";
-import { printf, toFail } from "../../../fable_modules/fable-library.4.5.0/String.js";
-import { toString as toString_1 } from "../../../fable_modules/Thoth.Json.10.1.0/Encode.fs.js";
-import { defaultArg } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-
-export function IOType_encoder(io) {
-    return toString(io);
-}
-
-export const IOType_decoder = (path_1) => ((value_1) => andThen(uncurry3((s) => {
-    const output = IOType.ofString(s);
-    return (arg10$0040) => ((arg20$0040) => succeed(output, arg10$0040, arg20$0040));
-}), string, path_1, value_1));
-
-export function ARCtrl_ISA_IOType__IOType_fromJsonString_Static_Z721C83C5(jsonString) {
-    const matchValue = fromString(uncurry2(IOType_decoder), jsonString);
-    if (matchValue.tag === 1) {
-        return toFail(printf("Error. Unable to parse json string to IOType: %s"))(matchValue.fields[0]);
-    }
-    else {
-        return matchValue.fields[0];
-    }
-}
-
-export function ARCtrl_ISA_IOType__IOType_ToJsonString_71136F3F(this$, spaces) {
-    return toString_1(defaultArg(spaces, 0), IOType_encoder(this$));
-}
-
-export function ARCtrl_ISA_IOType__IOType_toJsonString_Static_Z359DBB26(a) {
-    return ARCtrl_ISA_IOType__IOType_ToJsonString_71136F3F(a);
-}
-

package/ISA/ISA.Json/ArcTypes/OATable.js

@@ -1,48 +0,0 @@
-import { sortBy, map, toArray } from "../../../fable_modules/fable-library.4.5.0/Seq.js";
-import { uncurry2, comparePrimitives } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { map as map_1 } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { ConverterOptions_$ctor } from "../ConverterOptions.js";
-import { OntologyAnnotation_compressedDecoder, OntologyAnnotation_compressedEncoder } from "../Ontology.js";
-import { int, array as array_1 } from "../../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { Dict_tryFind } from "../../ISA/Helper.js";
-import { addToDict } from "../../../fable_modules/fable-library.4.5.0/MapUtil.js";
-import { FSharpResult$2 } from "../../../fable_modules/fable-library.4.5.0/Choice.js";
-
-export function OATable_arrayFromMap(otm) {
-    return toArray(map((kv_1) => kv_1[0], sortBy((kv) => kv[1], otm, {
-        Compare: comparePrimitives,
-    })));
-}
-
-export function OATable_encoder(stringTable, ot) {
-    let options;
-    return map_1((options = ConverterOptions_$ctor(), (oa) => OntologyAnnotation_compressedEncoder(stringTable, options, oa)), ot);
-}
-
-export function OATable_decoder(stringTable) {
-    const decoder = OntologyAnnotation_compressedDecoder(stringTable, ConverterOptions_$ctor());
-    return (path) => ((value) => array_1(uncurry2(decoder), path, value));
-}
-
-export function OATable_encodeOA(otm, oa) {
-    const matchValue = Dict_tryFind(oa, otm);
-    if (matchValue == null) {
-        const i_1 = otm.size | 0;
-        addToDict(otm, oa, i_1);
-        return i_1;
-    }
-    else {
-        return matchValue;
-    }
-}
-
-export function OATable_decodeOA(ot, s, o) {
-    const matchValue = int(s)(o);
-    if (matchValue.tag === 1) {
-        return new FSharpResult$2(1, [matchValue.fields[0]]);
-    }
-    else {
-        return new FSharpResult$2(0, [ot[matchValue.fields[0]]]);
-    }
-}
-

package/ISA/ISA.Json/Assay.js

@@ -1,105 +0,0 @@
-import { toString, nil, object as object_22 } from "../../fable_modules/Thoth.Json.10.1.0/Encode.fs.js";
-import { ofArray, choose } from "../../fable_modules/fable-library.4.5.0/List.js";
-import { uncurry2, equals } from "../../fable_modules/fable-library.4.5.0/Util.js";
-import { tryInclude } from "./GEncode.js";
-import { Data_decoder, Data_encoder, Sample_decoder, Sample_encoder } from "./Data.js";
-import { MaterialAttribute_decoder, MaterialAttribute_encoder, Material_decoder, Material_encoder } from "./Material.js";
-import { string, list as list_1, object as object_23 } from "../../fable_modules/Thoth.Json.10.1.0/Decode.fs.js";
-import { AssayMaterials } from "../ISA/JsonTypes/AssayMaterials.js";
-import { URIModule_toString } from "../ISA/JsonTypes/URI.js";
-import { empty, singleton, append, delay, toList } from "../../fable_modules/fable-library.4.5.0/Seq.js";
-import { ConverterOptions__set_IncludeType_Z1FBCCD16, ConverterOptions__set_SetID_Z1FBCCD16, ConverterOptions_$ctor, ConverterOptions__get_IncludeType, ConverterOptions__get_SetID } from "./ConverterOptions.js";
-import { OntologyAnnotation_decoder, OntologyAnnotation_encoder } from "./Ontology.js";
-import { Process_decoder, Process_encoder } from "./Process.js";
-import { decoder as decoder_5, encoder } from "./Comment.js";
-import { fromJsonString, uri } from "./Decode.js";
-import { Assay } from "../ISA/JsonTypes/Assay.js";
-
-export function AssayMaterials_encoder(options, oa) {
-    return object_22(choose((tupledArg) => {
-        const v = tupledArg[1];
-        if (equals(v, nil)) {
-            return void 0;
-        }
-        else {
-            return [tupledArg[0], v];
-        }
-    }, ofArray([tryInclude("samples", (oa_1) => Sample_encoder(options, oa_1), oa["Samples"]), tryInclude("otherMaterials", (oa_2) => Material_encoder(options, oa_2), oa["OtherMaterials"])])));
-}
-
-export function AssayMaterials_decoder(options) {
-    return (path_2) => ((v) => object_23((get$) => {
-        let objectArg, objectArg_1;
-        return new AssayMaterials((objectArg = get$.Optional, objectArg.Field("samples", (path, value) => list_1((s, json) => Sample_decoder(options, s, json), path, value))), (objectArg_1 = get$.Optional, objectArg_1.Field("otherMaterials", (path_1, value_1) => list_1((s_1, json_1) => Material_decoder(options, s_1, json_1), path_1, value_1))));
-    }, path_2, v));
-}
-
-export function Assay_genID(a) {
-    const matchValue = a.ID;
-    if (matchValue == null) {
-        const matchValue_1 = a.FileName;
-        if (matchValue_1 == null) {
-            return "#EmptyAssay";
-        }
-        else {
-            return matchValue_1;
-        }
-    }
-    else {
-        return URIModule_toString(matchValue);
-    }
-}
-
-export function Assay_encoder(options, oa) {
-    return object_22(choose((tupledArg) => {
-        const v = tupledArg[1];
-        if (equals(v, nil)) {
-            return void 0;
-        }
-        else {
-            return [tupledArg[0], v];
-        }
-    }, toList(delay(() => {
-        let value, s;
-        return append(ConverterOptions__get_SetID(options) ? singleton(["@id", (value = Assay_genID(oa), (typeof value === "string") ? ((s = value, s)) : nil)]) : singleton(tryInclude("@id", (value_2) => {
-            let s_1;
-            const value_3 = value_2;
-            return (typeof value_3 === "string") ? ((s_1 = value_3, s_1)) : nil;
-        }, oa["ID"])), delay(() => {
-            let value_5, s_2;
-            return append(ConverterOptions__get_IncludeType(options) ? singleton(["@type", (value_5 = "Assay", (typeof value_5 === "string") ? ((s_2 = value_5, s_2)) : nil)]) : empty(), delay(() => append(singleton(tryInclude("filename", (value_7) => {
-                let s_3;
-                const value_8 = value_7;
-                return (typeof value_8 === "string") ? ((s_3 = value_8, s_3)) : nil;
-            }, oa["FileName"])), delay(() => append(singleton(tryInclude("measurementType", (oa_1) => OntologyAnnotation_encoder(options, oa_1), oa["MeasurementType"])), delay(() => append(singleton(tryInclude("technologyType", (oa_2) => OntologyAnnotation_encoder(options, oa_2), oa["TechnologyType"])), delay(() => append(singleton(tryInclude("technologyPlatform", (value_10) => {
-                let s_4;
-                const value_11 = value_10;
-                return (typeof value_11 === "string") ? ((s_4 = value_11, s_4)) : nil;
-            }, oa["TechnologyPlatform"])), delay(() => append(singleton(tryInclude("dataFiles", (oa_3) => Data_encoder(options, oa_3), oa["DataFiles"])), delay(() => append(singleton(tryInclude("materials", (oa_4) => AssayMaterials_encoder(options, oa_4), oa["Materials"])), delay(() => append(singleton(tryInclude("characteristicCategories", (oa_5) => MaterialAttribute_encoder(options, oa_5), oa["CharacteristicCategories"])), delay(() => append(singleton(tryInclude("unitCategories", (oa_6) => OntologyAnnotation_encoder(options, oa_6), oa["UnitCategories"])), delay(() => append(singleton(tryInclude("processSequence", (oa_7) => Process_encoder(options, oa_7), oa["ProcessSequence"])), delay(() => singleton(tryInclude("comments", (comment) => encoder(options, comment), oa["Comments"]))))))))))))))))))))));
-        }));
-    }))));
-}
-
-export function Assay_decoder(options) {
-    return (path_7) => ((v) => object_23((get$) => {
-        let objectArg, objectArg_1, arg_5, objectArg_2, arg_7, objectArg_3, objectArg_4, objectArg_5, arg_13, objectArg_6, arg_15, decoder_1, objectArg_7, arg_17, decoder_2, objectArg_8, arg_19, decoder_3, objectArg_9, arg_21, decoder_4, objectArg_10;
-        return new Assay((objectArg = get$.Optional, objectArg.Field("@id", uri)), (objectArg_1 = get$.Optional, objectArg_1.Field("filename", string)), (arg_5 = OntologyAnnotation_decoder(options), (objectArg_2 = get$.Optional, objectArg_2.Field("measurementType", uncurry2(arg_5)))), (arg_7 = OntologyAnnotation_decoder(options), (objectArg_3 = get$.Optional, objectArg_3.Field("technologyType", uncurry2(arg_7)))), (objectArg_4 = get$.Optional, objectArg_4.Field("technologyPlatform", string)), (objectArg_5 = get$.Optional, objectArg_5.Field("dataFiles", (path_2, value_2) => list_1((s_1, json_1) => Data_decoder(options, s_1, json_1), path_2, value_2))), (arg_13 = AssayMaterials_decoder(options), (objectArg_6 = get$.Optional, objectArg_6.Field("materials", uncurry2(arg_13)))), (arg_15 = ((decoder_1 = MaterialAttribute_decoder(options), (path_3) => ((value_3) => list_1(uncurry2(decoder_1), path_3, value_3)))), (objectArg_7 = get$.Optional, objectArg_7.Field("characteristicCategories", uncurry2(arg_15)))), (arg_17 = ((decoder_2 = OntologyAnnotation_decoder(options), (path_4) => ((value_4) => list_1(uncurry2(decoder_2), path_4, value_4)))), (objectArg_8 = get$.Optional, objectArg_8.Field("unitCategories", uncurry2(arg_17)))), (arg_19 = ((decoder_3 = Process_decoder(options), (path_5) => ((value_5) => list_1(uncurry2(decoder_3), path_5, value_5)))), (objectArg_9 = get$.Optional, objectArg_9.Field("processSequence", uncurry2(arg_19)))), (arg_21 = ((decoder_4 = decoder_5(options), (path_6) => ((value_6) => list_1(uncurry2(decoder_4), path_6, value_6)))), (objectArg_10 = get$.Optional, objectArg_10.Field("comments", uncurry2(arg_21)))));
-    }, path_7, v));
-}
-
-export function Assay_fromJsonString(s) {
-    return fromJsonString(uncurry2(Assay_decoder(ConverterOptions_$ctor())), s);
-}
-
-export function Assay_toJsonString(p) {
-    return toString(2, Assay_encoder(ConverterOptions_$ctor(), p));
-}
-
-/**
- * exports in json-ld format
- */
-export function Assay_toStringLD(a) {
-    let returnVal;
-    return toString(2, Assay_encoder((returnVal = ConverterOptions_$ctor(), ((ConverterOptions__set_SetID_Z1FBCCD16(returnVal, true), ConverterOptions__set_IncludeType_Z1FBCCD16(returnVal, true)), returnVal)), a));
-}
-