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

package/dist/ts/ts/Core/ArcTypes.js

@@ -1,14 +1,15 @@
 import { defaultArg, unwrap, value, map } from '../../node_modules/@fable-org/fable-library-js/Option.js';
 import { DataMap__Copy } from './DataMap.js';
-import { toArray, filter, contains, forAll, fold, length, toList, delay, choose, map as map$1, exists, tryFindIndex, iterate, removeAt, tryFind, item, append, collect } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
-import { getEnumerator, safeHash, equals, disposeSafe, stringHash, defaultOf } from '../../node_modules/@fable-org/fable-library-js/Util.js';
+import { toArray, filter, contains, forAll, fold, length, toList, delay, map as map$1, item, choose, exists, tryFindIndex, iterate, removeAt, tryFind, append, collect } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
+import { stringHash, getEnumerator, safeHash, equals, disposeSafe, defaultOf } from '../../node_modules/@fable-org/fable-library-js/Util.js';
 import { ResizeArray_map, ResizeArray_filter, ResizeArray_choose } from './Helper/Collections.js';
 import { contains as contains$1, removeInPlace, addRangeInPlace } from '../../node_modules/@fable-org/fable-library-js/Array.js';
 import { toText, printf } from '../../node_modules/@fable-org/fable-library-js/String.js';
 import { rangeDouble } from '../../node_modules/@fable-org/fable-library-js/Range.js';
 import { boxHashArray, boxHashOption, boxHashSeq } from './Helper/HashCodes.js';
 import { checkValidCharacters } from './Helper/Identifier.js';
-import { ArcTables, ArcTablesAux_getIOMap, ArcTablesAux_applyIOMap } from './Table/ArcTables.js';
+import { ArcTables, ArcTables_$reflection, ArcTablesAux_getIOMap, ArcTablesAux_applyIOMap } from './Table/ArcTables.js';
+import { class_type } from '../../node_modules/@fable-org/fable-library-js/Reflection.js';
 import { Array_distinct } from '../../node_modules/@fable-org/fable-library-js/Seq2.js';
 import { FSharpRef } from '../../node_modules/@fable-org/fable-library-js/Types.js';
 
@@ -613,6 +614,12 @@ class ArcAssay extends ArcTables {
     return boxHashArray([this$.Identifier, boxHashOption(this$.Title), boxHashOption(this$.Description), boxHashOption(this$.MeasurementType), boxHashOption(this$.TechnologyType), boxHashOption(this$.TechnologyPlatform), boxHashOption(this$.DataMap), boxHashSeq(this$.Tables), boxHashSeq(this$.Performers), boxHashSeq(this$.Comments)]) | 0;
   }
 }
+function ArcAssay_$reflection() {
+  return class_type("ARCtrl.ArcAssay", void 0, ArcAssay, ArcTables_$reflection());
+}
+function ArcAssay_$ctor_11E1F34(identifier, title, description, measurementType, technologyType, technologyPlatform, tables, datamap, performers, comments) {
+  return new ArcAssay(identifier, title, description, measurementType, technologyType, technologyPlatform, tables, datamap, performers, comments);
+}
 class ArcStudy extends ArcTables {
   constructor(identifier, title, description, submissionDate, publicReleaseDate, publications, contacts, studyDesignDescriptors, tables, datamap, registeredAssayIdentifiers, comments) {
     super(defaultArg(tables, []));
@@ -1269,6 +1276,12 @@ class ArcStudy extends ArcTables {
     return boxHashArray([this$.Identifier, boxHashOption(this$.Title), boxHashOption(this$.Description), boxHashOption(this$.SubmissionDate), boxHashOption(this$.PublicReleaseDate), boxHashSeq(this$.Publications), boxHashSeq(this$.Contacts), boxHashSeq(this$.StudyDesignDescriptors), boxHashSeq(this$.Tables), boxHashSeq(this$.RegisteredAssayIdentifiers), boxHashSeq(this$.Comments)]) | 0;
   }
 }
+function ArcStudy_$reflection() {
+  return class_type("ARCtrl.ArcStudy", void 0, ArcStudy, ArcTables_$reflection());
+}
+function ArcStudy_$ctor_64321D5B(identifier, title, description, submissionDate, publicReleaseDate, publications, contacts, studyDesignDescriptors, tables, datamap, registeredAssayIdentifiers, comments) {
+  return new ArcStudy(identifier, title, description, submissionDate, publicReleaseDate, publications, contacts, studyDesignDescriptors, tables, datamap, registeredAssayIdentifiers, comments);
+}
 class ArcWorkflow {
   constructor(identifier, title, description, workflowType, uri, version, subWorkflowIdentifiers, parameters, components, datamap, contacts, comments) {
     let identifier_1;
@@ -1313,6 +1326,9 @@ class ArcWorkflow {
     return boxHashArray([ArcWorkflow__get_Identifier(this$), boxHashOption(ArcWorkflow__get_Title(this$)), boxHashOption(ArcWorkflow__get_Description(this$)), boxHashOption(ArcWorkflow__get_WorkflowType(this$)), boxHashOption(ArcWorkflow__get_URI(this$)), boxHashOption(ArcWorkflow__get_Version(this$)), boxHashSeq(ArcWorkflow__get_SubWorkflowIdentifiers(this$)), boxHashSeq(ArcWorkflow__get_Parameters(this$)), boxHashSeq(ArcWorkflow__get_Components(this$)), boxHashOption(ArcWorkflow__get_DataMap(this$)), boxHashSeq(ArcWorkflow__get_Contacts(this$)), boxHashSeq(ArcWorkflow__get_Comments(this$))]) | 0;
   }
 }
+function ArcWorkflow_$reflection() {
+  return class_type("ARCtrl.ArcWorkflow", void 0, ArcWorkflow);
+}
 function ArcWorkflow_$ctor_Z3BB02240(identifier, title, description, workflowType, uri, version, subWorkflowIdentifiers, parameters, components, datamap, contacts, comments) {
   return new ArcWorkflow(identifier, title, description, workflowType, uri, version, subWorkflowIdentifiers, parameters, components, datamap, contacts, comments);
 }
@@ -1966,6 +1982,12 @@ class ArcRun extends ArcTables {
     return boxHashArray([this$.Identifier, boxHashOption(this$.Title), boxHashOption(this$.Description), boxHashOption(this$.MeasurementType), boxHashOption(this$.TechnologyType), boxHashOption(this$.TechnologyPlatform), boxHashOption(this$.DataMap), boxHashSeq(this$.WorkflowIdentifiers), boxHashSeq(this$.Tables), boxHashSeq(this$.Performers), boxHashSeq(this$.Comments)]) | 0;
   }
 }
+function ArcRun_$reflection() {
+  return class_type("ARCtrl.ArcRun", void 0, ArcRun, ArcTables_$reflection());
+}
+function ArcRun_$ctor_Z38E7054B(identifier, title, description, measurementType, technologyType, technologyPlatform, workflowIdentifiers, tables, datamap, performers, comments) {
+  return new ArcRun(identifier, title, description, measurementType, technologyType, technologyPlatform, workflowIdentifiers, tables, datamap, performers, comments);
+}
 class ArcInvestigation {
   constructor(identifier, title, description, submissionDate, publicReleaseDate, ontologySourceReferences, publications, contacts, assays, studies, workflows, runs, registeredStudyIdentifiers, comments, remarks) {
     const this$ = new FSharpRef(defaultOf());
@@ -2197,7 +2219,8 @@ class ArcInvestigation {
     const this$ = this;
     const assayIdent = assay.Identifier;
     const matchValue = tryFindIndex((x_1) => x_1 === assayIdent, map$1((x) => x.Identifier, this$.Assays));
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create assay with name ${assayIdent}, as assay names must be unique and assay at index ${value(matchValue)} has the same name.`);
     }
     assay.Investigation = this$;
@@ -2315,7 +2338,8 @@ class ArcInvestigation {
     const this$ = this;
     const assayIdent = assay.Identifier;
     const matchValue = tryFindIndex((x) => x === assayIdent, map$1((a) => a.Identifier, removeAt(index, this$.Assays)));
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create assay with name ${assayIdent}, as assay names must be unique and assay at index ${value(matchValue)} has the same name.`);
     }
     assay.Investigation = this$;
@@ -2429,7 +2453,8 @@ class ArcInvestigation {
     const this$ = this;
     const study_1 = study;
     const matchValue = tryFindIndex((x) => x.Identifier === study_1.Identifier, this$.Studies);
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create study with name ${study_1.Identifier}, as study names must be unique and study at index ${value(matchValue)} has the same name.`);
     }
     study.Investigation = this$;
@@ -2458,7 +2483,8 @@ class ArcInvestigation {
     const this$ = this;
     const studyIdent = studyIdentifier;
     const matchValue = tryFind((x) => x === studyIdent, this$.StudyIdentifiers);
-    if (matchValue != null) ; else {
+    if (matchValue != null) {
+    } else {
       throw new Error(`The given study with identifier '${studyIdent}' must be added to Investigation before it can be registered.`);
     }
     const studyIdent_1 = studyIdentifier;
@@ -2562,7 +2588,8 @@ class ArcInvestigation {
     const this$ = this;
     const study_1 = study;
     const matchValue = tryFindIndex((x) => x.Identifier === study_1.Identifier, removeAt(index, this$.Studies));
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create study with name ${study_1.Identifier}, as study names must be unique and study at index ${value(matchValue)} has the same name.`);
     }
     study.Investigation = this$;
@@ -2644,12 +2671,14 @@ class ArcInvestigation {
     const this$ = this;
     const study = this$.GetStudyAt(studyIndex);
     const matchValue = tryFind((x) => x === assayIdentifier, map$1((a) => a.Identifier, this$.Assays));
-    if (matchValue != null) ; else {
+    if (matchValue != null) {
+    } else {
       throw new Error("The given assay must be added to Investigation before it can be registered.");
     }
     const assayIdent_1 = assayIdentifier;
     const matchValue_1 = tryFindIndex((x_1) => x_1 === assayIdent_1, study.RegisteredAssayIdentifiers);
-    if (matchValue_1 == null) ; else {
+    if (matchValue_1 == null) {
+    } else {
       throw new Error(`Cannot create assay with name ${assayIdent_1}, as assay names must be unique and assay at index ${value(matchValue_1)} has the same name.`);
     }
     study.RegisterAssay(assayIdentifier);
@@ -2734,7 +2763,8 @@ class ArcInvestigation {
     const this$ = this;
     const workflow_1 = workflow;
     const matchValue = tryFindIndex((x) => ArcWorkflow__get_Identifier(x) === ArcWorkflow__get_Identifier(workflow_1), this$.Workflows);
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create workflow with name ${ArcWorkflow__get_Identifier(workflow_1)}, as workflow names must be unique and workflow at index ${value(matchValue)} has the same name.`);
     }
     ArcWorkflow__set_Investigation_Z1E102E3E(workflow, this$);
@@ -2828,7 +2858,8 @@ class ArcInvestigation {
     const this$ = this;
     const workflow_1 = workflow;
     const matchValue = tryFindIndex((x) => ArcWorkflow__get_Identifier(x) === ArcWorkflow__get_Identifier(workflow_1), this$.Workflows);
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create workflow with name ${ArcWorkflow__get_Identifier(workflow_1)}, as workflow names must be unique and workflow at index ${value(matchValue)} has the same name.`);
     }
     ArcWorkflow__set_Investigation_Z1E102E3E(workflow, this$);
@@ -2876,7 +2907,8 @@ class ArcInvestigation {
     const this$ = this;
     const run_1 = run;
     const matchValue = tryFindIndex((x) => x.Identifier === run_1.Identifier, this$.Runs);
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create run with name ${run_1.Identifier}, as run names must be unique and run at index ${value(matchValue)} has the same name.`);
     }
     run.Investigation = this$;
@@ -2970,7 +3002,8 @@ class ArcInvestigation {
     const this$ = this;
     const run_1 = run;
     const matchValue = tryFindIndex((x) => x.Identifier === run_1.Identifier, this$.Runs);
-    if (matchValue == null) ; else {
+    if (matchValue == null) {
+    } else {
       throw new Error(`Cannot create run with name ${run_1.Identifier}, as run names must be unique and run at index ${value(matchValue)} has the same name.`);
     }
     run.Investigation = this$;
@@ -3262,6 +3295,12 @@ class ArcInvestigation {
     return boxHashArray([this$.Identifier, boxHashOption(this$.Title), boxHashOption(this$.Description), boxHashOption(this$.SubmissionDate), boxHashOption(this$.PublicReleaseDate), boxHashSeq(this$.Publications), boxHashSeq(this$.Contacts), boxHashSeq(this$.OntologySourceReferences), boxHashSeq(this$.RegisteredStudyIdentifiers), boxHashSeq(this$.Comments), boxHashSeq(this$.Remarks)]) | 0;
   }
 }
+function ArcInvestigation_$reflection() {
+  return class_type("ARCtrl.ArcInvestigation", void 0, ArcInvestigation);
+}
+function ArcInvestigation_$ctor_Z67823F6C(identifier, title, description, submissionDate, publicReleaseDate, ontologySourceReferences, publications, contacts, assays, studies, workflows, runs, registeredStudyIdentifiers, comments, remarks) {
+  return new ArcInvestigation(identifier, title, description, submissionDate, publicReleaseDate, ontologySourceReferences, publications, contacts, assays, studies, workflows, runs, registeredStudyIdentifiers, comments, remarks);
+}
 function ArcTypesAux_ErrorMsgs_unableToFindAssayIdentifier(assayIdentifier, investigationIdentifier) {
   return `Error. Unable to find assay with identifier '${assayIdentifier}' in investigation ${investigationIdentifier}.`;
 }
@@ -3277,6 +3316,9 @@ function ArcTypesAux_ErrorMsgs_unableToFindRunIdentifier(runIdentifier, investig
 function ArcWorkflow__get_Identifier(this$) {
   return this$["identifier@1151"];
 }
+function ArcWorkflow__set_Identifier_Z721C83C5(this$, i) {
+  this$["identifier@1151"] = i;
+}
 function ArcWorkflow__get_Investigation(this$) {
   return this$.investigation;
 }
@@ -3286,27 +3328,51 @@ function ArcWorkflow__set_Investigation_Z1E102E3E(this$, a) {
 function ArcWorkflow__get_Title(this$) {
   return this$["title@1156"];
 }
+function ArcWorkflow__set_Title_6DFDD678(this$, t) {
+  this$["title@1156"] = t;
+}
 function ArcWorkflow__get_Description(this$) {
   return this$["description@1157"];
 }
+function ArcWorkflow__set_Description_6DFDD678(this$, d) {
+  this$["description@1157"] = d;
+}
 function ArcWorkflow__get_SubWorkflowIdentifiers(this$) {
   return this$["subWorkflowIdentifiers@1158"];
 }
+function ArcWorkflow__set_SubWorkflowIdentifiers_70A00D82(this$, s) {
+  this$["subWorkflowIdentifiers@1158"] = s;
+}
 function ArcWorkflow__get_WorkflowType(this$) {
   return this$["workflowType@1159"];
 }
+function ArcWorkflow__set_WorkflowType_279AAFF2(this$, w) {
+  this$["workflowType@1159"] = w;
+}
 function ArcWorkflow__get_URI(this$) {
   return this$["uri@1160"];
 }
+function ArcWorkflow__set_URI_6DFDD678(this$, u) {
+  this$["uri@1160"] = u;
+}
 function ArcWorkflow__get_Version(this$) {
   return this$["version@1161"];
 }
+function ArcWorkflow__set_Version_6DFDD678(this$, v) {
+  this$["version@1161"] = v;
+}
 function ArcWorkflow__get_Parameters(this$) {
   return this$["parameters@1162"];
 }
+function ArcWorkflow__set_Parameters_10749ED2(this$, p) {
+  this$["parameters@1162"] = p;
+}
 function ArcWorkflow__get_Components(this$) {
   return this$["components@1163"];
 }
+function ArcWorkflow__set_Components_Z3A507DDE(this$, c) {
+  this$["components@1163"] = c;
+}
 function ArcWorkflow__get_DataMap(this$) {
   return this$.dataMap;
 }
@@ -3322,6 +3388,9 @@ function ArcWorkflow__set_Contacts_Z7E0D1CA3(this$, c) {
 function ArcWorkflow__get_Comments(this$) {
   return this$["comments@1166"];
 }
+function ArcWorkflow__set_Comments_149C14BB(this$, c) {
+  this$["comments@1166"] = c;
+}
 function ArcWorkflow__get_StaticHash(this$) {
   return this$.staticHash;
 }
@@ -3337,6 +3406,135 @@ function ArcWorkflow_create_Z3BB02240(identifier, title, description, workflowTy
 function ArcWorkflow_make(identifier, title, description, workflowType, uri, version, subWorkflowIdentifiers, parameters, components, datamap, contacts, comments) {
   return ArcWorkflow_$ctor_Z3BB02240(identifier, unwrap(title), unwrap(description), unwrap(workflowType), unwrap(uri), unwrap(version), subWorkflowIdentifiers, parameters, components, unwrap(datamap), contacts, comments);
 }
+function ArcWorkflow_get_FileName() {
+  return "isa.run.xlsx";
+}
+function ArcWorkflow__get_SubWorkflowIdentifiersCount(this$) {
+  return ArcWorkflow__get_SubWorkflowIdentifiers(this$).length;
+}
+function ArcWorkflow__get_SubWorkflowCount(this$) {
+  return ArcWorkflow__get_SubWorkflows(this$).length;
+}
+function ArcWorkflow__get_SubWorkflows(this$) {
+  let inv;
+  const investigation = ArcWorkflow__get_Investigation(this$);
+  if (investigation != null) {
+    inv = value(investigation);
+  } else {
+    throw new Error("Cannot execute this function. Object is not part of ArcInvestigation.");
+  }
+  const collection = choose((workflowIdentifier) => inv.TryGetWorkflow(workflowIdentifier), ArcWorkflow__get_SubWorkflowIdentifiers(this$));
+  return Array.from(collection);
+}
+function ArcWorkflow__get_VacantSubWorkflowIdentifiers(this$) {
+  let inv;
+  const investigation = ArcWorkflow__get_Investigation(this$);
+  if (investigation != null) {
+    inv = value(investigation);
+  } else {
+    throw new Error("Cannot execute this function. Object is not part of ArcInvestigation.");
+  }
+  const collection = filter((arg) => !inv.ContainsWorkflow(arg), ArcWorkflow__get_SubWorkflowIdentifiers(this$));
+  return Array.from(collection);
+}
+function ArcWorkflow__AddSubWorkflow_Z1C75CB0E(this$, subWorkflow) {
+  let inv;
+  const investigation = ArcWorkflow__get_Investigation(this$);
+  if (investigation != null) {
+    inv = value(investigation);
+  } else {
+    throw new Error("Cannot execute this function. Object is not part of ArcInvestigation.");
+  }
+  inv.AddWorkflow(subWorkflow);
+}
+function ArcWorkflow_addSubWorkflow_Z1C75CB0E(subWorkflow) {
+  return (workflow) => {
+    const newWorkflow = ArcWorkflow__Copy_6FCE9E49(workflow);
+    ArcWorkflow__AddSubWorkflow_Z1C75CB0E(newWorkflow, subWorkflow);
+    return newWorkflow;
+  };
+}
+function ArcWorkflow__InitSubWorkflow_Z721C83C5(this$, subWorkflowIdentifier) {
+  const subWorkflow = ArcWorkflow_$ctor_Z3BB02240(subWorkflowIdentifier);
+  ArcWorkflow__AddSubWorkflow_Z1C75CB0E(this$, subWorkflow);
+  return subWorkflow;
+}
+function ArcWorkflow_initSubWorkflow_Z721C83C5(subWorkflowIdentifier) {
+  return (workflow) => {
+    const copy = ArcWorkflow__Copy_6FCE9E49(workflow);
+    return [copy, ArcWorkflow__InitSubWorkflow_Z721C83C5(copy, subWorkflowIdentifier)];
+  };
+}
+function ArcWorkflow__RegisterSubWorkflow_Z721C83C5(this$, subWorkflowIdentifier) {
+  if (contains(subWorkflowIdentifier, ArcWorkflow__get_SubWorkflowIdentifiers(this$), {
+    Equals: (x, y) => x === y,
+    GetHashCode: stringHash
+  })) {
+    throw new Error(`SubWorkflow \`${subWorkflowIdentifier}\` is already registered on the workflow.`);
+  }
+  void ArcWorkflow__get_SubWorkflowIdentifiers(this$).push(subWorkflowIdentifier);
+}
+function ArcWorkflow_registerSubWorkflow_Z721C83C5(subWorkflowIdentifier) {
+  return (workflow) => {
+    const copy = ArcWorkflow__Copy_6FCE9E49(workflow);
+    ArcWorkflow__RegisterSubWorkflow_Z721C83C5(copy, subWorkflowIdentifier);
+    return copy;
+  };
+}
+function ArcWorkflow__DeregisterSubWorkflow_Z721C83C5(this$, subWorkflowIdentifier) {
+  removeInPlace(subWorkflowIdentifier, ArcWorkflow__get_SubWorkflowIdentifiers(this$), {
+    Equals: (x, y) => x === y,
+    GetHashCode: stringHash
+  });
+}
+function ArcWorkflow_deregisterSubWorkflow_Z721C83C5(subWorkflowIdentifier) {
+  return (workflow) => {
+    const copy = ArcWorkflow__Copy_6FCE9E49(workflow);
+    ArcWorkflow__DeregisterSubWorkflow_Z721C83C5(copy, subWorkflowIdentifier);
+    return copy;
+  };
+}
+function ArcWorkflow__GetRegisteredSubWorkflow_Z721C83C5(this$, subWorkflowIdentifier) {
+  if (!contains(subWorkflowIdentifier, ArcWorkflow__get_SubWorkflowIdentifiers(this$), {
+    Equals: (x, y) => x === y,
+    GetHashCode: stringHash
+  })) {
+    throw new Error(`SubWorkflow \`${subWorkflowIdentifier}\` is not registered on the workflow.`);
+  }
+  let inv;
+  const investigation = ArcWorkflow__get_Investigation(this$);
+  if (investigation != null) {
+    inv = value(investigation);
+  } else {
+    throw new Error("Cannot execute this function. Object is not part of ArcInvestigation.");
+  }
+  return inv.GetWorkflow(subWorkflowIdentifier);
+}
+function ArcWorkflow_getRegisteredSubWorkflow_Z721C83C5(subWorkflowIdentifier) {
+  return (workflow) => ArcWorkflow__GetRegisteredSubWorkflow_Z721C83C5(ArcWorkflow__Copy_6FCE9E49(workflow), subWorkflowIdentifier);
+}
+function ArcWorkflow_getRegisteredSubWorkflows() {
+  return (workflow) => ArcWorkflow__get_SubWorkflows(ArcWorkflow__Copy_6FCE9E49(workflow));
+}
+function ArcWorkflow__GetRegisteredSubWorkflowsOrIdentifier(this$) {
+  const matchValue = ArcWorkflow__get_Investigation(this$);
+  if (matchValue == null) {
+    return ResizeArray_map(ArcWorkflow_init_Z721C83C5, ArcWorkflow__get_SubWorkflowIdentifiers(this$));
+  } else {
+    const i = value(matchValue);
+    return ResizeArray_map((identifier) => {
+      const matchValue_1 = i.TryGetWorkflow(identifier);
+      if (matchValue_1 == null) {
+        return ArcWorkflow_init_Z721C83C5(identifier);
+      } else {
+        return value(matchValue_1);
+      }
+    }, ArcWorkflow__get_SubWorkflowIdentifiers(this$));
+  }
+}
+function ArcWorkflow_getRegisteredSubWorkflowsOrIdentifier() {
+  return (workflow) => ArcWorkflow__GetRegisteredSubWorkflowsOrIdentifier(ArcWorkflow__Copy_6FCE9E49(workflow));
+}
 function ArcWorkflow__Copy_6FCE9E49(this$, copyInvestigationRef) {
   const copyInvestigationRef_1 = defaultArg(copyInvestigationRef, false);
   const nextWorkFlowType = map((w) => w.Copy(), ArcWorkflow__get_WorkflowType(this$));
@@ -3386,8 +3584,11 @@ function ArcWorkflow__StructurallyEquals_Z1C75CB0E(this$, other) {
     }
   }, true, toList(delay(() => map$1((i_5) => equals(item(i_5, a_4), item(i_5, b_4)), rangeDouble(0, 1, length(a_4) - 1))))))]);
 }
+function ArcWorkflow__ReferenceEquals_1680536E(this$, other) {
+  return this$ === other;
+}
 function ArcWorkflow__GetLightHashCode(this$) {
   return boxHashArray([ArcWorkflow__get_Identifier(this$), boxHashOption(ArcWorkflow__get_Title(this$)), boxHashOption(ArcWorkflow__get_Description(this$)), boxHashOption(ArcWorkflow__get_WorkflowType(this$)), boxHashOption(ArcWorkflow__get_URI(this$)), boxHashOption(ArcWorkflow__get_Version(this$)), boxHashSeq(ArcWorkflow__get_SubWorkflowIdentifiers(this$)), boxHashSeq(ArcWorkflow__get_Parameters(this$)), boxHashSeq(ArcWorkflow__get_Components(this$)), boxHashSeq(ArcWorkflow__get_Contacts(this$)), boxHashSeq(ArcWorkflow__get_Comments(this$))]);
 }
 
-export { ArcAssay, ArcInvestigation, ArcRun, ArcStudy, ArcTypesAux_ErrorMsgs_unableToFindAssayIdentifier, ArcTypesAux_ErrorMsgs_unableToFindRunIdentifier, ArcTypesAux_ErrorMsgs_unableToFindStudyIdentifier, ArcTypesAux_ErrorMsgs_unableToFindWorkflowIdentifier, ArcWorkflow, ArcWorkflow_$ctor_Z3BB02240, ArcWorkflow__Copy_6FCE9E49, ArcWorkflow__GetLightHashCode, ArcWorkflow__StructurallyEquals_Z1C75CB0E, ArcWorkflow__get_Comments, ArcWorkflow__get_Components, ArcWorkflow__get_Contacts, ArcWorkflow__get_DataMap, ArcWorkflow__get_Description, ArcWorkflow__get_Identifier, ArcWorkflow__get_Investigation, ArcWorkflow__get_Parameters, ArcWorkflow__get_StaticHash, ArcWorkflow__get_SubWorkflowIdentifiers, ArcWorkflow__get_Title, ArcWorkflow__get_URI, ArcWorkflow__get_Version, ArcWorkflow__get_WorkflowType, ArcWorkflow__set_Contacts_Z7E0D1CA3, ArcWorkflow__set_DataMap_51F1E59E, ArcWorkflow__set_Investigation_Z1E102E3E, ArcWorkflow__set_StaticHash_Z524259A4, ArcWorkflow_create_Z3BB02240, ArcWorkflow_init_Z721C83C5, ArcWorkflow_make };
+export { ArcAssay, ArcAssay_$ctor_11E1F34, ArcAssay_$reflection, ArcInvestigation, ArcInvestigation_$ctor_Z67823F6C, ArcInvestigation_$reflection, ArcRun, ArcRun_$ctor_Z38E7054B, ArcRun_$reflection, ArcStudy, ArcStudy_$ctor_64321D5B, ArcStudy_$reflection, ArcTypesAux_ErrorMsgs_unableToFindAssayIdentifier, ArcTypesAux_ErrorMsgs_unableToFindRunIdentifier, ArcTypesAux_ErrorMsgs_unableToFindStudyIdentifier, ArcTypesAux_ErrorMsgs_unableToFindWorkflowIdentifier, ArcWorkflow, ArcWorkflow_$ctor_Z3BB02240, ArcWorkflow_$reflection, ArcWorkflow__AddSubWorkflow_Z1C75CB0E, ArcWorkflow__Copy_6FCE9E49, ArcWorkflow__DeregisterSubWorkflow_Z721C83C5, ArcWorkflow__GetLightHashCode, ArcWorkflow__GetRegisteredSubWorkflow_Z721C83C5, ArcWorkflow__GetRegisteredSubWorkflowsOrIdentifier, ArcWorkflow__InitSubWorkflow_Z721C83C5, ArcWorkflow__ReferenceEquals_1680536E, ArcWorkflow__RegisterSubWorkflow_Z721C83C5, ArcWorkflow__StructurallyEquals_Z1C75CB0E, ArcWorkflow__get_Comments, ArcWorkflow__get_Components, ArcWorkflow__get_Contacts, ArcWorkflow__get_DataMap, ArcWorkflow__get_Description, ArcWorkflow__get_Identifier, ArcWorkflow__get_Investigation, ArcWorkflow__get_Parameters, ArcWorkflow__get_StaticHash, ArcWorkflow__get_SubWorkflowCount, ArcWorkflow__get_SubWorkflowIdentifiers, ArcWorkflow__get_SubWorkflowIdentifiersCount, ArcWorkflow__get_SubWorkflows, ArcWorkflow__get_Title, ArcWorkflow__get_URI, ArcWorkflow__get_VacantSubWorkflowIdentifiers, ArcWorkflow__get_Version, ArcWorkflow__get_WorkflowType, ArcWorkflow__set_Comments_149C14BB, ArcWorkflow__set_Components_Z3A507DDE, ArcWorkflow__set_Contacts_Z7E0D1CA3, ArcWorkflow__set_DataMap_51F1E59E, ArcWorkflow__set_Description_6DFDD678, ArcWorkflow__set_Identifier_Z721C83C5, ArcWorkflow__set_Investigation_Z1E102E3E, ArcWorkflow__set_Parameters_10749ED2, ArcWorkflow__set_StaticHash_Z524259A4, ArcWorkflow__set_SubWorkflowIdentifiers_70A00D82, ArcWorkflow__set_Title_6DFDD678, ArcWorkflow__set_URI_6DFDD678, ArcWorkflow__set_Version_6DFDD678, ArcWorkflow__set_WorkflowType_279AAFF2, ArcWorkflow_addSubWorkflow_Z1C75CB0E, ArcWorkflow_create_Z3BB02240, ArcWorkflow_deregisterSubWorkflow_Z721C83C5, ArcWorkflow_getRegisteredSubWorkflow_Z721C83C5, ArcWorkflow_getRegisteredSubWorkflows, ArcWorkflow_getRegisteredSubWorkflowsOrIdentifier, ArcWorkflow_get_FileName, ArcWorkflow_initSubWorkflow_Z721C83C5, ArcWorkflow_init_Z721C83C5, ArcWorkflow_make, ArcWorkflow_registerSubWorkflow_Z721C83C5 };

package/dist/ts/ts/Core/Comment.js

@@ -7,6 +7,7 @@ import { map, choose, ofArray } from '../../node_modules/@fable-org/fable-librar
 import { toString, Record } from '../../node_modules/@fable-org/fable-library-js/Types.js';
 import { match, create } from '../../node_modules/@fable-org/fable-library-js/RegExp.js';
 import { Pattern_handleGroupPatterns } from './Helper/Regex.js';
+import { class_type, record_type, int32_type, string_type } from '../../node_modules/@fable-org/fable-library-js/Reflection.js';
 
 class Comment$ {
   constructor(name, value) {
@@ -67,6 +68,12 @@ class Comment$ {
     return new Comment$(unwrap(nameResult != null ? replace(replace(nameResult[0], "Name = ", ""), '"', "") : void 0), unwrap(valueResult != null ? replace(replace(valueResult[0], "Value = ", ""), '"', "") : void 0));
   }
 }
+function Comment$_$reflection() {
+  return class_type("ARCtrl.Comment", void 0, Comment$);
+}
+function Comment_$ctor_40457300(name, value) {
+  return new Comment$(name, value);
+}
 class Remark extends Record {
   constructor(Line, Value) {
     super();
@@ -87,5 +94,8 @@ class Remark extends Record {
     return Remark.make(this$.Line, this$.Value);
   }
 }
+function Remark_$reflection() {
+  return record_type("ARCtrl.Remark", [], Remark, () => [["Line", int32_type], ["Value", string_type]]);
+}
 
-export { Comment$, Remark };
+export { Comment$, Comment$_$reflection, Comment_$ctor_40457300, Remark, Remark_$reflection };

package/dist/ts/ts/Core/CommentList.js

@@ -1,5 +1,8 @@
-import { tryPick } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
+import { tryPick, exists } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
 import { value } from '../../node_modules/@fable-org/fable-library-js/Option.js';
+import { ofSeq } from '../../node_modules/@fable-org/fable-library-js/Map.js';
+import { ResizeArray_choose, ResizeArray_map, ResizeArray_appendSingleton, ResizeArray_filter } from './Helper/Collections.js';
+import { comparePrimitives, equals } from '../../node_modules/@fable-org/fable-library-js/Util.js';
 
 function tryItem(key, comments) {
   return tryPick((c) => {
@@ -23,5 +26,77 @@ function tryItem(key, comments) {
     }
   }, comments);
 }
+function containsKey(key, comments) {
+  return exists((c) => {
+    const matchValue = c.Name;
+    let matchResult, n_1;
+    if (matchValue != null) {
+      if (value(matchValue) === key) {
+        matchResult = 0;
+        n_1 = value(matchValue);
+      } else {
+        matchResult = 1;
+      }
+    } else {
+      matchResult = 1;
+    }
+    switch (matchResult) {
+      case 0:
+        return true;
+      default:
+        return false;
+    }
+  }, comments);
+}
+function item(key, comments) {
+  return value(tryItem(key, comments));
+}
+function toMap(comments) {
+  return ofSeq(ResizeArray_choose((c) => {
+    const matchValue = c.Name;
+    if (matchValue != null) {
+      return [value(matchValue), c.Value];
+    } else {
+      return void 0;
+    }
+  }, comments), {
+    Compare: comparePrimitives
+  });
+}
+function set$(comment, comments) {
+  if (containsKey(value(comment.Name), comments)) {
+    return ResizeArray_map((c) => {
+      if (equals(c.Name, comment.Name)) {
+        return comment;
+      } else {
+        return c;
+      }
+    }, comments);
+  } else {
+    return ResizeArray_appendSingleton(comment, comments);
+  }
+}
+function dropByKey(key, comments) {
+  return ResizeArray_filter((c) => {
+    const matchValue = c.Name;
+    let matchResult, n_1;
+    if (matchValue != null) {
+      if (value(matchValue) === key) {
+        matchResult = 0;
+        n_1 = value(matchValue);
+      } else {
+        matchResult = 1;
+      }
+    } else {
+      matchResult = 1;
+    }
+    switch (matchResult) {
+      case 0:
+        return false;
+      default:
+        return true;
+    }
+  }, comments);
+}
 
-export { tryItem };
+export { containsKey, dropByKey, item, set$, toMap, tryItem };