@nfdi4plants/arctrl 1.2.0 → 2.0.0-alpha.2

package/ISA/ISA/ArcTypes/CompositeRow.js

@@ -1,111 +0,0 @@
-import { fold } from "../../../fable_modules/fable-library-js.4.13.0/Seq.js";
-import { Protocol_create_Z7DFD6E67, Protocol_addComponent, Protocol_addParameter, Protocol_setName, Protocol_setDescription, Protocol_setUri, Protocol_setVersion, Protocol_setProtocolType } from "../JsonTypes/Protocol.js";
-import { ProtocolParameter } from "../JsonTypes/ProtocolParameter.js";
-import { Component_create_61502994 } from "../JsonTypes/Component.js";
-import { Value } from "../JsonTypes/Value.js";
-
-export function toProtocol(tableName, row) {
-    return fold((p, hc) => {
-        let matchResult, oa, v, v_1, v_2, v_3, oa_1, oa_2, unit, v_4, oa_3, t;
-        switch (hc[0].tag) {
-            case 4: {
-                if (hc[1].tag === 0) {
-                    matchResult = 0;
-                    oa = hc[1].fields[0];
-                }
-                else {
-                    matchResult = 8;
-                }
-                break;
-            }
-            case 7: {
-                if (hc[1].tag === 1) {
-                    matchResult = 1;
-                    v = hc[1].fields[0];
-                }
-                else {
-                    matchResult = 8;
-                }
-                break;
-            }
-            case 6: {
-                if (hc[1].tag === 1) {
-                    matchResult = 2;
-                    v_1 = hc[1].fields[0];
-                }
-                else {
-                    matchResult = 8;
-                }
-                break;
-            }
-            case 5: {
-                if (hc[1].tag === 1) {
-                    matchResult = 3;
-                    v_2 = hc[1].fields[0];
-                }
-                else {
-                    matchResult = 8;
-                }
-                break;
-            }
-            case 8: {
-                if (hc[1].tag === 1) {
-                    matchResult = 4;
-                    v_3 = hc[1].fields[0];
-                }
-                else {
-                    matchResult = 8;
-                }
-                break;
-            }
-            case 3: {
-                matchResult = 5;
-                oa_1 = hc[0].fields[0];
-                break;
-            }
-            case 0: {
-                switch (hc[1].tag) {
-                    case 2: {
-                        matchResult = 6;
-                        oa_2 = hc[0].fields[0];
-                        unit = hc[1].fields[1];
-                        v_4 = hc[1].fields[0];
-                        break;
-                    }
-                    case 0: {
-                        matchResult = 7;
-                        oa_3 = hc[0].fields[0];
-                        t = hc[1].fields[0];
-                        break;
-                    }
-                    default:
-                        matchResult = 8;
-                }
-                break;
-            }
-            default:
-                matchResult = 8;
-        }
-        switch (matchResult) {
-            case 0:
-                return Protocol_setProtocolType(p, oa);
-            case 1:
-                return Protocol_setVersion(p, v);
-            case 2:
-                return Protocol_setUri(p, v_1);
-            case 3:
-                return Protocol_setDescription(p, v_2);
-            case 4:
-                return Protocol_setName(p, v_3);
-            case 5:
-                return Protocol_addParameter(ProtocolParameter.create(void 0, oa_1), p);
-            case 6:
-                return Protocol_addComponent(Component_create_61502994(void 0, Value.fromString(v_4), unit, oa_2), p);
-            case 7:
-                return Protocol_addComponent(Component_create_61502994(void 0, new Value(0, [t]), void 0, oa_3), p);
-            default:
-                return p;
-        }
-    }, Protocol_create_Z7DFD6E67(void 0, tableName), row);
-}
-

package/ISA/ISA/Builder/Types.js

@@ -1,243 +0,0 @@
-import { Union } from "../../../fable_modules/fable-library-js.4.13.0/Types.js";
-import { list_type, union_type, string_type } from "../../../fable_modules/fable-library-js.4.13.0/Reflection.js";
-import { OntologyAnnotation_$reflection } from "../JsonTypes/OntologyAnnotation.js";
-import { Protocol_get_empty, Protocol } from "../JsonTypes/Protocol.js";
-import { ProcessParameterValue_$reflection } from "../JsonTypes/ProcessParameterValue.js";
-import { MaterialAttributeValue_$reflection } from "../JsonTypes/MaterialAttributeValue.js";
-import { FactorValue_$reflection } from "../JsonTypes/FactorValue.js";
-import { map as map_1, exists, fold, singleton, empty, append } from "../../../fable_modules/fable-library-js.4.13.0/List.js";
-import { map, value as value_4, defaultArg } from "../../../fable_modules/fable-library-js.4.13.0/Option.js";
-import { Process_get_empty, Process } from "../JsonTypes/Process.js";
-import { Assay_get_empty, Assay } from "../JsonTypes/Assay.js";
-import { printf, toFail } from "../../../fable_modules/fable-library-js.4.13.0/String.js";
-import { Study } from "../JsonTypes/Study.js";
-
-export class ProtocolTransformation extends Union {
-    constructor(tag, fields) {
-        super();
-        this.tag = tag;
-        this.fields = fields;
-    }
-    cases() {
-        return ["AddName", "AddProtocolType", "AddDescription"];
-    }
-}
-
-export function ProtocolTransformation_$reflection() {
-    return union_type("ARCtrl.ISA.Builder.ProtocolTransformation", [], ProtocolTransformation, () => [[["Item", string_type]], [["Item", OntologyAnnotation_$reflection()]], [["Item", string_type]]]);
-}
-
-export function ProtocolTransformation__Transform_Z5F51792E(this$, p) {
-    switch (this$.tag) {
-        case 1:
-            return new Protocol(p.ID, p.Name, this$.fields[0], p.Description, p.Uri, p.Version, p.Parameters, p.Components, p.Comments);
-        case 2:
-            return new Protocol(p.ID, p.Name, p.ProtocolType, this$.fields[0], p.Uri, p.Version, p.Parameters, p.Components, p.Comments);
-        default:
-            return new Protocol(p.ID, this$.fields[0], p.ProtocolType, p.Description, p.Uri, p.Version, p.Parameters, p.Components, p.Comments);
-    }
-}
-
-export function ProtocolTransformation__Equals_Z5F51792E(this$, p) {
-    const matchValue = p.Name;
-    let matchResult, n_1, n$0027_1;
-    if (this$.tag === 0) {
-        if (matchValue != null) {
-            if (this$.fields[0] === matchValue) {
-                matchResult = 0;
-                n_1 = this$.fields[0];
-                n$0027_1 = matchValue;
-            }
-            else {
-                matchResult = 1;
-            }
-        }
-        else {
-            matchResult = 1;
-        }
-    }
-    else {
-        matchResult = 1;
-    }
-    switch (matchResult) {
-        case 0:
-            return true;
-        default:
-            return false;
-    }
-}
-
-export class ProcessTransformation extends Union {
-    constructor(tag, fields) {
-        super();
-        this.tag = tag;
-        this.fields = fields;
-    }
-    cases() {
-        return ["AddName", "AddParameter", "AddCharacteristic", "AddFactor", "AddProtocol"];
-    }
-}
-
-export function ProcessTransformation_$reflection() {
-    return union_type("ARCtrl.ISA.Builder.ProcessTransformation", [], ProcessTransformation, () => [[["Item", string_type]], [["Item", ProcessParameterValue_$reflection()]], [["Item", MaterialAttributeValue_$reflection()]], [["Item", FactorValue_$reflection()]], [["Item", list_type(ProtocolTransformation_$reflection())]]]);
-}
-
-export function ProcessTransformation__Transform_716E708F(this$, p) {
-    let pro;
-    switch (this$.tag) {
-        case 1: {
-            const pv = this$.fields[0];
-            const parameterValues = append(defaultArg(p.ParameterValues, empty()), singleton(pv));
-            return new Process(p.ID, p.Name, (pro = defaultArg(p.ExecutesProtocol, Protocol_get_empty()), new Protocol(pro.ID, pro.Name, pro.ProtocolType, pro.Description, pro.Uri, pro.Version, append(defaultArg(pro.Parameters, empty()), singleton(value_4(pv.Category))), pro.Components, pro.Comments)), parameterValues, p.Performer, p.Date, p.PreviousProcess, p.NextProcess, p.Inputs, p.Outputs, p.Comments);
-        }
-        case 2:
-            return new Process(p.ID, p.Name, p.ExecutesProtocol, p.ParameterValues, p.Performer, p.Date, p.PreviousProcess, p.NextProcess, map((i) => i, p.Inputs), p.Outputs, p.Comments);
-        case 3:
-            return new Process(p.ID, p.Name, p.ExecutesProtocol, p.ParameterValues, p.Performer, p.Date, p.PreviousProcess, p.NextProcess, p.Inputs, map((i_1) => i_1, p.Outputs), p.Comments);
-        case 4:
-            return new Process(p.ID, p.Name, fold((pro_2, trans) => ProtocolTransformation__Transform_Z5F51792E(trans, pro_2), defaultArg(p.ExecutesProtocol, Protocol_get_empty()), this$.fields[0]), p.ParameterValues, p.Performer, p.Date, p.PreviousProcess, p.NextProcess, p.Inputs, p.Outputs, p.Comments);
-        default:
-            return new Process(p.ID, this$.fields[0], p.ExecutesProtocol, p.ParameterValues, p.Performer, p.Date, p.PreviousProcess, p.NextProcess, p.Inputs, p.Outputs, p.Comments);
-    }
-}
-
-export function ProcessTransformation__Equals_716E708F(this$, p) {
-    const matchValue = p.Name;
-    let matchResult, n_1, n$0027_1;
-    if (this$.tag === 0) {
-        if (matchValue != null) {
-            if (this$.fields[0] === matchValue) {
-                matchResult = 0;
-                n_1 = this$.fields[0];
-                n$0027_1 = matchValue;
-            }
-            else {
-                matchResult = 1;
-            }
-        }
-        else {
-            matchResult = 1;
-        }
-    }
-    else {
-        matchResult = 1;
-    }
-    switch (matchResult) {
-        case 0:
-            return true;
-        default:
-            return false;
-    }
-}
-
-export class AssayTransformation extends Union {
-    constructor(tag, fields) {
-        super();
-        this.tag = tag;
-        this.fields = fields;
-    }
-    cases() {
-        return ["AddFileName", "AddParameter", "AddCharacteristic", "AddFactor", "AddProcess"];
-    }
-}
-
-export function AssayTransformation_$reflection() {
-    return union_type("ARCtrl.ISA.Builder.AssayTransformation", [], AssayTransformation, () => [[["Item", string_type]], [["Item", ProcessParameterValue_$reflection()]], [["Item", MaterialAttributeValue_$reflection()]], [["Item", FactorValue_$reflection()]], [["Item", list_type(ProcessTransformation_$reflection())]]]);
-}
-
-export function AssayTransformation__Transform_722A269D(this$, a) {
-    switch (this$.tag) {
-        case 4: {
-            const pts = this$.fields[0];
-            const processes = defaultArg(a.ProcessSequence, empty());
-            return new Assay(a.ID, a.FileName, a.MeasurementType, a.TechnologyType, a.TechnologyPlatform, a.DataFiles, a.Materials, a.CharacteristicCategories, a.UnitCategories, exists((p) => exists((trans) => ProcessTransformation__Equals_716E708F(trans, p), pts), processes) ? map_1((p_1) => {
-                if (exists((trans_1) => ProcessTransformation__Equals_716E708F(trans_1, p_1), pts)) {
-                    return fold((p_2, trans_2) => ProcessTransformation__Transform_716E708F(trans_2, p_2), p_1, pts);
-                }
-                else {
-                    return p_1;
-                }
-            }, processes) : append(processes, singleton(fold((p_3, trans_3) => ProcessTransformation__Transform_716E708F(trans_3, p_3), Process_get_empty(), pts))), a.Comments);
-        }
-        case 0:
-            return new Assay(a.ID, this$.fields[0], a.MeasurementType, a.TechnologyType, a.TechnologyPlatform, a.DataFiles, a.Materials, a.CharacteristicCategories, a.UnitCategories, a.ProcessSequence, a.Comments);
-        default:
-            return toFail(printf("Builder failed: Case %O Not implemented"))(this$);
-    }
-}
-
-export function AssayTransformation__Equals_722A269D(this$, a) {
-    const matchValue = a.FileName;
-    let matchResult, n_1, n$0027_1;
-    if (this$.tag === 0) {
-        if (matchValue != null) {
-            if (this$.fields[0] === matchValue) {
-                matchResult = 0;
-                n_1 = this$.fields[0];
-                n$0027_1 = matchValue;
-            }
-            else {
-                matchResult = 1;
-            }
-        }
-        else {
-            matchResult = 1;
-        }
-    }
-    else {
-        matchResult = 1;
-    }
-    switch (matchResult) {
-        case 0:
-            return true;
-        default:
-            return false;
-    }
-}
-
-export class StudyTransformation extends Union {
-    constructor(tag, fields) {
-        super();
-        this.tag = tag;
-        this.fields = fields;
-    }
-    cases() {
-        return ["AddParameter", "AddCharacteristic", "AddFactor", "AddProcess", "AddAssay"];
-    }
-}
-
-export function StudyTransformation_$reflection() {
-    return union_type("ARCtrl.ISA.Builder.StudyTransformation", [], StudyTransformation, () => [[["Item", ProcessParameterValue_$reflection()]], [["Item", MaterialAttributeValue_$reflection()]], [["Item", FactorValue_$reflection()]], [["Item", list_type(ProcessTransformation_$reflection())]], [["Item", list_type(AssayTransformation_$reflection())]]]);
-}
-
-export function StudyTransformation__Transform_7312BC8B(this$, s) {
-    switch (this$.tag) {
-        case 3: {
-            const pts = this$.fields[0];
-            const processes = defaultArg(s.ProcessSequence, empty());
-            return new Study(s.ID, s.FileName, s.Identifier, s.Title, s.Description, s.SubmissionDate, s.PublicReleaseDate, s.Publications, s.Contacts, s.StudyDesignDescriptors, s.Protocols, s.Materials, exists((p) => exists((trans) => ProcessTransformation__Equals_716E708F(trans, p), pts), processes) ? map_1((p_1) => {
-                if (exists((trans_1) => ProcessTransformation__Equals_716E708F(trans_1, p_1), pts)) {
-                    return fold((p_2, trans_2) => ProcessTransformation__Transform_716E708F(trans_2, p_2), p_1, pts);
-                }
-                else {
-                    return p_1;
-                }
-            }, processes) : append(processes, singleton(fold((p_3, trans_3) => ProcessTransformation__Transform_716E708F(trans_3, p_3), Process_get_empty(), pts))), s.Assays, s.Factors, s.CharacteristicCategories, s.UnitCategories, s.Comments);
-        }
-        case 4: {
-            const ats = this$.fields[0];
-            const assays = defaultArg(s.Assays, empty());
-            return new Study(s.ID, s.FileName, s.Identifier, s.Title, s.Description, s.SubmissionDate, s.PublicReleaseDate, s.Publications, s.Contacts, s.StudyDesignDescriptors, s.Protocols, s.Materials, s.ProcessSequence, exists((a) => exists((trans_4) => AssayTransformation__Equals_722A269D(trans_4, a), ats), assays) ? map_1((a_1) => {
-                if (exists((trans_5) => AssayTransformation__Equals_722A269D(trans_5, a_1), ats)) {
-                    return fold((a_2, trans_6) => AssayTransformation__Transform_722A269D(trans_6, a_2), a_1, ats);
-                }
-                else {
-                    return a_1;
-                }
-            }, assays) : append(assays, singleton(fold((a_3, trans_7) => AssayTransformation__Transform_722A269D(trans_7, a_3), Assay_get_empty(), ats))), s.Factors, s.CharacteristicCategories, s.UnitCategories, s.Comments);
-        }
-        default:
-            return toFail(printf("Builder failed: Case %O Not implemented"))(this$);
-    }
-}
-

package/ISA/ISA/Fable.js

@@ -1,123 +0,0 @@
-import { toString } from "../../fable_modules/fable-library-js.4.13.0/Types.js";
-import { map, reduce, append } from "../../fable_modules/fable-library-js.4.13.0/Seq.js";
-import { append as append_1 } from "../../fable_modules/fable-library-js.4.13.0/List.js";
-import { append as append_2 } from "../../fable_modules/fable-library-js.4.13.0/Array.js";
-import { Array_distinct, List_distinct, distinct } from "../../fable_modules/fable-library-js.4.13.0/Seq2.js";
-import { identityHash, structuralHash, equals } from "../../fable_modules/fable-library-js.4.13.0/Util.js";
-
-export function isList_python(l1) {
-    return (to_string(type(l1))).indexOf("FSharpList") >= 0;
-}
-
-export function isSeq_python(l1) {
-    const t = to_string(type(l1));
-    if (t.indexOf("Enumerator_Seq") >= 0) {
-        return true;
-    }
-    else {
-        return t.indexOf("Enumerable") >= 0;
-    }
-}
-
-export function isArray_python(l1) {
-    return (to_string(type(l1))).indexOf("list") >= 0;
-}
-
-export function isMap_python(l1) {
-    return (to_string(type(l1))).indexOf("FSharpMap") >= 0;
-}
-
-export function isNone_python(l1) {
-    let copyOfStruct;
-    return ((copyOfStruct = l1, toString(copyOfStruct))) === "None";
-}
-
-export function isMap_json(l1) {
-    let copyOfStruct;
-    return ((copyOfStruct = l1, toString(copyOfStruct))).indexOf("map [") === 0;
-}
-
-export function isSeq_json(l1) {
-    let copyOfStruct;
-    return ((copyOfStruct = l1, toString(copyOfStruct))).indexOf("seq [") === 0;
-}
-
-export function isList_json(l1) {
-    let s;
-    let copyOfStruct = l1;
-    s = toString(copyOfStruct);
-    if (s.indexOf("[") === 0) {
-        return !(s.indexOf("seq [") === 0);
-    }
-    else {
-        return false;
-    }
-}
-
-export function isNone_json(l1) {
-    return l1 == null;
-}
-
-export function isList_generic(l1) {
-    return isList_json(l1);
-}
-
-export function isSeq_generic(l1) {
-    return isSeq_json(l1);
-}
-
-export function isArray_generic(l1) {
-    return isList_json(l1);
-}
-
-export function isMap_generic(l1) {
-    return isMap_json(l1);
-}
-
-export function isNone_generic(l1) {
-    return isNone_json(l1);
-}
-
-export function append_generic(l1, l2) {
-    if (isNone_generic(l2)) {
-        return l1;
-    }
-    else if (isSeq_generic(l1)) {
-        return append(l1, l2);
-    }
-    else if (isList_generic(l1)) {
-        return append_1(l1, l2);
-    }
-    else {
-        return append_2(l1, l2);
-    }
-}
-
-export function distinct_generic(l1) {
-    if (isSeq_generic(l1)) {
-        return distinct(l1, {
-            Equals: equals,
-            GetHashCode: structuralHash,
-        });
-    }
-    else if (isList_generic(l1)) {
-        return List_distinct(l1, {
-            Equals: equals,
-            GetHashCode: structuralHash,
-        });
-    }
-    else {
-        return Array_distinct(l1, {
-            Equals: equals,
-            GetHashCode: structuralHash,
-        });
-    }
-}
-
-export function hashSeq(s) {
-    return reduce((a, b) => (a + b), map((x) => {
-        let copyOfStruct = x;
-        return identityHash(copyOfStruct) | 0;
-    }, s));
-}
-