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

package/dist/ts/ts/Core/Process/Process.js

@@ -1,14 +1,19 @@
 import { Record, toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import { length, empty, choose, append, collect } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-import { defaultArg, value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { ProcessInput_tryData_5B3D5BA9, ProcessInput_trySample_5B3D5BA9, ProcessInput_tryMaterial_5B3D5BA9, ProcessInput_trySource_5B3D5BA9, ProcessInput_tryGetCharacteristicValues_5B3D5BA9 } from './ProcessInput.js';
+import { length, empty, choose, collect, append, tryFind, map as map$1, tryPick, zip } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { defaultArg, value, bind, map } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { ProcessInput_$reflection, ProcessInput_tryGetCharacteristicValues_5B3D5BA9, ProcessInput_trySource_5B3D5BA9, ProcessInput_tryData_5B3D5BA9, ProcessInput_trySample_5B3D5BA9, ProcessInput_tryMaterial_5B3D5BA9 } from './ProcessInput.js';
 import { parse } from '../../../node_modules/@fable-org/fable-library-js/Int32.js';
-import { ProcessOutput_tryData_Z42C11600, ProcessOutput_tryGetFactorValues_Z42C11600, ProcessOutput_trySample_Z42C11600, ProcessOutput_tryMaterial_Z42C11600, ProcessOutput_tryGetCharacteristicValues_Z42C11600 } from './ProcessOutput.js';
-import '../Helper/Url.js';
-import { ActivePatterns_$007CRegex$007C_$007C } from '../Helper/Regex.js';
+import { ProcessOutput_$reflection, ProcessOutput_tryGetCharacteristicValues_Z42C11600, ProcessOutput_tryGetFactorValues_Z42C11600, ProcessOutput_tryData_Z42C11600, ProcessOutput_trySample_Z42C11600, ProcessOutput_tryMaterial_Z42C11600 } from './ProcessOutput.js';
+import { ProcessParameterValue_$reflection } from './ProcessParameterValue.js';
 import { toText, printf } from '../../../node_modules/@fable-org/fable-library-js/String.js';
+import { Protocol_$reflection } from './Protocol.js';
+import { Comment$_$reflection } from '../Comment.js';
 import { safeHash, equals } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
+import { record_type, option_type, string_type, list_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
+import { ActivePatterns_$007CRegex$007C_$007C } from '../Helper/Regex.js';
+import { ProtocolParameter } from './ProtocolParameter.js';
 import { List_distinct } from '../../../node_modules/@fable-org/fable-library-js/Seq2.js';
+import { Option_fromValueWithDefault } from '../Helper/Collections.js';
 
 class Process extends Record {
   constructor(ID, Name, ExecutesProtocol, ParameterValues, Performer, Date$, PreviousProcess, NextProcess, Inputs, Outputs, Comments) {
@@ -38,12 +43,18 @@ class Process extends Record {
     return toText(printf("%s [%i Inputs -> %i Params -> %i Outputs]"))(name)(inputCount)(paramCount)(outputCount);
   }
 }
+function Process_$reflection() {
+  return record_type("ARCtrl.Process.Process", [], Process, () => [["ID", option_type(string_type)], ["Name", option_type(string_type)], ["ExecutesProtocol", option_type(Protocol_$reflection())], ["ParameterValues", option_type(list_type(ProcessParameterValue_$reflection()))], ["Performer", option_type(string_type)], ["Date", option_type(string_type)], ["PreviousProcess", option_type(Process_$reflection())], ["NextProcess", option_type(Process_$reflection())], ["Inputs", option_type(list_type(ProcessInput_$reflection()))], ["Outputs", option_type(list_type(ProcessOutput_$reflection()))], ["Comments", option_type(list_type(Comment$_$reflection()))]]);
+}
 function Process_make(id, name, executesProtocol, parameterValues, performer, date, previousProcess, nextProcess, inputs, outputs, comments) {
   return new Process(id, name, executesProtocol, parameterValues, performer, date, previousProcess, nextProcess, inputs, outputs, comments);
 }
 function Process_create_Z7C1F7FA9(Id, Name, ExecutesProtocol, ParameterValues, Performer, Date$, PreviousProcess, NextProcess, Inputs, Outputs, Comments) {
   return Process_make(Id, Name, ExecutesProtocol, ParameterValues, Performer, Date$, PreviousProcess, NextProcess, Inputs, Outputs, Comments);
 }
+function Process_get_empty() {
+  return Process_create_Z7C1F7FA9();
+}
 function Process_composeName(processNameRoot, i) {
   return `${processNameRoot}_${i}`;
 }
@@ -56,9 +67,18 @@ function Process_decomposeName_Z721C83C5(name) {
     return [name, void 0];
   }
 }
+function Process_tryGetProtocolName_763471FF(p) {
+  return bind((p_1) => p_1.Name, p.ExecutesProtocol);
+}
+function Process_getProtocolName_763471FF(p) {
+  return value(bind((p_1) => p_1.Name, p.ExecutesProtocol));
+}
 function Process_getParameterValues_763471FF(p) {
   return defaultArg(p.ParameterValues, empty());
 }
+function Process_getParameters_763471FF(p) {
+  return choose((pv) => pv.Category, Process_getParameterValues_763471FF(p));
+}
 function Process_getInputCharacteristicValues_763471FF(p) {
   const matchValue = p.Inputs;
   if (matchValue == null) {
@@ -108,6 +128,129 @@ function Process_getFactors_763471FF(p) {
 function Process_getUnits_763471FF(p) {
   return append(choose((cv) => cv.Unit, Process_getCharacteristicValues_763471FF(p)), append(choose((pv) => pv.Unit, Process_getParameterValues_763471FF(p)), choose((fv) => fv.Unit, Process_getFactorValues_763471FF(p))));
 }
+function Process_tryGetInputsWithParameterBy(predicate, p) {
+  const matchValue = p.ParameterValues;
+  if (matchValue == null) {
+    return void 0;
+  } else {
+    const matchValue_1 = tryFind((pv) => predicate(defaultArg(pv.Category, ProtocolParameter.empty)), value(matchValue));
+    if (matchValue_1 == null) {
+      return void 0;
+    } else {
+      const paramValue = value(matchValue_1);
+      return map((list_1) => map$1((i) => [i, paramValue], list_1), p.Inputs);
+    }
+  }
+}
+function Process_tryGetOutputsWithParameterBy(predicate, p) {
+  const matchValue = p.ParameterValues;
+  if (matchValue == null) {
+    return void 0;
+  } else {
+    const matchValue_1 = tryFind((pv) => predicate(defaultArg(pv.Category, ProtocolParameter.empty)), value(matchValue));
+    if (matchValue_1 == null) {
+      return void 0;
+    } else {
+      const paramValue = value(matchValue_1);
+      return map((list_1) => map$1((i) => [i, paramValue], list_1), p.Outputs);
+    }
+  }
+}
+function Process_tryGetInputsWithCharacteristicBy(predicate, p) {
+  const matchValue = p.Inputs;
+  if (matchValue == null) {
+    return void 0;
+  } else {
+    return Option_fromValueWithDefault(empty(), choose((i) => tryPick((mv) => {
+      const matchValue_1 = mv.Category;
+      let matchResult, m_1;
+      if (matchValue_1 != null) {
+        if (predicate(value(matchValue_1))) {
+          matchResult = 0;
+          m_1 = value(matchValue_1);
+        } else {
+          matchResult = 1;
+        }
+      } else {
+        matchResult = 1;
+      }
+      switch (matchResult) {
+        case 0:
+          return [i, mv];
+        default:
+          return void 0;
+      }
+    }, defaultArg(ProcessInput_tryGetCharacteristicValues_5B3D5BA9(i), empty())), value(matchValue)));
+  }
+}
+function Process_tryGetOutputsWithCharacteristicBy(predicate, p) {
+  const matchValue = p.Inputs;
+  const matchValue_1 = p.Outputs;
+  let matchResult, is, os;
+  if (matchValue != null) {
+    if (matchValue_1 != null) {
+      matchResult = 0;
+      is = value(matchValue);
+      os = value(matchValue_1);
+    } else {
+      matchResult = 1;
+    }
+  } else {
+    matchResult = 1;
+  }
+  switch (matchResult) {
+    case 0:
+      return Option_fromValueWithDefault(empty(), choose((tupledArg) => tryPick((mv) => {
+        const matchValue_3 = mv.Category;
+        let matchResult_1, m_1;
+        if (matchValue_3 != null) {
+          if (predicate(value(matchValue_3))) {
+            matchResult_1 = 0;
+            m_1 = value(matchValue_3);
+          } else {
+            matchResult_1 = 1;
+          }
+        } else {
+          matchResult_1 = 1;
+        }
+        switch (matchResult_1) {
+          case 0:
+            return [tupledArg[1], mv];
+          default:
+            return void 0;
+        }
+      }, defaultArg(ProcessInput_tryGetCharacteristicValues_5B3D5BA9(tupledArg[0]), empty())), zip(is, os)));
+    default:
+      return void 0;
+  }
+}
+function Process_tryGetOutputsWithFactorBy(predicate, p) {
+  const matchValue = p.Outputs;
+  if (matchValue == null) {
+    return void 0;
+  } else {
+    return Option_fromValueWithDefault(empty(), choose((o) => tryPick((mv) => {
+      const matchValue_1 = mv.Category;
+      let matchResult, m_1;
+      if (matchValue_1 != null) {
+        if (predicate(value(matchValue_1))) {
+          matchResult = 0;
+          m_1 = value(matchValue_1);
+        } else {
+          matchResult = 1;
+        }
+      } else {
+        matchResult = 1;
+      }
+      switch (matchResult) {
+        case 0:
+          return [o, mv];
+        default:
+          return void 0;
+      }
+    }, defaultArg(ProcessOutput_tryGetFactorValues_Z42C11600(o), empty())), value(matchValue)));
+  }
+}
 function Process_getSources_763471FF(p) {
   return List_distinct(choose(ProcessInput_trySource_5B3D5BA9, defaultArg(p.Inputs, empty())), {
     Equals: equals,
@@ -133,4 +276,4 @@ function Process_getMaterials_763471FF(p) {
   });
 }
 
-export { Process, Process_composeName, Process_create_Z7C1F7FA9, Process_decomposeName_Z721C83C5, Process_getCharacteristicValues_763471FF, Process_getCharacteristics_763471FF, Process_getData_763471FF, Process_getFactorValues_763471FF, Process_getFactors_763471FF, Process_getInputCharacteristicValues_763471FF, Process_getMaterials_763471FF, Process_getOutputCharacteristicValues_763471FF, Process_getParameterValues_763471FF, Process_getSamples_763471FF, Process_getSources_763471FF, Process_getUnits_763471FF, Process_make };
+export { Process, Process_$reflection, Process_composeName, Process_create_Z7C1F7FA9, Process_decomposeName_Z721C83C5, Process_getCharacteristicValues_763471FF, Process_getCharacteristics_763471FF, Process_getData_763471FF, Process_getFactorValues_763471FF, Process_getFactors_763471FF, Process_getInputCharacteristicValues_763471FF, Process_getMaterials_763471FF, Process_getOutputCharacteristicValues_763471FF, Process_getParameterValues_763471FF, Process_getParameters_763471FF, Process_getProtocolName_763471FF, Process_getSamples_763471FF, Process_getSources_763471FF, Process_getUnits_763471FF, Process_get_empty, Process_make, Process_tryGetInputsWithCharacteristicBy, Process_tryGetInputsWithParameterBy, Process_tryGetOutputsWithCharacteristicBy, Process_tryGetOutputsWithFactorBy, Process_tryGetOutputsWithParameterBy, Process_tryGetProtocolName_763471FF };

package/dist/ts/ts/Core/Process/ProcessInput.js

@@ -1,12 +1,13 @@
 import { Union, toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import { Source_create_Z5CA08497, Source_setCharacteristicValues } from './Source.js';
+import { Source_$reflection, Source_get_empty, Source_setCharacteristicValues, Source_getUnits_53E41069, Source_create_Z5CA08497 } from './Source.js';
 import { toText, printf } from '../../../node_modules/@fable-org/fable-library-js/String.js';
-import { Material_create_Z66909A6D, Material_setCharacteristicValues } from './Material.js';
-import { Data } from '../Data.js';
-import { Sample_create_62424AD2, Sample_setCharacteristicValues } from './Sample.js';
-import { defaultArg, unwrap } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { empty } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-import { DataFile_RawDataFile } from '../DataFile.js';
+import { Material_$reflection, Material_setCharacteristicValues, Material_getUnits_ZBCDEB61, Material_create_Z66909A6D } from './Material.js';
+import { Data_$reflection, Data } from '../Data.js';
+import { Sample_$reflection, Sample_setCharacteristicValues, Sample_getUnits_53716792, Sample_create_62424AD2 } from './Sample.js';
+import { union_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
+import { defaultArg, map, unwrap } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { choose, empty } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { DataFile_ImageFile, DataFile_RawDataFile, DataFile_DerivedDataFile } from '../DataFile.js';
 
 function ProcessInput_Source(Item) {
   return new ProcessInput(0, [Item]);
@@ -62,6 +63,9 @@ class ProcessInput extends Union {
     }
   }
 }
+function ProcessInput_$reflection() {
+  return union_type("ARCtrl.Process.ProcessInput", [], ProcessInput, () => [[["Item", Source_$reflection()]], [["Item", Sample_$reflection()]], [["Item", Data_$reflection()]], [["Item", Material_$reflection()]]]);
+}
 function ProcessInput__get_TryName(this$) {
   switch (this$.tag) {
     case /* Source */
@@ -82,6 +86,18 @@ function ProcessInput__get_TryName(this$) {
 function ProcessInput__get_Name(this$) {
   return defaultArg(ProcessInput__get_TryName(this$), "");
 }
+function ProcessInput_get_Default() {
+  return ProcessInput_Source(Source_get_empty());
+}
+function ProcessInput_tryGetName_5B3D5BA9(pi) {
+  return ProcessInput__get_TryName(pi);
+}
+function ProcessInput_getName_5B3D5BA9(pi) {
+  return ProcessInput__get_Name(pi);
+}
+function ProcessInput_nameEquals(name, pi) {
+  return ProcessInput__get_Name(pi) === name;
+}
 function ProcessInput_isSample_5B3D5BA9(pi) {
   if (pi.tag === /* Sample */
   1) {
@@ -188,9 +204,27 @@ function ProcessInput_tryGetCharacteristicValues_5B3D5BA9(pi) {
       return pi.fields[0].Characteristics;
   }
 }
+function ProcessInput_tryGetCharacteristics_5B3D5BA9(pi) {
+  return map((list) => choose((c) => c.Category, list), ProcessInput_tryGetCharacteristicValues_5B3D5BA9(pi));
+}
 function ProcessInput_getCharacteristicValues_5B3D5BA9(pi) {
   return defaultArg(ProcessInput_tryGetCharacteristicValues_5B3D5BA9(pi), empty());
 }
+function ProcessInput_getUnits_5B3D5BA9(pi) {
+  switch (pi.tag) {
+    case /* Sample */
+    1:
+      return Sample_getUnits_53716792(pi.fields[0]);
+    case /* Material */
+    3:
+      return Material_getUnits_ZBCDEB61(pi.fields[0]);
+    case /* Data */
+    2:
+      return empty();
+    default:
+      return Source_getUnits_53E41069(pi.fields[0]);
+  }
+}
 function ProcessInput_createSource_Z5E00540E(name, characteristics) {
   return ProcessInput_Source(Source_create_Z5CA08497(void 0, name, unwrap(characteristics)));
 }
@@ -200,8 +234,14 @@ function ProcessInput_createSample_Z598187B7(name, characteristics, factors, der
 function ProcessInput_createMaterial_4452CB4C(name, characteristics, derivesFrom) {
   return ProcessInput_Material(Material_create_Z66909A6D(void 0, name, void 0, unwrap(characteristics), unwrap(derivesFrom)));
 }
+function ProcessInput_createImageFile_Z721C83C5(name) {
+  return ProcessInput_Data(Data.create(void 0, name, DataFile_ImageFile()));
+}
 function ProcessInput_createRawData_Z721C83C5(name) {
   return ProcessInput_Data(Data.create(void 0, name, DataFile_RawDataFile()));
 }
+function ProcessInput_createDerivedData_Z721C83C5(name) {
+  return ProcessInput_Data(Data.create(void 0, name, DataFile_DerivedDataFile()));
+}
 
-export { ProcessInput, ProcessInput_Data, ProcessInput_Material, ProcessInput_Sample, ProcessInput_Source, ProcessInput__get_Name, ProcessInput__get_TryName, ProcessInput__isData, ProcessInput__isMaterial, ProcessInput__isSample, ProcessInput__isSource, ProcessInput_createMaterial_4452CB4C, ProcessInput_createRawData_Z721C83C5, ProcessInput_createSample_Z598187B7, ProcessInput_createSource_Z5E00540E, ProcessInput_getCharacteristicValues_5B3D5BA9, ProcessInput_isData_5B3D5BA9, ProcessInput_isMaterial_5B3D5BA9, ProcessInput_isSample_5B3D5BA9, ProcessInput_isSource_5B3D5BA9, ProcessInput_setCharacteristicValues, ProcessInput_tryData_5B3D5BA9, ProcessInput_tryGetCharacteristicValues_5B3D5BA9, ProcessInput_tryMaterial_5B3D5BA9, ProcessInput_trySample_5B3D5BA9, ProcessInput_trySource_5B3D5BA9 };
+export { ProcessInput, ProcessInput_$reflection, ProcessInput_Data, ProcessInput_Material, ProcessInput_Sample, ProcessInput_Source, ProcessInput__get_Name, ProcessInput__get_TryName, ProcessInput__isData, ProcessInput__isMaterial, ProcessInput__isSample, ProcessInput__isSource, ProcessInput_createDerivedData_Z721C83C5, ProcessInput_createImageFile_Z721C83C5, ProcessInput_createMaterial_4452CB4C, ProcessInput_createRawData_Z721C83C5, ProcessInput_createSample_Z598187B7, ProcessInput_createSource_Z5E00540E, ProcessInput_getCharacteristicValues_5B3D5BA9, ProcessInput_getName_5B3D5BA9, ProcessInput_getUnits_5B3D5BA9, ProcessInput_get_Default, ProcessInput_isData_5B3D5BA9, ProcessInput_isMaterial_5B3D5BA9, ProcessInput_isSample_5B3D5BA9, ProcessInput_isSource_5B3D5BA9, ProcessInput_nameEquals, ProcessInput_setCharacteristicValues, ProcessInput_tryData_5B3D5BA9, ProcessInput_tryGetCharacteristicValues_5B3D5BA9, ProcessInput_tryGetCharacteristics_5B3D5BA9, ProcessInput_tryGetName_5B3D5BA9, ProcessInput_tryMaterial_5B3D5BA9, ProcessInput_trySample_5B3D5BA9, ProcessInput_trySource_5B3D5BA9 };

package/dist/ts/ts/Core/Process/ProcessOutput.js

@@ -1,11 +1,12 @@
 import { Union, toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import { Material_create_Z66909A6D } from './Material.js';
+import { Material_$reflection, Material_getUnits_ZBCDEB61, Material_create_Z66909A6D } from './Material.js';
 import { toText, printf } from '../../../node_modules/@fable-org/fable-library-js/String.js';
-import { Data } from '../Data.js';
-import { Sample_create_62424AD2, Sample_setFactorValues } from './Sample.js';
-import { defaultArg, unwrap } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { empty } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-import { DataFile_RawDataFile } from '../DataFile.js';
+import { Data_$reflection, Data } from '../Data.js';
+import { Sample_$reflection, Sample_get_empty, Sample_setFactorValues, Sample_getUnits_53716792, Sample_create_62424AD2 } from './Sample.js';
+import { union_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
+import { defaultArg, map, unwrap } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { choose, empty } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { DataFile_ImageFile, DataFile_RawDataFile, DataFile_DerivedDataFile } from '../DataFile.js';
 
 function ProcessOutput_Sample(Item) {
   return new ProcessOutput(0, [Item]);
@@ -52,6 +53,9 @@ class ProcessOutput extends Union {
     }
   }
 }
+function ProcessOutput_$reflection() {
+  return union_type("ARCtrl.Process.ProcessOutput", [], ProcessOutput, () => [[["Item", Sample_$reflection()]], [["Item", Data_$reflection()]], [["Item", Material_$reflection()]]]);
+}
 function ProcessOutput__get_TryName(this$) {
   switch (this$.tag) {
     case /* Material */
@@ -69,6 +73,18 @@ function ProcessOutput__get_TryName(this$) {
 function ProcessOutput__get_Name(this$) {
   return defaultArg(ProcessOutput__get_TryName(this$), "");
 }
+function ProcessOutput_get_Default() {
+  return ProcessOutput_Sample(Sample_get_empty());
+}
+function ProcessOutput_tryGetName_Z42C11600(po) {
+  return ProcessOutput__get_TryName(po);
+}
+function ProcessOutput_getName_Z42C11600(po) {
+  return ProcessOutput__get_Name(po);
+}
+function ProcessOutput_nameEquals(name, po) {
+  return ProcessOutput__get_Name(po) === name;
+}
 function ProcessOutput_isSample_Z42C11600(po) {
   if (po.tag === /* Sample */
   0) {
@@ -138,6 +154,9 @@ function ProcessOutput_tryGetCharacteristicValues_Z42C11600(po) {
       return po.fields[0].Characteristics;
   }
 }
+function ProcessOutput_tryGetCharacteristics_Z42C11600(po) {
+  return map((list) => choose((c) => c.Category, list), ProcessOutput_tryGetCharacteristicValues_Z42C11600(po));
+}
 function ProcessOutput_tryGetFactorValues_Z42C11600(po) {
   switch (po.tag) {
     case /* Material */
@@ -165,14 +184,32 @@ function ProcessOutput_setFactorValues(values, po) {
 function ProcessOutput_getFactorValues_Z42C11600(po) {
   return defaultArg(ProcessOutput_tryGetFactorValues_Z42C11600(po), empty());
 }
+function ProcessOutput_getUnits_Z42C11600(po) {
+  switch (po.tag) {
+    case /* Material */
+    2:
+      return Material_getUnits_ZBCDEB61(po.fields[0]);
+    case /* Data */
+    1:
+      return empty();
+    default:
+      return Sample_getUnits_53716792(po.fields[0]);
+  }
+}
 function ProcessOutput_createSample_Z598187B7(name, characteristics, factors, derivesFrom) {
   return ProcessOutput_Sample(Sample_create_62424AD2(void 0, name, unwrap(characteristics), unwrap(factors), unwrap(derivesFrom)));
 }
 function ProcessOutput_createMaterial_4452CB4C(name, characteristics, derivesFrom) {
   return ProcessOutput_Material(Material_create_Z66909A6D(void 0, name, void 0, unwrap(characteristics), unwrap(derivesFrom)));
 }
+function ProcessOutput_createImageFile_Z721C83C5(name) {
+  return ProcessOutput_Data(Data.create(void 0, name, DataFile_ImageFile()));
+}
 function ProcessOutput_createRawData_Z721C83C5(name) {
   return ProcessOutput_Data(Data.create(void 0, name, DataFile_RawDataFile()));
 }
+function ProcessOutput_createDerivedData_Z721C83C5(name) {
+  return ProcessOutput_Data(Data.create(void 0, name, DataFile_DerivedDataFile()));
+}
 
-export { ProcessOutput, ProcessOutput_Data, ProcessOutput_Material, ProcessOutput_Sample, ProcessOutput__get_Name, ProcessOutput__get_TryName, ProcessOutput__isData, ProcessOutput__isMaterial, ProcessOutput__isSample, ProcessOutput_createMaterial_4452CB4C, ProcessOutput_createRawData_Z721C83C5, ProcessOutput_createSample_Z598187B7, ProcessOutput_getFactorValues_Z42C11600, ProcessOutput_isData_Z42C11600, ProcessOutput_isMaterial_Z42C11600, ProcessOutput_isSample_Z42C11600, ProcessOutput_setFactorValues, ProcessOutput_tryData_Z42C11600, ProcessOutput_tryGetCharacteristicValues_Z42C11600, ProcessOutput_tryGetFactorValues_Z42C11600, ProcessOutput_tryMaterial_Z42C11600, ProcessOutput_trySample_Z42C11600 };
+export { ProcessOutput, ProcessOutput_$reflection, ProcessOutput_Data, ProcessOutput_Material, ProcessOutput_Sample, ProcessOutput__get_Name, ProcessOutput__get_TryName, ProcessOutput__isData, ProcessOutput__isMaterial, ProcessOutput__isSample, ProcessOutput_createDerivedData_Z721C83C5, ProcessOutput_createImageFile_Z721C83C5, ProcessOutput_createMaterial_4452CB4C, ProcessOutput_createRawData_Z721C83C5, ProcessOutput_createSample_Z598187B7, ProcessOutput_getFactorValues_Z42C11600, ProcessOutput_getName_Z42C11600, ProcessOutput_getUnits_Z42C11600, ProcessOutput_get_Default, ProcessOutput_isData_Z42C11600, ProcessOutput_isMaterial_Z42C11600, ProcessOutput_isSample_Z42C11600, ProcessOutput_nameEquals, ProcessOutput_setFactorValues, ProcessOutput_tryData_Z42C11600, ProcessOutput_tryGetCharacteristicValues_Z42C11600, ProcessOutput_tryGetCharacteristics_Z42C11600, ProcessOutput_tryGetFactorValues_Z42C11600, ProcessOutput_tryGetName_Z42C11600, ProcessOutput_tryMaterial_Z42C11600, ProcessOutput_trySample_Z42C11600 };

package/dist/ts/ts/Core/Process/ProcessParameterValue.js

@@ -1,9 +1,11 @@
 import { defaultArg, map, unwrap, bind, value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { ProtocolParameter } from './ProtocolParameter.js';
-import { Record, toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import '../Helper/Url.js';
-import { toText, printf } from '../../../node_modules/@fable-org/fable-library-js/String.js';
+import { ProtocolParameter, ProtocolParameter_$reflection } from './ProtocolParameter.js';
+import { Value_$reflection } from '../Value.js';
+import { OntologyAnnotation_$reflection } from '../OntologyAnnotation.js';
 import { int32ToString } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
+import { toText, printf } from '../../../node_modules/@fable-org/fable-library-js/String.js';
+import { Record, toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
+import { record_type, option_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
 
 class ProcessParameterValue extends Record {
   constructor(Category, Value, Unit) {
@@ -131,5 +133,8 @@ class ProcessParameterValue extends Record {
     return this$.Unit;
   }
 }
+function ProcessParameterValue_$reflection() {
+  return record_type("ARCtrl.Process.ProcessParameterValue", [], ProcessParameterValue, () => [["Category", option_type(ProtocolParameter_$reflection())], ["Value", option_type(Value_$reflection())], ["Unit", option_type(OntologyAnnotation_$reflection())]]);
+}
 
-export { ProcessParameterValue };
+export { ProcessParameterValue, ProcessParameterValue_$reflection };

package/dist/ts/ts/Core/Process/ProcessSequence.js

@@ -1,27 +1,148 @@
-import { List_distinct } from '../../../node_modules/@fable-org/fable-library-js/Seq2.js';
-import { collect, choose } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-import { Process_getFactors_763471FF, Process_getData_763471FF, Process_getUnits_763471FF, Process_getCharacteristics_763471FF, Process_getSamples_763471FF, Process_getMaterials_763471FF, Process_getSources_763471FF } from './Process.js';
-import { safeHash, equals } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
-import '../Helper/Url.js';
+import { List_distinct, List_groupBy } from '../../../node_modules/@fable-org/fable-library-js/Seq2.js';
+import { choose, filter, concat, collect, empty, map, zip, singleton } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { bind, value, defaultArg } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { Process_tryGetInputsWithParameterBy, Process_tryGetOutputsWithParameterBy, Process_getParameters_763471FF, Process_getCharacteristics_763471FF, Process_tryGetInputsWithCharacteristicBy, Process_tryGetOutputsWithCharacteristicBy, Process_tryGetOutputsWithFactorBy, Process_getFactors_763471FF, Process_getUnits_763471FF, Process_getData_763471FF, Process_getSources_763471FF, Process_getSamples_763471FF, Process_getMaterials_763471FF } from './Process.js';
+import { stringHash, safeHash, equals, comparePrimitives, arrayHash, equalArrays } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
+import { ProcessInput_getName_5B3D5BA9, ProcessInput__get_Name } from './ProcessInput.js';
+import { ProcessOutput_getName_Z42C11600, ProcessOutput__get_Name } from './ProcessOutput.js';
+import { ofList, FSharpSet__Contains } from '../../../node_modules/@fable-org/fable-library-js/Set.js';
+import { ofList as ofList$1, FSharpMap__TryFind } from '../../../node_modules/@fable-org/fable-library-js/Map.js';
 
+function getProtocolNames(processSequence) {
+  return List_distinct(choose((p) => bind((protocol) => protocol.Name, p.ExecutesProtocol), processSequence), {
+    Equals: (x, y) => x === y,
+    GetHashCode: stringHash
+  });
+}
 function getProtocols(processSequence) {
   return List_distinct(choose((p) => p.ExecutesProtocol, processSequence), {
     Equals: equals,
     GetHashCode: safeHash
   });
 }
+function filterByProtocolBy(predicate, processSequence) {
+  return filter((p) => {
+    const matchValue = p.ExecutesProtocol;
+    let matchResult, protocol_1;
+    if (matchValue != null) {
+      if (predicate(value(matchValue))) {
+        matchResult = 0;
+        protocol_1 = value(matchValue);
+      } else {
+        matchResult = 1;
+      }
+    } else {
+      matchResult = 1;
+    }
+    switch (matchResult) {
+      case 0:
+        return true;
+      default:
+        return false;
+    }
+  }, processSequence);
+}
+function filterByProtocolName(protocolName, processSequence) {
+  return filterByProtocolBy((p) => equals(p.Name, protocolName), processSequence);
+}
+function getInputsWithParameterBy(predicate, processSequence) {
+  return concat(choose((p) => Process_tryGetInputsWithParameterBy(predicate, p), processSequence));
+}
+function getOutputsWithParameterBy(predicate, processSequence) {
+  return concat(choose((p) => Process_tryGetOutputsWithParameterBy(predicate, p), processSequence));
+}
+function getParameters(processSequence) {
+  return List_distinct(collect(Process_getParameters_763471FF, processSequence), {
+    Equals: equals,
+    GetHashCode: safeHash
+  });
+}
 function getCharacteristics(processSequence) {
   return List_distinct(collect(Process_getCharacteristics_763471FF, processSequence), {
     Equals: equals,
     GetHashCode: safeHash
   });
 }
+function getInputsWithCharacteristicBy(predicate, processSequence) {
+  return concat(choose((p) => Process_tryGetInputsWithCharacteristicBy(predicate, p), processSequence));
+}
+function getOutputsWithCharacteristicBy(predicate, processSequence) {
+  return concat(choose((p) => Process_tryGetOutputsWithCharacteristicBy(predicate, p), processSequence));
+}
+function getOutputsWithFactorBy(predicate, processSequence) {
+  return concat(choose((p) => Process_tryGetOutputsWithFactorBy(predicate, p), processSequence));
+}
 function getFactors(processSequence) {
   return List_distinct(collect(Process_getFactors_763471FF, processSequence), {
     Equals: equals,
     GetHashCode: safeHash
   });
 }
+function getRootInputs(processSequence) {
+  const inputs = collect((p) => defaultArg(p.Inputs, empty()), processSequence);
+  const outputs = ofList(collect((p_1) => map(ProcessOutput_getName_Z42C11600, defaultArg(p_1.Outputs, empty())), processSequence), {
+    Compare: comparePrimitives
+  });
+  return filter((i) => !FSharpSet__Contains(outputs, ProcessInput_getName_5B3D5BA9(i)), inputs);
+}
+function getFinalOutputs(processSequence) {
+  const inputs = ofList(collect((p) => map(ProcessInput_getName_5B3D5BA9, defaultArg(p.Inputs, empty())), processSequence), {
+    Compare: comparePrimitives
+  });
+  return filter((o) => !FSharpSet__Contains(inputs, ProcessOutput_getName_Z42C11600(o)), collect((p_1) => defaultArg(p_1.Outputs, empty()), processSequence));
+}
+function getRootInputOf(processSequence, sample) {
+  const mappings = ofList$1(map((tupledArg) => [tupledArg[0], map((tuple_1) => tuple_1[1], tupledArg[1])], List_groupBy((tuple) => tuple[0], collect((p) => List_distinct(zip(map(ProcessOutput__get_Name, value(p.Outputs)), map(ProcessInput__get_Name, value(p.Inputs))), {
+    Equals: equalArrays,
+    GetHashCode: arrayHash
+  }), processSequence), {
+    Equals: (x_1, y_1) => x_1 === y_1,
+    GetHashCode: stringHash
+  })), {
+    Compare: comparePrimitives
+  });
+  const loop = (lastState_mut, state_mut) => {
+    loop:
+      while (true) {
+        const lastState = lastState_mut, state = state_mut;
+        if (equals(lastState, state)) {
+          return state;
+        } else {
+          lastState_mut = state;
+          state_mut = collect((s) => defaultArg(FSharpMap__TryFind(mappings, s), singleton(s)), state);
+          continue loop;
+        }
+        break;
+      }
+  };
+  return loop(empty(), singleton(sample));
+}
+function getFinalOutputsOf(processSequence, sample) {
+  const mappings = ofList$1(map((tupledArg) => [tupledArg[0], map((tuple_1) => tuple_1[1], tupledArg[1])], List_groupBy((tuple) => tuple[0], collect((p) => List_distinct(zip(map(ProcessInput__get_Name, value(p.Inputs)), map(ProcessOutput__get_Name, value(p.Outputs))), {
+    Equals: equalArrays,
+    GetHashCode: arrayHash
+  }), processSequence), {
+    Equals: (x_1, y_1) => x_1 === y_1,
+    GetHashCode: stringHash
+  })), {
+    Compare: comparePrimitives
+  });
+  const loop = (lastState_mut, state_mut) => {
+    loop:
+      while (true) {
+        const lastState = lastState_mut, state = state_mut;
+        if (equals(lastState, state)) {
+          return state;
+        } else {
+          lastState_mut = state;
+          state_mut = collect((s) => defaultArg(FSharpMap__TryFind(mappings, s), singleton(s)), state);
+          continue loop;
+        }
+        break;
+      }
+  };
+  return loop(empty(), singleton(sample));
+}
 function getUnits(processSequence) {
   return List_distinct(collect(Process_getUnits_763471FF, processSequence), {
     Equals: equals,
@@ -53,4 +174,4 @@ function getMaterials(processSequence) {
   });
 }
 
-export { getCharacteristics, getData, getFactors, getMaterials, getProtocols, getSamples, getSources, getUnits };
+export { filterByProtocolBy, filterByProtocolName, getCharacteristics, getData, getFactors, getFinalOutputs, getFinalOutputsOf, getInputsWithCharacteristicBy, getInputsWithParameterBy, getMaterials, getOutputsWithCharacteristicBy, getOutputsWithFactorBy, getOutputsWithParameterBy, getParameters, getProtocolNames, getProtocols, getRootInputOf, getRootInputs, getSamples, getSources, getUnits };