@nfdi4plants/arctrl 2.5.1 → 3.0.0-alpha.2

package/Json/Comment.js

@@ -1,121 +0,0 @@
-import { ofArray, choose } from "../fable_modules/fable-library-js.4.24.0/List.js";
-import { value as value_6, unwrap, map } from "../fable_modules/fable-library-js.4.24.0/Option.js";
-import { tryInclude } from "./Encode.js";
-import { map as map_1 } from "../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { map as map_2, string, object } from "../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { Comment$ } from "../Core/Comment.js";
-import { replace } from "../fable_modules/fable-library-js.4.24.0/String.js";
-import { context_jsonvalue } from "./context/rocrate/isa_comment_context.js";
-import { toString } from "../fable_modules/fable-library-js.4.24.0/Types.js";
-import { encode } from "./IDTable.js";
-
-export function encoder(comment) {
-    const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([tryInclude("name", (value) => ({
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    }), comment.Name), tryInclude("value", (value_2) => ({
-        Encode(helpers_1) {
-            return helpers_1.encodeString(value_2);
-        },
-    }), comment.Value)]));
-    return {
-        Encode(helpers_2) {
-            const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_2)], values);
-            return helpers_2.encodeObject(arg);
-        },
-    };
-}
-
-export const decoder = object((get$) => {
-    let objectArg, objectArg_1;
-    return new Comment$(unwrap((objectArg = get$.Optional, objectArg.Field("name", string))), unwrap((objectArg_1 = get$.Optional, objectArg_1.Field("value", string))));
-});
-
-export function ROCrate_genID(c) {
-    const matchValue = c.Name;
-    if (matchValue == null) {
-        return "#EmptyComment";
-    }
-    else {
-        const n = matchValue;
-        const v = (c.Value != null) ? ("_" + replace(value_6(c.Value), " ", "_")) : "";
-        return ("#Comment_" + replace(n, " ", "_")) + v;
-    }
-}
-
-export function ROCrate_encoder(comment) {
-    let value;
-    const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([["@id", (value = ROCrate_genID(comment), {
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    })], ["@type", {
-        Encode(helpers_1) {
-            return helpers_1.encodeString("Comment");
-        },
-    }], tryInclude("name", (value_2) => ({
-        Encode(helpers_2) {
-            return helpers_2.encodeString(value_2);
-        },
-    }), comment.Name), tryInclude("value", (value_4) => ({
-        Encode(helpers_3) {
-            return helpers_3.encodeString(value_4);
-        },
-    }), comment.Value), ["@context", context_jsonvalue]]));
-    return {
-        Encode(helpers_4) {
-            const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_4)], values);
-            return helpers_4.encodeObject(arg);
-        },
-    };
-}
-
-export const ROCrate_decoder = object((get$) => {
-    let objectArg, objectArg_1;
-    return new Comment$(unwrap((objectArg = get$.Optional, objectArg.Field("name", string))), unwrap((objectArg_1 = get$.Optional, objectArg_1.Field("value", string))));
-});
-
-export function ROCrate_encoderDisambiguatingDescription(comment) {
-    const value = toString(comment);
-    return {
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    };
-}
-
-export const ROCrate_decoderDisambiguatingDescription = map_2((s) => Comment$.fromString(s), string);
-
-export function ISAJson_encoder(idMap, comment) {
-    const f = (comment_1) => {
-        const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([tryInclude("@id", (value) => ({
-            Encode(helpers) {
-                return helpers.encodeString(value);
-            },
-        }), ROCrate_genID(comment_1)), tryInclude("name", (value_2) => ({
-            Encode(helpers_1) {
-                return helpers_1.encodeString(value_2);
-            },
-        }), comment_1.Name), tryInclude("value", (value_4) => ({
-            Encode(helpers_2) {
-                return helpers_2.encodeString(value_4);
-            },
-        }), comment_1.Value)]));
-        return {
-            Encode(helpers_3) {
-                const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_3)], values);
-                return helpers_3.encodeObject(arg);
-            },
-        };
-    };
-    if (idMap == null) {
-        return f(comment);
-    }
-    else {
-        return encode(ROCrate_genID, f, comment, idMap);
-    }
-}
-
-export const ISAJson_decoder = decoder;
-

package/Json/ConverterOptions.js

@@ -1,18 +0,0 @@
-import { Union } from "../fable_modules/fable-library-js.4.24.0/Types.js";
-import { union_type } from "../fable_modules/fable-library-js.4.24.0/Reflection.js";
-
-export class ConverterOptions extends Union {
-    constructor(tag, fields) {
-        super();
-        this.tag = tag;
-        this.fields = fields;
-    }
-    cases() {
-        return ["ARCtrl", "ROCrate", "ISAJson"];
-    }
-}
-
-export function ConverterOptions_$reflection() {
-    return union_type("ARCtrl.Json.ConverterOptions", [], ConverterOptions, () => [[], [], []]);
-}
-

package/Json/Data.js

@@ -1,149 +0,0 @@
-import { singleton, ofArray, choose } from "../fable_modules/fable-library-js.4.24.0/List.js";
-import { unwrap, map } from "../fable_modules/fable-library-js.4.24.0/Option.js";
-import { tryIncludeSeq, tryInclude } from "./Encode.js";
-import { ROCrate_decoder as ROCrate_decoder_1, ROCrate_encoder as ROCrate_encoder_1, ISAJson_decoder as ISAJson_decoder_1, ISAJson_encoder as ISAJson_encoder_1 } from "./DataFile.js";
-import { ISAJson_decoder as ISAJson_decoder_2, ISAJson_encoder as ISAJson_encoder_2, ROCrate_decoder as ROCrate_decoder_2, ROCrate_encoder as ROCrate_encoder_2, decoder as decoder_1, encoder as encoder_1 } from "./Comment.js";
-import { map as map_1 } from "../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { resizeArray, string, object } from "../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { Data } from "../Core/Data.js";
-import { Decode_objectNoAdditionalProperties, Decode_uri } from "./Decode.js";
-import { decodeString, encodeString } from "./StringTable.js";
-import { replace } from "../fable_modules/fable-library-js.4.24.0/String.js";
-import { URIModule_toString } from "../Core/URI.js";
-import { list as list_1 } from "../fable_modules/Thoth.Json.Core.0.4.0/Encode.fs.js";
-import { context_jsonvalue } from "./context/rocrate/isa_data_context.js";
-import { encode } from "./IDTable.js";
-
-export function encoder(d) {
-    const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([tryInclude("@id", (value) => ({
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    }), d.ID), tryInclude("name", (value_2) => ({
-        Encode(helpers_1) {
-            return helpers_1.encodeString(value_2);
-        },
-    }), d.Name), tryInclude("dataType", ISAJson_encoder_1, d.DataType), tryInclude("format", (value_4) => ({
-        Encode(helpers_2) {
-            return helpers_2.encodeString(value_4);
-        },
-    }), d.Format), tryInclude("selectorFormat", (value_6) => ({
-        Encode(helpers_3) {
-            return helpers_3.encodeString(value_6);
-        },
-    }), d.SelectorFormat), tryIncludeSeq("comments", encoder_1, d.Comments)]));
-    return {
-        Encode(helpers_4) {
-            const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_4)], values);
-            return helpers_4.encodeObject(arg);
-        },
-    };
-}
-
-export const decoder = object((get$) => {
-    let objectArg, objectArg_1, objectArg_2, objectArg_3, objectArg_4, arg_11, objectArg_5;
-    return new Data(unwrap((objectArg = get$.Optional, objectArg.Field("@id", Decode_uri))), unwrap((objectArg_1 = get$.Optional, objectArg_1.Field("name", string))), unwrap((objectArg_2 = get$.Optional, objectArg_2.Field("dataType", ISAJson_decoder_1))), unwrap((objectArg_3 = get$.Optional, objectArg_3.Field("format", string))), unwrap((objectArg_4 = get$.Optional, objectArg_4.Field("selectorFormat", Decode_uri))), unwrap((arg_11 = resizeArray(decoder_1), (objectArg_5 = get$.Optional, objectArg_5.Field("comments", arg_11)))));
-});
-
-export function compressedEncoder(stringTable, d) {
-    const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([tryInclude("i", (s) => encodeString(stringTable, s), d.ID), tryInclude("n", (s_1) => encodeString(stringTable, s_1), d.Name), tryInclude("d", ISAJson_encoder_1, d.DataType), tryInclude("f", (s_2) => encodeString(stringTable, s_2), d.Format), tryInclude("s", (s_3) => encodeString(stringTable, s_3), d.SelectorFormat), tryIncludeSeq("c", encoder_1, d.Comments)]));
-    return {
-        Encode(helpers) {
-            const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers)], values);
-            return helpers.encodeObject(arg);
-        },
-    };
-}
-
-export function compressedDecoder(stringTable) {
-    return object((get$) => {
-        let arg_1, objectArg, arg_3, objectArg_1, objectArg_2, arg_7, objectArg_3, arg_9, objectArg_4, arg_11, objectArg_5;
-        return new Data(unwrap((arg_1 = decodeString(stringTable), (objectArg = get$.Optional, objectArg.Field("i", arg_1)))), unwrap((arg_3 = decodeString(stringTable), (objectArg_1 = get$.Optional, objectArg_1.Field("n", arg_3)))), unwrap((objectArg_2 = get$.Optional, objectArg_2.Field("d", ISAJson_decoder_1))), unwrap((arg_7 = decodeString(stringTable), (objectArg_3 = get$.Optional, objectArg_3.Field("f", arg_7)))), unwrap((arg_9 = decodeString(stringTable), (objectArg_4 = get$.Optional, objectArg_4.Field("s", arg_9)))), unwrap((arg_11 = resizeArray(decoder_1), (objectArg_5 = get$.Optional, objectArg_5.Field("c", arg_11)))));
-    });
-}
-
-export function ROCrate_genID(d) {
-    const matchValue = d.ID;
-    if (matchValue == null) {
-        const matchValue_1 = d.Name;
-        if (matchValue_1 == null) {
-            return "#EmptyData";
-        }
-        else {
-            return replace(matchValue_1, " ", "_");
-        }
-    }
-    else {
-        return URIModule_toString(matchValue);
-    }
-}
-
-export function ROCrate_encoder(oa) {
-    let value;
-    const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([["@id", (value = ROCrate_genID(oa), {
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    })], ["@type", list_1(singleton({
-        Encode(helpers_1) {
-            return helpers_1.encodeString("Data");
-        },
-    }))], tryInclude("name", (value_2) => ({
-        Encode(helpers_2) {
-            return helpers_2.encodeString(value_2);
-        },
-    }), oa.Name), tryInclude("type", ROCrate_encoder_1, oa.DataType), tryInclude("encodingFormat", (value_5) => ({
-        Encode(helpers_3) {
-            return helpers_3.encodeString(value_5);
-        },
-    }), oa.Format), tryInclude("usageInfo", (value_7) => ({
-        Encode(helpers_4) {
-            return helpers_4.encodeString(value_7);
-        },
-    }), oa.SelectorFormat), tryIncludeSeq("comments", ROCrate_encoder_2, oa.Comments), ["@context", context_jsonvalue]]));
-    return {
-        Encode(helpers_5) {
-            const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_5)], values);
-            return helpers_5.encodeObject(arg);
-        },
-    };
-}
-
-export const ROCrate_decoder = object((get$) => {
-    let objectArg, objectArg_1, objectArg_2, objectArg_3, objectArg_4, arg_11, objectArg_5;
-    return new Data(unwrap((objectArg = get$.Optional, objectArg.Field("@id", Decode_uri))), unwrap((objectArg_1 = get$.Optional, objectArg_1.Field("name", string))), unwrap((objectArg_2 = get$.Optional, objectArg_2.Field("type", ROCrate_decoder_1))), unwrap((objectArg_3 = get$.Optional, objectArg_3.Field("encodingFormat", string))), unwrap((objectArg_4 = get$.Optional, objectArg_4.Field("usageInfo", Decode_uri))), unwrap((arg_11 = resizeArray(ROCrate_decoder_2), (objectArg_5 = get$.Optional, objectArg_5.Field("comments", arg_11)))));
-});
-
-export function ISAJson_encoder(idMap, oa) {
-    const f = (oa_1) => {
-        const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([tryInclude("@id", (value) => ({
-            Encode(helpers) {
-                return helpers.encodeString(value);
-            },
-        }), ROCrate_genID(oa_1)), tryInclude("name", (value_2) => ({
-            Encode(helpers_1) {
-                return helpers_1.encodeString(value_2);
-            },
-        }), oa_1.Name), tryInclude("type", ISAJson_encoder_1, oa_1.DataType), tryIncludeSeq("comments", (comment) => ISAJson_encoder_2(idMap, comment), oa_1.Comments)]));
-        return {
-            Encode(helpers_2) {
-                const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_2)], values);
-                return helpers_2.encodeObject(arg);
-            },
-        };
-    };
-    if (idMap != null) {
-        return encode(ROCrate_genID, f, oa, idMap);
-    }
-    else {
-        return f(oa);
-    }
-}
-
-export const ISAJson_allowedFields = ofArray(["@id", "name", "type", "comments", "@type", "@context"]);
-
-export const ISAJson_decoder = Decode_objectNoAdditionalProperties(ISAJson_allowedFields, (get$) => {
-    let objectArg, objectArg_1, objectArg_2, arg_7, objectArg_3;
-    return new Data(unwrap((objectArg = get$.Optional, objectArg.Field("@id", Decode_uri))), unwrap((objectArg_1 = get$.Optional, objectArg_1.Field("name", string))), unwrap((objectArg_2 = get$.Optional, objectArg_2.Field("type", ISAJson_decoder_1))), undefined, undefined, unwrap((arg_7 = resizeArray(ISAJson_decoder_2), (objectArg_3 = get$.Optional, objectArg_3.Field("comments", arg_7)))));
-});
-

package/Json/DataFile.js

@@ -1,55 +0,0 @@
-import { string } from "../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { FSharpResult$2 } from "../fable_modules/fable-library-js.4.24.0/Result.js";
-import { DataFile } from "../Core/DataFile.js";
-import { ErrorReason$1 } from "../fable_modules/Thoth.Json.Core.0.4.0/Types.fs.js";
-
-export function ROCrate_encoder(value) {
-    switch (value.tag) {
-        case 1:
-            return {
-                Encode(helpers_1) {
-                    return helpers_1.encodeString("Derived Data File");
-                },
-            };
-        case 2:
-            return {
-                Encode(helpers_2) {
-                    return helpers_2.encodeString("Image File");
-                },
-            };
-        default:
-            return {
-                Encode(helpers) {
-                    return helpers.encodeString("Raw Data File");
-                },
-            };
-    }
-}
-
-export const ROCrate_decoder = {
-    Decode(s, json) {
-        const matchValue = string.Decode(s, json);
-        if (matchValue.tag === 1) {
-            return new FSharpResult$2(1, [matchValue.fields[0]]);
-        }
-        else {
-            switch (matchValue.fields[0]) {
-                case "Raw Data File":
-                    return new FSharpResult$2(0, [new DataFile(0, [])]);
-                case "Derived Data File":
-                    return new FSharpResult$2(0, [new DataFile(1, [])]);
-                case "Image File":
-                    return new FSharpResult$2(0, [new DataFile(2, [])]);
-                default: {
-                    const s_1 = matchValue.fields[0];
-                    return new FSharpResult$2(1, [[`Could not parse ${s_1}.`, new ErrorReason$1(0, [s_1, json])]]);
-                }
-            }
-        }
-    },
-};
-
-export const ISAJson_encoder = ROCrate_encoder;
-
-export const ISAJson_decoder = ROCrate_decoder;
-

package/Json/DataMap/DataContext.js

@@ -1,39 +0,0 @@
-import { ofArray, choose } from "../../fable_modules/fable-library-js.4.24.0/List.js";
-import { unwrap, map } from "../../fable_modules/fable-library-js.4.24.0/Option.js";
-import { decoder as decoder_1, encoder as encoder_1 } from "../Data.js";
-import { tryInclude } from "../Encode.js";
-import { OntologyAnnotation_decoder, OntologyAnnotation_encoder } from "../OntologyAnnotation.js";
-import { DataContext_$ctor_Z780A8A2A, DataContext__get_Label, DataContext__get_GeneratedBy, DataContext__get_Description, DataContext__get_ObjectType, DataContext__get_Unit, DataContext__get_Explication } from "../../Core/DataContext.js";
-import { map as map_1 } from "../../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { string, object } from "../../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-
-export function encoder(dc) {
-    const values = choose((tupledArg) => map((v_1) => [tupledArg[0], v_1], tupledArg[1]), ofArray([["data", encoder_1(dc)], tryInclude("explication", OntologyAnnotation_encoder, DataContext__get_Explication(dc)), tryInclude("unit", OntologyAnnotation_encoder, DataContext__get_Unit(dc)), tryInclude("objectType", OntologyAnnotation_encoder, DataContext__get_ObjectType(dc)), tryInclude("description", (value) => ({
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    }), DataContext__get_Description(dc)), tryInclude("generatedBy", (value_2) => ({
-        Encode(helpers_1) {
-            return helpers_1.encodeString(value_2);
-        },
-    }), DataContext__get_GeneratedBy(dc)), tryInclude("label", (value_4) => ({
-        Encode(helpers_2) {
-            return helpers_2.encodeString(value_4);
-        },
-    }), DataContext__get_Label(dc))]));
-    return {
-        Encode(helpers_3) {
-            const arg = map_1((tupledArg_1) => [tupledArg_1[0], tupledArg_1[1].Encode(helpers_3)], values);
-            return helpers_3.encodeObject(arg);
-        },
-    };
-}
-
-export const decoder = object((get$) => {
-    let objectArg_1, objectArg_2, objectArg_3, objectArg_4, objectArg_5, objectArg_6;
-    let data;
-    const objectArg = get$.Required;
-    data = objectArg.Field("data", decoder_1);
-    return DataContext_$ctor_Z780A8A2A(unwrap(data.ID), unwrap(data.Name), unwrap(data.DataType), unwrap(data.Format), unwrap(data.SelectorFormat), unwrap((objectArg_1 = get$.Optional, objectArg_1.Field("explication", OntologyAnnotation_decoder))), unwrap((objectArg_2 = get$.Optional, objectArg_2.Field("unit", OntologyAnnotation_decoder))), unwrap((objectArg_3 = get$.Optional, objectArg_3.Field("objectType", OntologyAnnotation_decoder))), unwrap((objectArg_4 = get$.Optional, objectArg_4.Field("label", string))), unwrap((objectArg_5 = get$.Optional, objectArg_5.Field("description", string))), unwrap((objectArg_6 = get$.Optional, objectArg_6.Field("generatedBy", string))), data.Comments);
-});
-

package/Json/DataMap/DataMap.js

@@ -1,29 +0,0 @@
-import { seq } from "../../fable_modules/Thoth.Json.Core.0.4.0/Encode.fs.js";
-import { map } from "../../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { decoder as decoder_1, encoder as encoder_1 } from "./DataContext.js";
-import { DataMap_$ctor_4E3220A7, DataMap__get_DataContexts } from "../../Core/DataMap.js";
-import { resizeArray, object } from "../../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-
-export function encoder(dm) {
-    const values_1 = [["dataContexts", seq(map(encoder_1, DataMap__get_DataContexts(dm)))]];
-    return {
-        Encode(helpers) {
-            const arg = map((tupledArg) => [tupledArg[0], tupledArg[1].Encode(helpers)], values_1);
-            return helpers.encodeObject(arg);
-        },
-    };
-}
-
-export const decoder = object((get$) => {
-    let arg_1, objectArg;
-    return DataMap_$ctor_4E3220A7((arg_1 = resizeArray(decoder_1), (objectArg = get$.Required, objectArg.Field("dataContexts", arg_1))));
-});
-
-export function encoderCompressed(stringTable, oaTable, cellTable, dm) {
-    return encoder(dm);
-}
-
-export function decoderCompressed(stringTable, oaTable, cellTable) {
-    return decoder;
-}
-

package/Json/Decode.js

@@ -1,125 +0,0 @@
-import { Getters$2__get_Errors, Getters$2_$ctor_Z4BE6C149, string } from "../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { Result_Map, FSharpResult$2 } from "../fable_modules/fable-library-js.4.24.0/Result.js";
-import { printf, toText } from "../fable_modules/fable-library-js.4.24.0/String.js";
-import { ErrorReason$1 } from "../fable_modules/Thoth.Json.Core.0.4.0/Types.fs.js";
-import { exists } from "../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { ofSeq, contains } from "../fable_modules/fable-library-js.4.24.0/Set.js";
-import { int32ToString, comparePrimitives } from "../fable_modules/fable-library-js.4.24.0/Util.js";
-import { head, length, isEmpty } from "../fable_modules/fable-library-js.4.24.0/List.js";
-import { fold } from "../fable_modules/fable-library-js.4.24.0/Array.js";
-import { tryParse, minValue } from "../fable_modules/fable-library-js.4.24.0/Date.js";
-import { FSharpRef } from "../fable_modules/fable-library-js.4.24.0/Types.js";
-
-export function Helpers_prependPath(path, err_, err__1) {
-    const err = [err_, err__1];
-    return [path + err[0], err[1]];
-}
-
-export function Decode_isURI(s) {
-    return true;
-}
-
-export const Decode_uri = {
-    Decode(s, json) {
-        const matchValue = string.Decode(s, json);
-        if (matchValue.tag === 1) {
-            return new FSharpResult$2(1, [matchValue.fields[0]]);
-        }
-        else if (Decode_isURI(matchValue.fields[0])) {
-            return new FSharpResult$2(0, [matchValue.fields[0]]);
-        }
-        else {
-            const s_3 = matchValue.fields[0];
-            return new FSharpResult$2(1, [[s_3, new ErrorReason$1(6, [toText(printf("Expected URI, got %s"))(s_3)])]]);
-        }
-    },
-};
-
-export function Decode_hasUnknownFields(helpers, knownFields, json) {
-    return exists((x) => !contains(x, knownFields), helpers.getProperties(json));
-}
-
-export function Decode_objectNoAdditionalProperties(allowedProperties, builder) {
-    const allowedProperties_1 = ofSeq(allowedProperties, {
-        Compare: comparePrimitives,
-    });
-    return {
-        Decode(helpers, value) {
-            const getters = Getters$2_$ctor_Z4BE6C149(helpers, value);
-            if (Decode_hasUnknownFields(helpers, allowedProperties_1, value)) {
-                return new FSharpResult$2(1, [["Unknown fields in object", new ErrorReason$1(0, ["", value])]]);
-            }
-            else {
-                const result = builder(getters);
-                const matchValue = Getters$2__get_Errors(getters);
-                if (!isEmpty(matchValue)) {
-                    const errors = matchValue;
-                    return (length(errors) > 1) ? (new FSharpResult$2(1, [["", new ErrorReason$1(7, [errors])]])) : (new FSharpResult$2(1, [head(matchValue)]));
-                }
-                else {
-                    return new FSharpResult$2(0, [result]);
-                }
-            }
-        },
-    };
-}
-
-export function Decode_noAdditionalProperties(allowedProperties, decoder) {
-    const allowedProperties_1 = ofSeq(allowedProperties, {
-        Compare: comparePrimitives,
-    });
-    return {
-        Decode(helpers, value) {
-            const getters = Getters$2_$ctor_Z4BE6C149(helpers, value);
-            return Decode_hasUnknownFields(helpers, allowedProperties_1, value) ? (new FSharpResult$2(1, [["Unknown fields in object", new ErrorReason$1(0, ["", value])]])) : decoder.Decode(helpers, value);
-        },
-    };
-}
-
-export function Decode_resizeArrayOrSingleton(decoder) {
-    return {
-        Decode(helpers, value) {
-            if (helpers.isArray(value)) {
-                let i = -1;
-                return fold((acc, value_1) => {
-                    let tupledArg;
-                    i = ((i + 1) | 0);
-                    if (acc.tag === 0) {
-                        const acc_1 = acc.fields[0];
-                        const matchValue = decoder.Decode(helpers, value_1);
-                        if (matchValue.tag === 0) {
-                            void (acc_1.push(matchValue.fields[0]));
-                            return new FSharpResult$2(0, [acc_1]);
-                        }
-                        else {
-                            return new FSharpResult$2(1, [(tupledArg = matchValue.fields[0], Helpers_prependPath((".[" + int32ToString(i)) + "]", tupledArg[0], tupledArg[1]))]);
-                        }
-                    }
-                    else {
-                        return acc;
-                    }
-                }, new FSharpResult$2(0, [[]]), helpers.asArray(value));
-            }
-            else {
-                return Result_Map((x) => [x], decoder.Decode(helpers, value));
-            }
-        },
-    };
-}
-
-export const Decode_datetime = {
-    Decode(helpers, value) {
-        if (helpers.isString(value)) {
-            let matchValue;
-            let outArg = minValue();
-            matchValue = [tryParse(helpers.asString(value), new FSharpRef(() => outArg, (v) => {
-                outArg = v;
-            })), outArg];
-            return matchValue[0] ? (new FSharpResult$2(0, [matchValue[1]])) : (new FSharpResult$2(1, [["", new ErrorReason$1(0, ["a datetime", value])]]));
-        }
-        else {
-            return new FSharpResult$2(1, [["", new ErrorReason$1(0, ["a datetime", value])]]);
-        }
-    },
-};
-

package/Json/Encode.js

@@ -1,74 +0,0 @@
-import { defaultArg, map } from "../fable_modules/fable-library-js.4.24.0/Option.js";
-import { append, map as map_1, isEmpty } from "../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { list as list_1, seq } from "../fable_modules/Thoth.Json.Core.0.4.0/Encode.fs.js";
-import { item, map as map_2 } from "../fable_modules/fable-library-js.4.24.0/Array.js";
-import { map as map_3, isEmpty as isEmpty_1 } from "../fable_modules/fable-library-js.4.24.0/List.js";
-import { toString } from "../fable_modules/fable-library-js.4.24.0/Date.js";
-import { Json } from "../fable_modules/Thoth.Json.Core.0.4.0/Types.fs.js";
-
-/**
- * Try to encode the given object using the given encoder, or return Encode.nil if the object is null
- */
-export function tryInclude(name, encoder, value) {
-    return [name, map(encoder, value)];
-}
-
-/**
- * Try to encode the given object using the given encoder, or return Encode.nil if the object is null
- */
-export function tryIncludeSeq(name, encoder, value) {
-    return [name, isEmpty(value) ? undefined : seq(map_1(encoder, value))];
-}
-
-export function tryIncludeArray(name, encoder, value) {
-    let values;
-    return [name, (value.length === 0) ? undefined : ((values = map_2(encoder, value), {
-        Encode(helpers) {
-            const arg = map_2((v) => v.Encode(helpers), values);
-            return helpers.encodeArray(arg);
-        },
-    }))];
-}
-
-export function tryIncludeList(name, encoder, value) {
-    return [name, isEmpty_1(value) ? undefined : list_1(map_3(encoder, value))];
-}
-
-export function tryIncludeListOpt(name, encoder, value) {
-    let o;
-    return [name, (value != null) ? ((o = value, isEmpty_1(o) ? undefined : list_1(map_3(encoder, o)))) : undefined];
-}
-
-export const DefaultSpaces = 0;
-
-export function defaultSpaces(spaces) {
-    return defaultArg(spaces, DefaultSpaces);
-}
-
-export function dateTime(d) {
-    const value = item(0, toString(d, "O", {}).split("+"));
-    return {
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    };
-}
-
-export function addPropertyToObject(name, value, obj) {
-    if (obj.tag === 5) {
-        return new Json(5, [append(obj.fields[0], [[name, value]])]);
-    }
-    else {
-        throw new Error("Expected object");
-    }
-}
-
-export function resizeArrayOrSingleton(encoder, values) {
-    if (values.length === 1) {
-        return encoder(values[0]);
-    }
-    else {
-        return seq(map_1(encoder, values));
-    }
-}
-

package/Json/IDTable.js

@@ -1,30 +0,0 @@
-import { singleton } from "../fable_modules/fable-library-js.4.24.0/List.js";
-import { map } from "../fable_modules/fable-library-js.4.24.0/Seq.js";
-import { addToDict } from "../fable_modules/fable-library-js.4.24.0/MapUtil.js";
-
-export function encodeID(id) {
-    const values = singleton(["@id", {
-        Encode(helpers) {
-            return helpers.encodeString(id);
-        },
-    }]);
-    return {
-        Encode(helpers_1) {
-            const arg = map((tupledArg) => [tupledArg[0], tupledArg[1].Encode(helpers_1)], values);
-            return helpers_1.encodeObject(arg);
-        },
-    };
-}
-
-export function encode(genID, encoder, value, table) {
-    const id = genID(value);
-    if (table.has(id)) {
-        return encodeID(id);
-    }
-    else {
-        const v = encoder(value);
-        addToDict(table, genID(value), v);
-        return v;
-    }
-}
-