@nfdi4plants/arctrl 1.1.0 → 2.0.0-alpha.1

package/ISA/ISA/JsonTypes/Investigation.js

@@ -1,204 +0,0 @@
-import { Record } from "../../../fable_modules/fable-library.4.5.0/Types.js";
-import { getRecordFields, makeRecord, record_type, list_type, option_type, string_type } from "../../../fable_modules/fable-library.4.5.0/Reflection.js";
-import { OntologySourceReference_$reflection } from "./OntologySourceReference.js";
-import { Publication_$reflection } from "./Publication.js";
-import { Person_$reflection } from "./Person.js";
-import { Study_update_7312BC8B, Study_$reflection } from "./Study.js";
-import { Remark_$reflection, Comment$_$reflection } from "./Comment.js";
-import { map, defaultArg } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { map as map_1, empty } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { Option_mapDefault } from "../Helper.js";
-import { map2 } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { Update_updateOnlyByExistingAppend, Update_updateOnlyByExisting, Update_updateAppend } from "../Helper.js";
-import { toFail } from "../../../fable_modules/fable-library.4.5.0/String.js";
-
-export class Investigation extends Record {
-    constructor(ID, FileName, Identifier, Title, Description, SubmissionDate, PublicReleaseDate, OntologySourceReferences, Publications, Contacts, Studies, Comments, Remarks) {
-        super();
-        this.ID = ID;
-        this.FileName = FileName;
-        this.Identifier = Identifier;
-        this.Title = Title;
-        this.Description = Description;
-        this.SubmissionDate = SubmissionDate;
-        this.PublicReleaseDate = PublicReleaseDate;
-        this.OntologySourceReferences = OntologySourceReferences;
-        this.Publications = Publications;
-        this.Contacts = Contacts;
-        this.Studies = Studies;
-        this.Comments = Comments;
-        this.Remarks = Remarks;
-    }
-}
-
-export function Investigation_$reflection() {
-    return record_type("ARCtrl.ISA.Investigation", [], Investigation, () => [["ID", option_type(string_type)], ["FileName", option_type(string_type)], ["Identifier", option_type(string_type)], ["Title", option_type(string_type)], ["Description", option_type(string_type)], ["SubmissionDate", option_type(string_type)], ["PublicReleaseDate", option_type(string_type)], ["OntologySourceReferences", option_type(list_type(OntologySourceReference_$reflection()))], ["Publications", option_type(list_type(Publication_$reflection()))], ["Contacts", option_type(list_type(Person_$reflection()))], ["Studies", option_type(list_type(Study_$reflection()))], ["Comments", option_type(list_type(Comment$_$reflection()))], ["Remarks", list_type(Remark_$reflection())]]);
-}
-
-export function Investigation_make(id, filename, identifier, title, description, submissionDate, publicReleaseDate, ontologySourceReference, publications, contacts, studies, comments, remarks) {
-    return new Investigation(id, filename, identifier, title, description, submissionDate, publicReleaseDate, ontologySourceReference, publications, contacts, studies, comments, remarks);
-}
-
-export function Investigation_create_4AD66BBE(Id, FileName, Identifier, Title, Description, SubmissionDate, PublicReleaseDate, OntologySourceReferences, Publications, Contacts, Studies, Comments, Remarks) {
-    return Investigation_make(Id, FileName, Identifier, Title, Description, SubmissionDate, PublicReleaseDate, OntologySourceReferences, Publications, Contacts, Studies, Comments, defaultArg(Remarks, empty()));
-}
-
-export function Investigation_get_empty() {
-    return Investigation_create_4AD66BBE();
-}
-
-/**
- * Returns contacts of an investigation
- */
-export function Investigation_getContacts_33B81164(investigation) {
-    return investigation.Contacts;
-}
-
-/**
- * Applies function f on person of an investigation
- */
-export function Investigation_mapContacts(f, investigation) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, Option_mapDefault(empty(), f, investigation.Contacts), investigation.Studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Replaces persons of an investigation with the given person list
- */
-export function Investigation_setContacts(investigation, persons) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, persons, investigation.Studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Returns publications of an investigation
- */
-export function Investigation_getPublications_33B81164(investigation) {
-    return investigation.Publications;
-}
-
-/**
- * Applies function f on publications of an investigation
- */
-export function Investigation_mapPublications(f, investigation) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, Option_mapDefault(empty(), f, investigation.Publications), investigation.Contacts, investigation.Studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Replaces publications of an investigation with the given publication list
- */
-export function Investigation_setPublications(investigation, publications) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, publications, investigation.Contacts, investigation.Studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Returns ontology source ref of an investigation
- */
-export function Investigation_getOntologies_33B81164(investigation) {
-    return investigation.OntologySourceReferences;
-}
-
-/**
- * Applies function f on ontology source ref of an investigation
- */
-export function Investigation_mapOntologies(f, investigation) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, Option_mapDefault(empty(), f, investigation.OntologySourceReferences), investigation.Publications, investigation.Contacts, investigation.Studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Replaces ontology source ref of an investigation with the given ontology source ref list
- */
-export function Investigation_setOntologies(investigation, ontologies) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, ontologies, investigation.Publications, investigation.Contacts, investigation.Studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Returns studies of an investigation
- */
-export function Investigation_getStudies_33B81164(investigation) {
-    return defaultArg(investigation.Studies, empty());
-}
-
-/**
- * Applies function f on studies of an investigation
- */
-export function Investigation_mapStudies(f, investigation) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, Option_mapDefault(empty(), f, investigation.Studies), investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Replaces studies of an investigation with the given study list
- */
-export function Investigation_setStudies(investigation, studies) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, studies, investigation.Comments, investigation.Remarks);
-}
-
-/**
- * Returns comments of an investigation
- */
-export function Investigation_getComments_33B81164(investigation) {
-    return investigation.Comments;
-}
-
-/**
- * Applies function f on comments of an investigation
- */
-export function Investigation_mapComments(f, investigation) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, investigation.Studies, Option_mapDefault(empty(), f, investigation.Comments), investigation.Remarks);
-}
-
-/**
- * Replaces comments of an investigation with the given comment list
- */
-export function Investigation_setComments(investigation, comments) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, investigation.Studies, comments, investigation.Remarks);
-}
-
-/**
- * Returns remarks of an investigation
- */
-export function Investigation_getRemarks_33B81164(investigation) {
-    return investigation.Remarks;
-}
-
-/**
- * Applies function f on remarks of an investigation
- */
-export function Investigation_mapRemarks(f, investigation) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, investigation.Studies, investigation.Comments, f(investigation.Remarks));
-}
-
-/**
- * Replaces remarks of an investigation with the given remark list
- */
-export function Investigation_setRemarks(investigation, remarks) {
-    return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, investigation.Studies, investigation.Comments, remarks);
-}
-
-/**
- * Update the investigation with the values of the given newInvestigation
- */
-export function Investigation_updateBy(updateOption, investigation, newInvestigation) {
-    const this$ = updateOption;
-    const recordType_1 = investigation;
-    const recordType_2 = newInvestigation;
-    switch (this$.tag) {
-        case 2:
-            return makeRecord(Investigation_$reflection(), map2(Update_updateAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-        case 1:
-            return makeRecord(Investigation_$reflection(), map2(Update_updateOnlyByExisting, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-        case 3:
-            return makeRecord(Investigation_$reflection(), map2(Update_updateOnlyByExistingAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-        default:
-            return recordType_2;
-    }
-}
-
-export function Investigation_update_33B81164(investigation) {
-    try {
-        return new Investigation(investigation.ID, investigation.FileName, investigation.Identifier, investigation.Title, investigation.Description, investigation.SubmissionDate, investigation.PublicReleaseDate, investigation.OntologySourceReferences, investigation.Publications, investigation.Contacts, map((list) => map_1(Study_update_7312BC8B, list), investigation.Studies), investigation.Comments, investigation.Remarks);
-    }
-    catch (err) {
-        return toFail(`Could not update investigation ${investigation.Identifier}: 
-${err.message}`);
-    }
-}
-

package/ISA/ISA/JsonTypes/OntologyAnnotation.js

@@ -1,196 +0,0 @@
-import { map as map_1, value as value_4, defaultArg, unwrap } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { Pattern_TermAnnotationShortPattern, ActivePatterns_$007CRegex$007C_$007C, tryParseTermAnnotation } from "../Regex.js";
-import { equals, stringHash } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { filter, map, singleton, append, exists, tryFind } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { record_type, array_type, option_type, string_type, getRecordFields, makeRecord } from "../../../fable_modules/fable-library.4.5.0/Reflection.js";
-import { map as map_2, map2 } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { Update_updateOnlyByExistingAppend, Update_updateOnlyByExisting, Update_updateAppend } from "../Helper.js";
-import { Option_mapDefault } from "../Helper.js";
-import { Record, toString } from "../../../fable_modules/fable-library.4.5.0/Types.js";
-import { Comment$_$reflection } from "./Comment.js";
-
-export class OntologyAnnotation extends Record {
-    constructor(ID, Name, TermSourceREF, TermAccessionNumber, Comments) {
-        super();
-        this.ID = ID;
-        this.Name = Name;
-        this.TermSourceREF = TermSourceREF;
-        this.TermAccessionNumber = TermAccessionNumber;
-        this.Comments = Comments;
-    }
-    static make(id, name, termSourceREF, termAccessionNumber, comments) {
-        return new OntologyAnnotation(id, name, termSourceREF, termAccessionNumber, comments);
-    }
-    static create(Id, Name, TermSourceREF, TermAccessionNumber, Comments) {
-        return OntologyAnnotation.make(Id, Name, TermSourceREF, TermAccessionNumber, Comments);
-    }
-    static get empty() {
-        return OntologyAnnotation.create();
-    }
-    get TANInfo() {
-        let matchValue;
-        const this$ = this;
-        return unwrap((matchValue = this$.TermAccessionNumber, (matchValue == null) ? void 0 : tryParseTermAnnotation(matchValue)));
-    }
-    get NameText() {
-        const this$ = this;
-        return defaultArg(this$.Name, "");
-    }
-    get TermSourceREFString() {
-        const this$ = this;
-        return defaultArg(this$.TermSourceREF, "");
-    }
-    get TermAccessionString() {
-        const this$ = this;
-        return defaultArg(this$.TermAccessionNumber, "");
-    }
-    static createUriAnnotation(termSourceRef, localTAN) {
-        return `${"http://purl.obolibrary.org/obo/"}${termSourceRef}_${localTAN}`;
-    }
-    static fromString(termName, tsr, tan, comments) {
-        return OntologyAnnotation.make(void 0, termName, tsr, tan, comments);
-    }
-    static fromTermAnnotation(termAnnotation) {
-        const r = value_4(tryParseTermAnnotation(termAnnotation));
-        const accession = (r.IDSpace + ":") + r.LocalID;
-        return OntologyAnnotation.fromString("", r.IDSpace, accession);
-    }
-    get TermAccessionShort() {
-        const this$ = this;
-        const matchValue = this$.TANInfo;
-        if (matchValue != null) {
-            const id = matchValue;
-            return `${id.IDSpace}:${id.LocalID}`;
-        }
-        else {
-            return "";
-        }
-    }
-    get TermAccessionOntobeeUrl() {
-        const this$ = this;
-        const matchValue = this$.TANInfo;
-        if (matchValue != null) {
-            const id = matchValue;
-            return OntologyAnnotation.createUriAnnotation(id.IDSpace, id.LocalID);
-        }
-        else {
-            return "";
-        }
-    }
-    get TermAccessionAndOntobeeUrlIfShort() {
-        const this$ = this;
-        const matchValue = this$.TermAccessionNumber;
-        if (matchValue != null) {
-            const tan = matchValue;
-            return (ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationShortPattern, tan) != null) ? this$.TermAccessionOntobeeUrl : tan;
-        }
-        else {
-            return "";
-        }
-    }
-    static toString(oa, asOntobeePurlUrlIfShort) {
-        let url;
-        const asOntobeePurlUrlIfShort_1 = defaultArg(asOntobeePurlUrlIfShort, false);
-        const TermName = defaultArg(oa.Name, "");
-        const TermSourceREF = defaultArg(oa.TermSourceREF, "");
-        return {
-            TermAccessionNumber: asOntobeePurlUrlIfShort_1 ? ((url = oa.TermAccessionAndOntobeeUrlIfShort, (url === "") ? defaultArg(oa.TermAccessionNumber, "") : url)) : defaultArg(oa.TermAccessionNumber, ""),
-            TermName: TermName,
-            TermSourceREF: TermSourceREF,
-        };
-    }
-    Equals(other) {
-        const this$ = this;
-        if (other instanceof OntologyAnnotation) {
-            return this$["System.IEquatable`1.Equals2B595"](other);
-        }
-        else if (typeof other === "string") {
-            const s = other;
-            return ((this$.NameText === s) ? true : (this$.TermAccessionShort === s)) ? true : (this$.TermAccessionOntobeeUrl === s);
-        }
-        else {
-            return false;
-        }
-    }
-    GetHashCode() {
-        const this$ = this;
-        return stringHash(this$.NameText + this$.TermAccessionShort) | 0;
-    }
-    static tryGetName(oa) {
-        return oa.Name;
-    }
-    static getNameText(oa) {
-        return oa.NameText;
-    }
-    static nameEqualsString(name, oa) {
-        return oa.NameText === name;
-    }
-    static tryGetByName(name, annotations) {
-        return tryFind((d) => equals(d.Name, name), annotations);
-    }
-    static existsByName(name, annotations) {
-        return exists((d) => equals(d.Name, name), annotations);
-    }
-    static add(onotolgyAnnotations, onotolgyAnnotation) {
-        return append(onotolgyAnnotations, singleton(onotolgyAnnotation));
-    }
-    static updateBy(predicate, updateOption, design, annotations) {
-        return exists(predicate, annotations) ? map((d) => {
-            if (predicate(d)) {
-                const this$ = updateOption;
-                const recordType_1 = d;
-                const recordType_2 = design;
-                switch (this$.tag) {
-                    case 2:
-                        return makeRecord(OntologyAnnotation_$reflection(), map2(Update_updateAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    case 1:
-                        return makeRecord(OntologyAnnotation_$reflection(), map2(Update_updateOnlyByExisting, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    case 3:
-                        return makeRecord(OntologyAnnotation_$reflection(), map2(Update_updateOnlyByExistingAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    default:
-                        return recordType_2;
-                }
-            }
-            else {
-                return d;
-            }
-        }, annotations) : annotations;
-    }
-    static updateByName(updateOption, design, annotations) {
-        return OntologyAnnotation.updateBy((f) => equals(f.Name, design.Name), updateOption, design, annotations);
-    }
-    static removeByName(name, annotations) {
-        return filter((d) => !equals(d.Name, name), annotations);
-    }
-    static getComments(annotation) {
-        return annotation.Comments;
-    }
-    static mapComments(f, annotation) {
-        return new OntologyAnnotation(annotation.ID, annotation.Name, annotation.TermSourceREF, annotation.TermAccessionNumber, Option_mapDefault([], f, annotation.Comments));
-    }
-    static setComments(annotation, comments) {
-        return new OntologyAnnotation(annotation.ID, annotation.Name, annotation.TermSourceREF, annotation.TermAccessionNumber, comments);
-    }
-    Copy() {
-        const this$ = this;
-        const comments = map_1((array) => map_2((c) => c.Copy(), array), this$.Comments);
-        return OntologyAnnotation.make(this$.ID, this$.Name, this$.TermSourceREF, this$.TermAccessionNumber, comments);
-    }
-    Print() {
-        const this$ = this;
-        return toString(this$);
-    }
-    PrintCompact() {
-        const this$ = this;
-        return "OA " + this$.NameText;
-    }
-    "System.IEquatable`1.Equals2B595"(other) {
-        const this$ = this;
-        return ((this$.TermAccessionNumber != null) && (other.TermAccessionNumber != null)) ? ((other.TermAccessionShort === this$.TermAccessionShort) ? true : (other.TermAccessionOntobeeUrl === this$.TermAccessionOntobeeUrl)) : (((this$.Name != null) && (other.Name != null)) ? (other.NameText === this$.NameText) : ((((this$.TermAccessionNumber == null) && (other.TermAccessionNumber == null)) && (this$.Name == null)) && (other.Name == null)));
-    }
-}
-
-export function OntologyAnnotation_$reflection() {
-    return record_type("ARCtrl.ISA.OntologyAnnotation", [], OntologyAnnotation, () => [["ID", option_type(string_type)], ["Name", option_type(string_type)], ["TermSourceREF", option_type(string_type)], ["TermAccessionNumber", option_type(string_type)], ["Comments", option_type(array_type(Comment$_$reflection()))]]);
-}
-

package/ISA/ISA/JsonTypes/OntologySourceReference.js

@@ -1,85 +0,0 @@
-import { filter, map, singleton, append, exists, tryFind } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { equals } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { record_type, array_type, option_type, string_type, getRecordFields, makeRecord } from "../../../fable_modules/fable-library.4.5.0/Reflection.js";
-import { map as map_2, map2 } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { Update_updateOnlyByExistingAppend, Update_updateOnlyByExisting, Update_updateAppend } from "../Helper.js";
-import { Option_mapDefault } from "../Helper.js";
-import { map as map_1 } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { Record } from "../../../fable_modules/fable-library.4.5.0/Types.js";
-import { Comment$_$reflection } from "./Comment.js";
-
-export class OntologySourceReference extends Record {
-    constructor(Description, File, Name, Version, Comments) {
-        super();
-        this.Description = Description;
-        this.File = File;
-        this.Name = Name;
-        this.Version = Version;
-        this.Comments = Comments;
-    }
-    static make(description, file, name, version, comments) {
-        return new OntologySourceReference(description, file, name, version, comments);
-    }
-    static create(Description, File, Name, Version, Comments) {
-        return OntologySourceReference.make(Description, File, Name, Version, Comments);
-    }
-    static get empty() {
-        return OntologySourceReference.create();
-    }
-    static tryGetByName(name, ontologies) {
-        return tryFind((t) => equals(t.Name, name), ontologies);
-    }
-    static existsByName(name, ontologies) {
-        return exists((t) => equals(t.Name, name), ontologies);
-    }
-    static add(ontologySourceReference, ontologies) {
-        return append(ontologies, singleton(ontologySourceReference));
-    }
-    static updateBy(predicate, updateOption, ontologySourceReference, ontologies) {
-        return exists(predicate, ontologies) ? map((t) => {
-            if (predicate(t)) {
-                const this$ = updateOption;
-                const recordType_1 = t;
-                const recordType_2 = ontologySourceReference;
-                switch (this$.tag) {
-                    case 2:
-                        return makeRecord(OntologySourceReference_$reflection(), map2(Update_updateAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    case 1:
-                        return makeRecord(OntologySourceReference_$reflection(), map2(Update_updateOnlyByExisting, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    case 3:
-                        return makeRecord(OntologySourceReference_$reflection(), map2(Update_updateOnlyByExistingAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    default:
-                        return recordType_2;
-                }
-            }
-            else {
-                return t;
-            }
-        }, ontologies) : ontologies;
-    }
-    static updateByName(updateOption, ontologySourceReference, ontologies) {
-        return OntologySourceReference.updateBy((t) => equals(t.Name, ontologySourceReference.Name), updateOption, ontologySourceReference, ontologies);
-    }
-    static removeByName(name, ontologies) {
-        return filter((t) => !equals(t.Name, name), ontologies);
-    }
-    static getComments(ontology) {
-        return ontology.Comments;
-    }
-    static mapComments(f, ontology) {
-        return new OntologySourceReference(ontology.Description, ontology.File, ontology.Name, ontology.Version, Option_mapDefault([], f, ontology.Comments));
-    }
-    static setComments(ontology, comments) {
-        return new OntologySourceReference(ontology.Description, ontology.File, ontology.Name, ontology.Version, comments);
-    }
-    Copy() {
-        const this$ = this;
-        const comments = map_1((array) => map_2((c) => c.Copy(), array), this$.Comments);
-        return OntologySourceReference.make(this$.Description, this$.File, this$.Name, this$.Version, comments);
-    }
-}
-
-export function OntologySourceReference_$reflection() {
-    return record_type("ARCtrl.ISA.OntologySourceReference", [], OntologySourceReference, () => [["Description", option_type(string_type)], ["File", option_type(string_type)], ["Name", option_type(string_type)], ["Version", option_type(string_type)], ["Comments", option_type(array_type(Comment$_$reflection()))]]);
-}
-

package/ISA/ISA/JsonTypes/Person.js

@@ -1,137 +0,0 @@
-import { append as append_1, tryPick, map2, map, tryFind } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { equals } from "../../../fable_modules/fable-library.4.5.0/Util.js";
-import { singleton, append } from "../../../fable_modules/fable-library.4.5.0/List.js";
-import { record_type, array_type, option_type, string_type, getRecordFields, makeRecord } from "../../../fable_modules/fable-library.4.5.0/Reflection.js";
-import { Update_updateOnlyByExistingAppend, Update_updateOnlyByExisting, Update_updateAppend } from "../Helper.js";
-import { Option_fromValueWithDefault, Option_mapDefault } from "../Helper.js";
-import { endsWith } from "../../../fable_modules/fable-library.4.5.0/String.js";
-import { map as map_1, defaultArg, value as value_2 } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { Comment$_$reflection, Comment$ } from "./Comment.js";
-import { Record } from "../../../fable_modules/fable-library.4.5.0/Types.js";
-import { OntologyAnnotation_$reflection } from "./OntologyAnnotation.js";
-
-export class Person extends Record {
-    constructor(ID, ORCID, LastName, FirstName, MidInitials, EMail, Phone, Fax, Address, Affiliation, Roles, Comments) {
-        super();
-        this.ID = ID;
-        this.ORCID = ORCID;
-        this.LastName = LastName;
-        this.FirstName = FirstName;
-        this.MidInitials = MidInitials;
-        this.EMail = EMail;
-        this.Phone = Phone;
-        this.Fax = Fax;
-        this.Address = Address;
-        this.Affiliation = Affiliation;
-        this.Roles = Roles;
-        this.Comments = Comments;
-    }
-    static make(id, orcid, lastName, firstName, midInitials, email, phone, fax, address, affiliation, roles, comments) {
-        return new Person(id, orcid, lastName, firstName, midInitials, email, phone, fax, address, affiliation, roles, comments);
-    }
-    static create(Id, ORCID, LastName, FirstName, MidInitials, Email, Phone, Fax, Address, Affiliation, Roles, Comments) {
-        return Person.make(Id, ORCID, LastName, FirstName, MidInitials, Email, Phone, Fax, Address, Affiliation, Roles, Comments);
-    }
-    static get empty() {
-        return Person.create();
-    }
-    static tryGetByFullName(firstName, midInitials, lastName, persons) {
-        return tryFind((p) => ((midInitials === "") ? (equals(p.FirstName, firstName) && equals(p.LastName, lastName)) : ((equals(p.FirstName, firstName) && equals(p.MidInitials, midInitials)) && equals(p.LastName, lastName))), persons);
-    }
-    static existsByFullName(firstName, midInitials, lastName, persons) {
-        return persons.some((p) => ((midInitials === "") ? (equals(p.FirstName, firstName) && equals(p.LastName, lastName)) : ((equals(p.FirstName, firstName) && equals(p.MidInitials, midInitials)) && equals(p.LastName, lastName))));
-    }
-    static add(persons, person) {
-        return append(persons, singleton(person));
-    }
-    static updateBy(predicate, updateOption, person, persons) {
-        return persons.some(predicate) ? map((p) => {
-            if (predicate(p)) {
-                const this$ = updateOption;
-                const recordType_1 = p;
-                const recordType_2 = person;
-                switch (this$.tag) {
-                    case 2:
-                        return makeRecord(Person_$reflection(), map2(Update_updateAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    case 1:
-                        return makeRecord(Person_$reflection(), map2(Update_updateOnlyByExisting, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    case 3:
-                        return makeRecord(Person_$reflection(), map2(Update_updateOnlyByExistingAppend, getRecordFields(recordType_1), getRecordFields(recordType_2)));
-                    default:
-                        return recordType_2;
-                }
-            }
-            else {
-                return p;
-            }
-        }, persons) : persons;
-    }
-    static updateByFullName(updateOption, person, persons) {
-        return Person.updateBy((p) => {
-            if (equals(p.FirstName, person.FirstName) && equals(p.MidInitials, person.MidInitials)) {
-                return equals(p.LastName, person.LastName);
-            }
-            else {
-                return false;
-            }
-        }, updateOption, person, persons);
-    }
-    static removeByFullName(firstName, midInitials, lastName, persons) {
-        return persons.filter((p) => ((midInitials === "") ? !(equals(p.FirstName, firstName) && equals(p.LastName, lastName)) : !((equals(p.FirstName, firstName) && equals(p.MidInitials, midInitials)) && equals(p.LastName, lastName))));
-    }
-    static getRoles(person) {
-        return person.Roles;
-    }
-    static mapRoles(f, person) {
-        return new Person(person.ID, person.ORCID, person.LastName, person.FirstName, person.MidInitials, person.EMail, person.Phone, person.Fax, person.Address, person.Affiliation, Option_mapDefault([], f, person.Roles), person.Comments);
-    }
-    static setRoles(person, roles) {
-        return new Person(person.ID, person.ORCID, person.LastName, person.FirstName, person.MidInitials, person.EMail, person.Phone, person.Fax, person.Address, person.Affiliation, roles, person.Comments);
-    }
-    static getComments(person) {
-        return person.Comments;
-    }
-    static mapComments(f, person) {
-        return new Person(person.ID, person.ORCID, person.LastName, person.FirstName, person.MidInitials, person.EMail, person.Phone, person.Fax, person.Address, person.Affiliation, person.Roles, Option_mapDefault([], f, person.Comments));
-    }
-    static setComments(person, comments) {
-        return new Person(person.ID, person.ORCID, person.LastName, person.FirstName, person.MidInitials, person.EMail, person.Phone, person.Fax, person.Address, person.Affiliation, person.Roles, comments);
-    }
-    static get orcidKey() {
-        return "ORCID";
-    }
-    static setOrcidFromComments(person) {
-        const isOrcidComment = (c) => {
-            if (c.Name != null) {
-                return endsWith(value_2(c.Name).toLocaleUpperCase(), Person.orcidKey);
-            }
-            else {
-                return false;
-            }
-        };
-        const patternInput = defaultArg(map_1((comments) => [tryPick((c_1) => {
-            if (isOrcidComment(c_1)) {
-                return c_1.Value;
-            }
-            else {
-                return void 0;
-            }
-        }, comments), Option_fromValueWithDefault([], comments.filter((arg) => !isOrcidComment(arg)))], person.Comments), [void 0, person.Comments]);
-        return new Person(person.ID, patternInput[0], person.LastName, person.FirstName, person.MidInitials, person.EMail, person.Phone, person.Fax, person.Address, person.Affiliation, person.Roles, patternInput[1]);
-    }
-    static setCommentFromORCID(person) {
-        let matchValue, matchValue_1, orcid_1, comments, orcid;
-        return new Person(person.ID, person.ORCID, person.LastName, person.FirstName, person.MidInitials, person.EMail, person.Phone, person.Fax, person.Address, person.Affiliation, person.Roles, (matchValue = person.ORCID, (matchValue_1 = person.Comments, (matchValue == null) ? matchValue_1 : ((matchValue_1 == null) ? ((orcid_1 = matchValue, [Comment$.create(void 0, Person.orcidKey, orcid_1)])) : ((comments = matchValue_1, (orcid = matchValue, append_1(comments, [Comment$.create(void 0, Person.orcidKey, orcid)]))))))));
-    }
-    Copy() {
-        const this$ = this;
-        const nextComments = map_1((array) => map((c) => c.Copy(), array), this$.Comments);
-        const roles = map_1((array_1) => map((c_1) => c_1.Copy(), array_1), this$.Roles);
-        return Person.make(this$.ID, this$.ORCID, this$.LastName, this$.FirstName, this$.MidInitials, this$.EMail, this$.Phone, this$.Fax, this$.Address, this$.Affiliation, roles, nextComments);
-    }
-}
-
-export function Person_$reflection() {
-    return record_type("ARCtrl.ISA.Person", [], Person, () => [["ID", option_type(string_type)], ["ORCID", option_type(string_type)], ["LastName", option_type(string_type)], ["FirstName", option_type(string_type)], ["MidInitials", option_type(string_type)], ["EMail", option_type(string_type)], ["Phone", option_type(string_type)], ["Fax", option_type(string_type)], ["Address", option_type(string_type)], ["Affiliation", option_type(string_type)], ["Roles", option_type(array_type(OntologyAnnotation_$reflection()))], ["Comments", option_type(array_type(Comment$_$reflection()))]]);
-}
-