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

package/dist/ts/esm/ts/Json/ROCrate/LDNode.js

@@ -1,207 +0,0 @@
-import { ErrorReason$1_BadPrimitive, ErrorReason$1_BadOneOf } from "../../fable_modules/Thoth.Json.Core.0.4.0/Types.fs.js";
-import { resizeArrayOrSingleton, dateTime } from "../Encode.js";
-import { LDNode, LDRef, LDValue } from "../../ROCrate/LDObject.js";
-import { decoder as decoder_2, encoder as encoder_1 } from "./LDValue.js";
-import { decoder as decoder_3, encoder as encoder_2 } from "./LDRef.js";
-import { int32ToString, disposeSafe, getEnumerator, isIterable, defaultOf, equals } from "@fable-org/fable-library-js/Util.js";
-import { list } from "../../fable_modules/Thoth.Json.Core.0.4.0/Encode.fs.js";
-import { collect, empty, singleton, append, enumerateFromFunctions, map, delay, toList } from "@fable-org/fable-library-js/Seq.js";
-import { decoder as decoder_1, encoder as encoder_3 } from "./LDContext.js";
-import { unwrap, value as value_12 } from "@fable-org/fable-library-js/Option.js";
-import { decimal as decimal_1, int, oneOf, map as map_1, Getters$2__get_Errors, string, Getters$2_$ctor_Z4BE6C149 } from "../../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { Helpers_prependPath, Decode_resizeArrayOrSingleton } from "../Decode.js";
-import { ofArray, head, length, isEmpty } from "@fable-org/fable-library-js/List.js";
-import { FSharpResult$2_Ok, FSharpResult$2_Error } from "@fable-org/fable-library-js/Result.js";
-import { fold } from "@fable-org/fable-library-js/Array.js";
-export function genericEncoder(obj) {
-    if (typeof obj === "string") {
-        const s = obj;
-        return {
-            Encode(helpers) {
-                return helpers.encodeString(s);
-            },
-        };
-    }
-    else if (typeof obj === "number") {
-        const i = obj | 0;
-        return {
-            Encode(helpers_1) {
-                return helpers_1.encodeSignedIntegralNumber(i);
-            },
-        };
-    }
-    else if (typeof obj === "boolean") {
-        const b = obj;
-        return {
-            Encode(helpers_2) {
-                return helpers_2.encodeBool(b);
-            },
-        };
-    }
-    else if (typeof obj === "number") {
-        const f = obj;
-        return {
-            Encode(helpers_3) {
-                return helpers_3.encodeDecimalNumber(f);
-            },
-        };
-    }
-    else if (obj instanceof Date) {
-        const d = obj;
-        return dateTime(d);
-    }
-    else if (obj instanceof LDValue) {
-        const v = obj;
-        return encoder_1(v);
-    }
-    else if (obj instanceof LDRef) {
-        const r = obj;
-        return encoder_2(r);
-    }
-    else if (obj instanceof LDNode) {
-        const o = obj;
-        return encoder(o);
-    }
-    else if (equals(obj, defaultOf())) {
-        return {
-            Encode(helpers_4) {
-                return helpers_4.encodeNull();
-            },
-        };
-    }
-    else if (isIterable(obj)) {
-        const l = obj;
-        return list(toList(delay(() => map(genericEncoder, enumerateFromFunctions(() => getEnumerator(l), (enumerator) => enumerator["System.Collections.IEnumerator.MoveNext"](), (enumerator_1) => enumerator_1["System.Collections.IEnumerator.get_Current"]())))));
-    }
-    else {
-        throw new Error("Unknown type");
-    }
-}
-export function encoder(obj) {
-    const values_1 = toList(delay(() => {
-        let value;
-        return append(singleton(["@id", (value = obj.Id, {
-                Encode(helpers) {
-                    return helpers.encodeString(value);
-                },
-            })]), delay(() => append(singleton(["@type", resizeArrayOrSingleton((value_1) => ({
-                Encode(helpers_1) {
-                    return helpers_1.encodeString(value_1);
-                },
-            }), obj.SchemaType)]), delay(() => append((obj.AdditionalType.length !== 0) ? singleton(["additionalType", resizeArrayOrSingleton((value_3) => ({
-                Encode(helpers_2) {
-                    return helpers_2.encodeString(value_3);
-                },
-            }), obj.AdditionalType)]) : empty(), delay(() => {
-            let matchValue;
-            return append((matchValue = obj.TryGetContext(), (matchValue != null) ? singleton(["@context", encoder_3(value_12(matchValue))]) : (empty())), delay(() => collect((kv) => {
-                const l = kv[0].toLocaleLowerCase();
-                return ((((((l !== "id") && (l !== "schematype")) && (l !== "additionaltype")) && (l !== "@context")) && !l.startsWith("init@")) && !l.startsWith("init_")) ? singleton([kv[0], genericEncoder(kv[1])]) : empty();
-            }, obj.GetProperties(true))));
-        }))))));
-    }));
-    return {
-        Encode(helpers_3) {
-            const arg = map((tupledArg) => [tupledArg[0], tupledArg[1].Encode(helpers_3)], values_1);
-            return helpers_3.encodeObject(arg);
-        },
-    };
-}
-/**
- * Returns a decoder
- *
- * If expectObject is set to true, decoder fails if top-level value is not an ROCrate object
- */
-export function getDecoder(expectObject) {
-    const decode = (expectObject_1) => {
-        const decodeObject = {
-            Decode(helpers, value) {
-                let arg_7, objectArg_3, arg_9, objectArg_4;
-                if (helpers.isObject(value)) {
-                    const getters = Getters$2_$ctor_Z4BE6C149(helpers, value);
-                    const properties = helpers.getProperties(value);
-                    let result;
-                    const get$ = getters;
-                    let t;
-                    const arg_1 = Decode_resizeArrayOrSingleton(string);
-                    const objectArg = get$.Required;
-                    t = objectArg.Field("@type", arg_1);
-                    let id;
-                    const objectArg_1 = get$.Required;
-                    id = objectArg_1.Field("@id", string);
-                    let context;
-                    const objectArg_2 = get$.Optional;
-                    context = objectArg_2.Field("@context", decoder_1);
-                    const o = new LDNode(id, t, unwrap((arg_7 = Decode_resizeArrayOrSingleton(string), (objectArg_3 = get$.Optional, objectArg_3.Field("additionalType", arg_7)))));
-                    const enumerator = getEnumerator(properties);
-                    try {
-                        while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-                            const property = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-                            if (((property !== "@id") && (property !== "@type")) && (property !== "@context")) {
-                                o.SetProperty(property, (arg_9 = decode(false), (objectArg_4 = get$.Required, objectArg_4.Field(property, arg_9))));
-                            }
-                        }
-                    }
-                    finally {
-                        disposeSafe(enumerator);
-                    }
-                    if (context != null) {
-                        o.SetContext(value_12(context));
-                    }
-                    result = o;
-                    const matchValue = Getters$2__get_Errors(getters);
-                    if (!isEmpty(matchValue)) {
-                        const errors = matchValue;
-                        return (length(errors) > 1) ? FSharpResult$2_Error(["", ErrorReason$1_BadOneOf(errors)]) : FSharpResult$2_Error(head(matchValue));
-                    }
-                    else {
-                        return FSharpResult$2_Ok(result);
-                    }
-                }
-                else {
-                    return FSharpResult$2_Error(["", ErrorReason$1_BadPrimitive("an object", value)]);
-                }
-            },
-        };
-        const resizeArray = {
-            Decode(helpers_1, value_1) {
-                if (helpers_1.isArray(value_1)) {
-                    let i = -1;
-                    return fold((acc, value_2) => {
-                        let tupledArg;
-                        i = ((i + 1) | 0);
-                        if (acc.tag === /* Ok */ 0) {
-                            const acc_1 = acc.fields[0];
-                            let matchValue_1;
-                            let copyOfStruct = decode(false);
-                            matchValue_1 = copyOfStruct.Decode(helpers_1, value_2);
-                            if (matchValue_1.tag === /* Ok */ 0) {
-                                const value_3 = matchValue_1.fields[0];
-                                void (acc_1.push(value_3));
-                                return FSharpResult$2_Ok(acc_1);
-                            }
-                            else {
-                                return FSharpResult$2_Error((tupledArg = matchValue_1.fields[0], Helpers_prependPath((".[" + int32ToString(i)) + "]", tupledArg[0], tupledArg[1])));
-                            }
-                        }
-                        else {
-                            return acc;
-                        }
-                    }, FSharpResult$2_Ok([]), helpers_1.asArray(value_1));
-                }
-                else {
-                    return FSharpResult$2_Error(["", ErrorReason$1_BadPrimitive("an array", value_1)]);
-                }
-            },
-        };
-        if (expectObject_1) {
-            return map_1((value_4) => value_4, decodeObject);
-        }
-        else {
-            return oneOf(ofArray([map_1((value_5) => value_5, decoder_2), map_1((value_6) => value_6, decodeObject), map_1((value_7) => value_7, decoder_3), map_1((value_8) => value_8, resizeArray), map_1((value_9) => value_9, string), map_1((value_10) => value_10, int), map_1((value_11) => value_11, decimal_1)]));
-        }
-    };
-    return decode(expectObject);
-}
-export const decoder = map_1((value) => value, getDecoder(true));
-export const genericDecoder = getDecoder(false);

package/dist/ts/esm/ts/Json/ROCrate/LDRef.js

@@ -1,21 +0,0 @@
-import { string, object } from "../../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { LDRef } from "../../ROCrate/LDObject.js";
-import { map } from "@fable-org/fable-library-js/Seq.js";
-export const decoder = object((decoders) => {
-    let objectArg;
-    return new LDRef((objectArg = decoders.Required, objectArg.Field("@id", string)));
-});
-export function encoder(r) {
-    let value;
-    const values_1 = [["@id", (value = r.Id, {
-                Encode(helpers) {
-                    return helpers.encodeString(value);
-                },
-            })]];
-    return {
-        Encode(helpers_1) {
-            const arg = map((tupledArg) => [tupledArg[0], tupledArg[1].Encode(helpers_1)], values_1);
-            return helpers_1.encodeObject(arg);
-        },
-    };
-}

package/dist/ts/esm/ts/Json/ROCrate/LDValue.js

@@ -1,65 +0,0 @@
-import { object, decimal as decimal_1, int, string, map, oneOf } from "../../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { ofArray } from "@fable-org/fable-library-js/List.js";
-import { dateTime } from "../Encode.js";
-import { LDValue } from "../../ROCrate/LDObject.js";
-import { unwrap } from "@fable-org/fable-library-js/Option.js";
-import { map as map_1 } from "@fable-org/fable-library-js/Seq.js";
-export const genericDecoder = oneOf(ofArray([map((value) => value, string), map((value_1) => value_1, int), map((value_2) => value_2, decimal_1)]));
-export function genericEncoder(value) {
-    if (typeof value === "string") {
-        const s = value;
-        return {
-            Encode(helpers) {
-                return helpers.encodeString(s);
-            },
-        };
-    }
-    else if (typeof value === "number") {
-        const i = value | 0;
-        return {
-            Encode(helpers_1) {
-                return helpers_1.encodeSignedIntegralNumber(i);
-            },
-        };
-    }
-    else if (typeof value === "boolean") {
-        const b = value;
-        return {
-            Encode(helpers_2) {
-                return helpers_2.encodeBool(b);
-            },
-        };
-    }
-    else if (typeof value === "number") {
-        const f = value;
-        return {
-            Encode(helpers_3) {
-                return helpers_3.encodeDecimalNumber(f);
-            },
-        };
-    }
-    else if (value instanceof Date) {
-        return dateTime(value);
-    }
-    else {
-        throw new Error("Unknown type");
-    }
-}
-export const decoder = object((decoders) => {
-    let objectArg, objectArg_1;
-    return new LDValue((objectArg = decoders.Required, objectArg.Field("@value", genericDecoder)), unwrap((objectArg_1 = decoders.Optional, objectArg_1.Field("@type", string))));
-});
-export function encoder(v) {
-    let value;
-    const values_1 = [["@value", genericEncoder(v.Value)], ["@type", (value = v.ValueType, {
-                Encode(helpers) {
-                    return helpers.encodeString(value);
-                },
-            })]];
-    return {
-        Encode(helpers_1) {
-            const arg = map_1((tupledArg) => [tupledArg[0], tupledArg[1].Encode(helpers_1)], values_1);
-            return helpers_1.encodeObject(arg);
-        },
-    };
-}

package/dist/ts/esm/ts/Json/StringTable.js

@@ -1,63 +0,0 @@
-import { item, map, setItem, fill } from "@fable-org/fable-library-js/Array.js";
-import { iterate } from "@fable-org/fable-library-js/Seq.js";
-import { defaultOf } from "@fable-org/fable-library-js/Util.js";
-import { int, string, array as array_2 } from "../fable_modules/Thoth.Json.Core.0.4.0/Decode.fs.js";
-import { value as value_2 } from "@fable-org/fable-library-js/Option.js";
-import { addToDict, tryGetValue } from "@fable-org/fable-library-js/MapUtil.js";
-import { FSharpRef } from "@fable-org/fable-library-js/Types.js";
-import { FSharpResult$2_Ok, FSharpResult$2_Error } from "@fable-org/fable-library-js/Result.js";
-export function arrayFromMap(otm) {
-    const a = fill(new Array(otm.size), 0, otm.size, "");
-    iterate((kv) => {
-        setItem(a, kv[1], kv[0]);
-    }, otm);
-    return a;
-}
-export function encoder(ot) {
-    const values = map((value) => ({
-        Encode(helpers) {
-            return helpers.encodeString(value);
-        },
-    }), ot);
-    return {
-        Encode(helpers_1) {
-            const arg = map((v) => v.Encode(helpers_1), values);
-            return helpers_1.encodeArray(arg);
-        },
-    };
-}
-export const decoder = array_2(string);
-export function encodeString(otm, s) {
-    let matchValue;
-    let patternInput;
-    let outArg = defaultOf();
-    patternInput = [tryGetValue(otm, s, new FSharpRef(() => outArg, (v) => {
-            outArg = (v | 0);
-        })), outArg];
-    matchValue = (patternInput[0] ? patternInput[1] : undefined);
-    if (matchValue == null) {
-        const i_1 = otm.size | 0;
-        addToDict(otm, s, i_1);
-        return {
-            Encode(helpers_1) {
-                return helpers_1.encodeSignedIntegralNumber(i_1);
-            },
-        };
-    }
-    else {
-        const i = value_2(matchValue) | 0;
-        return {
-            Encode(helpers) {
-                return helpers.encodeSignedIntegralNumber(i);
-            },
-        };
-    }
-}
-export function decodeString(ot) {
-    return {
-        Decode(s, json) {
-            const matchValue = int.Decode(s, json);
-            return (matchValue.tag === /* Error */ 1) ? FSharpResult$2_Error(matchValue.fields[0]) : FSharpResult$2_Ok(item(matchValue.fields[0], ot));
-        },
-    };
-}