@nfdi4plants/arctrl 3.0.0-beta.11 → 3.0.0-beta.13

package/dist/ts/ts/CWL/Encode.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Encode.d.ts","sourceRoot":"","sources":["../../../../src/ARCtrl/ts/CWL/Encode.ts"],"names":[],"mappings":"AAAA,OAAO,EAAyE,kBAAkB,EAAkC,MAAM,yDAAyD,CAAC;AACpM,OAAO,EAA2E,UAAU,EAA4B,MAAM,qCAAqC,CAAC;AAEpK,OAAO,EAAmB,wBAAwB,EAAE,cAAc,EAAkB,MAAM,eAAe,CAAC;AAE1G,OAAO,EAAE,SAAS,EAAE,aAAa,EAAE,MAAM,cAAc,CAAC;AAExD,OAAO,EAAE,QAAQ,EAAE,YAAY,EAAE,MAAM,aAAa,CAAC;AAErD,OAAO,EAAE,kBAAkB,EAAkE,MAAM,mBAAmB,CAAC;AAIvH,OAAO,EAAE,YAAY,EAAE,UAAU,EAAE,SAAS,EAAE,MAAM,oBAAoB,CAAC;AAIzE,OAAO,EAAE,kBAAkB,EAAE,MAAM,sBAAsB,CAAC;AAC1D,OAAO,EAAE,sBAAsB,EAAE,MAAM,0BAA0B,CAAC;AAClE,OAAO,EAAE,wBAAwB,EAAE,MAAM,wBAAwB,CAAC;AAElE,wBAAgB,KAAK,CAAC,CAAC,EAAE,OAAO,GAAG,kBAAkB,CAEpD;AAED,wBAAgB,IAAI,CAAC,KAAK,EAAE,UAAU,CAAC,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAAC,GAAG,kBAAkB,CAKxF;AAED,wBAAgB,aAAa,CAAC,CAAC,EAAE,cAAc,GAAG,kBAAkB,CAsCnE;AAED,wBAAgB,mBAAmB,CAAC,EAAE,EAAE,aAAa,GAAG,kBAAkB,CAEzE;AAED,wBAAgB,eAAe,CAAC,CAAC,EAAE,SAAS,GAAG,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAqC1E;AAED,wBAAgB,kBAAkB,CAAC,EAAE,EAAE,YAAY,GAAG,kBAAkB,CAGvE;AAED,wBAAgB,cAAc,CAAC,CAAC,EAAE,QAAQ,GAAG,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAqCxE;AAED,wBAAgB,8BAA8B,CAAC,CAAC,EAAE,wBAAwB,GAAG,kBAAkB,CAW9F;AAED,wBAAgB,iBAAiB,CAAC,CAAC,EAAE,kBAAkB,GAAG,kBAAkB,CA2F3E;AAED,wBAAgB,eAAe,CAAC,EAAE,EAAE,SAAS,GAAG,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAwC3E;AAED,wBAAgB,gBAAgB,CAAC,MAAM,EAAE,SAAS,EAAE,GAAG,kBAAkB,CAExE;AAED,wBAAgB,gBAAgB,CAAC,EAAE,EAAE,UAAU,GAAG,kBAAkB,CAEnE;AAED,wBAAgB,kBAAkB,CAAC,EAAE,EAAE,YAAY,GAAG,CAAC,MAAM,EAAE,kBAAkB,CAAC,CAkDjF;AAED,wBAAgB,SAAS,CAAC,OAAO,EAAE,kBAAkB,GAAG,MAAM,CAE7D;AAED,wBAAgB,qBAAqB,CAAC,EAAE,EAAE,kBAAkB,GAAG,MAAM,CAgGpE;AAED,wBAAgB,yBAAyB,CAAC,EAAE,EAAE,sBAAsB,GAAG,MAAM,CAsF5E;AAED,wBAAgB,oBAAoB,CAAC,EAAE,EAAE,wBAAwB,GAAG,MAAM,CAOzE"}

package/dist/ts/ts/CWL/Encode.js

@@ -0,0 +1,546 @@
+import { YAMLElement_Value, YAMLContent, YAMLElement_Object, YAMLElement_Mapping, YAMLElement_Sequence, Config } from '../fable_modules/YAMLicious.0.0.3/YAMLiciousTypes.fs.js';
+import { map, isEmpty, tail, head, ofArray, append, singleton, choose, empty, ofSeq, reverse, cons, length } from '../../node_modules/@fable-org/fable-library-js/List.js';
+import { string, int, float } from '../fable_modules/YAMLicious.0.0.3/Encode.fs.js';
+import { value, map as map$1 } from '../../node_modules/@fable-org/fable-library-js/Option.js';
+import { toList, choose as choose$1, map as map$2, delay, append as append$1, singleton as singleton$1, empty as empty$1 } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
+import { toList as toList$1 } from '../../node_modules/@fable-org/fable-library-js/Map.js';
+import { split, trimEnd, replace, trimStart, join } from '../../node_modules/@fable-org/fable-library-js/String.js';
+import { item } from '../../node_modules/@fable-org/fable-library-js/Array.js';
+import { write } from '../fable_modules/YAMLicious.0.0.3/Writer.fs.js';
+import { toString } from '../../node_modules/@fable-org/fable-library-js/Types.js';
+
+function yBool(b) {
+  return YAMLElement_Value(new YAMLContent(b ? "true" : "false", void 0));
+}
+function yMap(pairs) {
+  return YAMLElement_Object(map((tupledArg) => {
+    let _arg, single;
+    return YAMLElement_Mapping(new YAMLContent(tupledArg[0], void 0), (_arg = tupledArg[1], _arg.tag === /* Object */
+    3 ? !isEmpty(_arg.fields[0]) ? isEmpty(tail(_arg.fields[0])) ? (single = head(_arg.fields[0]), single) : _arg : _arg : _arg));
+  }, pairs));
+}
+function encodeCWLType(t) {
+  let value_4, acc_3, value_2, acc_1;
+  switch (t.tag) {
+    case /* Directory */
+    1:
+      return string("Directory");
+    case /* Dirent */
+    2: {
+      const d = t.fields[0];
+      return yMap((value_4 = d.Writable, acc_3 = (value_2 = d.Entryname, acc_1 = singleton(["entry", string(d.Entry)]), value_2 == null ? acc_1 : append(acc_1, singleton(["entryname", string(value(value_2))]))), value_4 == null ? acc_3 : append(acc_3, singleton(["writable", yBool(value(value_4))]))));
+    }
+    case /* String */
+    3:
+      return string("string");
+    case /* Int */
+    4:
+      return string("int");
+    case /* Long */
+    5:
+      return string("long");
+    case /* Float */
+    6:
+      return string("float");
+    case /* Double */
+    7:
+      return string("double");
+    case /* Boolean */
+    8:
+      return string("boolean");
+    case /* Stdout */
+    9:
+      return string("stdout");
+    case /* Null */
+    10:
+      return string("null");
+    case /* Array */
+    11: {
+      const inner = t.fields[0];
+      const shortForm = inner.tag === /* File */
+      0 ? "File[]" : inner.tag === /* Directory */
+      1 ? "Directory[]" : inner.tag === /* Dirent */
+      2 ? "Dirent[]" : inner.tag === /* String */
+      3 ? "string[]" : inner.tag === /* Int */
+      4 ? "int[]" : inner.tag === /* Long */
+      5 ? "long[]" : inner.tag === /* Float */
+      6 ? "float[]" : inner.tag === /* Double */
+      7 ? "double[]" : inner.tag === /* Boolean */
+      8 ? "boolean[]" : void 0;
+      if (shortForm == null) {
+        return yMap(ofArray([["type", string("array")], ["items", encodeCWLType(inner)]]));
+      } else {
+        return string(value(shortForm));
+      }
+    }
+    default:
+      return string("File");
+  }
+}
+function encodeOutputBinding(ob) {
+  return yMap(choose((x) => x, singleton(map$1((g) => ["glob", string(g)], ob.Glob))));
+}
+function encodeCWLOutput(o) {
+  let pairs;
+  let acc_4;
+  let acc_2;
+  const value_1 = o.Type_;
+  const acc_1 = empty();
+  acc_2 = value_1 == null ? acc_1 : append(acc_1, singleton(["type", encodeCWLType(value(value_1))]));
+  const value_3 = o.OutputBinding;
+  const acc_3 = acc_2;
+  acc_4 = value_3 == null ? acc_3 : append(acc_3, singleton(["outputBinding", encodeOutputBinding(value(value_3))]));
+  const value_6 = o.OutputSource;
+  const acc_5 = acc_4;
+  pairs = value_6 == null ? acc_5 : append(acc_5, singleton(["outputSource", string(value(value_6))]));
+  let matchResult, t_1;
+  if (!isEmpty(pairs)) {
+    if (head(pairs)[0] === "type") {
+      if (isEmpty(tail(pairs))) {
+        matchResult = 0;
+        t_1 = head(pairs)[1];
+      } else {
+        matchResult = 1;
+      }
+    } else {
+      matchResult = 1;
+    }
+  } else {
+    matchResult = 1;
+  }
+  switch (matchResult) {
+    case 0:
+      return [o.Name, t_1];
+    default:
+      return [o.Name, yMap(pairs)];
+  }
+}
+function encodeInputBinding(ib) {
+  let value_9, acc_7, value_7, acc_5, value_4, acc_3, value_2, acc_1;
+  return yMap((value_9 = ib.Separate, acc_7 = (value_7 = ib.ItemSeparator, acc_5 = (value_4 = ib.Position, acc_3 = (value_2 = ib.Prefix, acc_1 = empty(), value_2 == null ? acc_1 : append(acc_1, singleton(["prefix", string(value(value_2))]))), value_4 == null ? acc_3 : append(acc_3, singleton(["position", int(value(value_4))]))), value_7 == null ? acc_5 : append(acc_5, singleton(["itemSeparator", string(value(value_7))]))), value_9 == null ? acc_7 : append(acc_7, singleton(["separate", yBool(value(value_9))]))));
+}
+function encodeCWLInput(i) {
+  let pairs;
+  let acc_4;
+  let acc_2;
+  const value_1 = i.Type_;
+  const acc_1 = empty();
+  acc_2 = value_1 == null ? acc_1 : append(acc_1, singleton(["type", encodeCWLType(value(value_1))]));
+  const value_3 = i.InputBinding;
+  const acc_3 = acc_2;
+  acc_4 = value_3 == null ? acc_3 : append(acc_3, singleton(["inputBinding", encodeInputBinding(value(value_3))]));
+  const value_5 = i.Optional;
+  const acc_5 = acc_4;
+  pairs = value_5 == null ? acc_5 : append(acc_5, singleton(["optional", yBool(value(value_5))]));
+  let matchResult, t_1;
+  if (!isEmpty(pairs)) {
+    if (head(pairs)[0] === "type") {
+      if (isEmpty(tail(pairs))) {
+        matchResult = 0;
+        t_1 = head(pairs)[1];
+      } else {
+        matchResult = 1;
+      }
+    } else {
+      matchResult = 1;
+    }
+  } else {
+    matchResult = 1;
+  }
+  switch (matchResult) {
+    case 0:
+      return [i.Name, t_1];
+    default:
+      return [i.Name, yMap(pairs)];
+  }
+}
+function encodeSchemaDefRequirementType(s) {
+  return yMap(toList(choose$1((kvp) => {
+    const matchValue = kvp[1];
+    if (typeof matchValue === "string") {
+      const str = matchValue;
+      return [kvp[0], string(str)];
+    } else {
+      return void 0;
+    }
+  }, s.GetProperties(false))));
+}
+function encodeRequirement(r) {
+  let value_7, acc_5, value_4, acc_3, value_2, acc_1;
+  switch (r.tag) {
+    case /* SchemaDefRequirement */
+    1: {
+      const types = r.fields[0];
+      return yMap(ofArray([["class", string("SchemaDefRequirement")], ["types", YAMLElement_Sequence(ofSeq(map$2(encodeSchemaDefRequirementType, types)))]]));
+    }
+    case /* DockerRequirement */
+    2: {
+      const dr = r.fields[0];
+      return yMap((value_7 = dr.DockerImageId, acc_5 = (value_4 = dr.DockerFile, acc_3 = (value_2 = dr.DockerPull, acc_1 = singleton(["class", string("DockerRequirement")]), value_2 == null ? acc_1 : append(acc_1, singleton(["dockerPull", string(value(value_2))]))), value_4 == null ? acc_3 : append(acc_3, singleton(["dockerFile", yMap(map((tupledArg) => [tupledArg[0], string(tupledArg[1])], toList$1(value(value_4))))]))), value_7 == null ? acc_5 : append(acc_5, singleton(["dockerImageId", string(value(value_7))]))));
+    }
+    case /* SoftwareRequirement */
+    3: {
+      const pkgs = r.fields[0];
+      return yMap(ofArray([["class", string("SoftwareRequirement")], ["packages", YAMLElement_Sequence(ofSeq(map$2((p) => {
+        let value_13, acc_10, value_10, acc_8;
+        return yMap((value_13 = p.Specs, acc_10 = (value_10 = p.Version, acc_8 = append(empty(), singleton(["package", string(p.Package)])), value_10 == null ? acc_8 : append(acc_8, singleton(["version", YAMLElement_Sequence(ofSeq(map$2(string, value(value_10))))]))), value_13 == null ? acc_10 : append(acc_10, singleton(["specs", YAMLElement_Sequence(ofSeq(map$2(string, value(value_13))))]))));
+      }, pkgs)))]]));
+    }
+    case /* InitialWorkDirRequirement */
+    4: {
+      const listing = r.fields[0];
+      return yMap(ofArray([["class", string("InitialWorkDirRequirement")], ["listing", YAMLElement_Sequence(ofSeq(map$2((_arg) => {
+        let value_18, acc_15, value_16, acc_12;
+        if (_arg.tag === /* Dirent */
+        2) {
+          const d = _arg.fields[0];
+          let entryElement;
+          if (d.Entry.indexOf(": ") >= 0) {
+            const parts = split(d.Entry, [": "], 2, 0);
+            entryElement = parts.length === 2 ? yMap(singleton([item(0, parts), string(item(1, parts))])) : string(d.Entry);
+          } else {
+            entryElement = string(d.Entry);
+          }
+          return yMap((value_18 = d.Writable, acc_15 = append((value_16 = d.Entryname, acc_12 = empty(), value_16 == null ? acc_12 : append(acc_12, singleton(["entryname", string(value(value_16))]))), singleton(["entry", entryElement])), value_18 == null ? acc_15 : append(acc_15, singleton(["writable", yBool(value(value_18))]))));
+        } else {
+          return encodeCWLType(_arg);
+        }
+      }, listing)))]]));
+    }
+    case /* EnvVarRequirement */
+    5: {
+      const envs = r.fields[0];
+      return yMap(ofArray([["class", string("EnvVarRequirement")], ["envDef", YAMLElement_Sequence(ofSeq(map$2((e) => {
+        const v_8 = (e.EnvValue === "true" ? true : e.EnvValue === "false") ? '"' + e.EnvValue + '"' : e.EnvValue;
+        return yMap(ofArray([["envName", string(e.EnvName)], ["envValue", string(v_8)]]));
+      }, envs)))]]));
+    }
+    case /* ShellCommandRequirement */
+    6:
+      return yMap(singleton(["class", string("ShellCommandRequirement")]));
+    case /* ResourceRequirement */
+    7: {
+      const rr = r.fields[0];
+      const dynamicPairs = toList(choose$1((kvp) => {
+        const matchValue = kvp[1];
+        if (typeof matchValue === "number") {
+          return [kvp[0], int(matchValue)];
+        } else if (typeof matchValue === "number") {
+          return [kvp[0], float(matchValue)];
+        } else if (typeof matchValue === "string") {
+          return [kvp[0], string(matchValue)];
+        } else if (typeof matchValue === "boolean") {
+          return [kvp[0], yBool(matchValue)];
+        } else {
+          return void 0;
+        }
+      }, rr.GetProperties(false)));
+      return yMap(append(singleton(["class", string("ResourceRequirement")]), dynamicPairs));
+    }
+    case /* WorkReuseRequirement */
+    8:
+      return yMap(singleton(["class", string("WorkReuse")]));
+    case /* NetworkAccessRequirement */
+    9:
+      return yMap(ofArray([["class", string("NetworkAccess")], ["networkAccess", yBool(true)]]));
+    case /* InplaceUpdateRequirement */
+    10:
+      return yMap(singleton(["class", string("InplaceUpdateRequirement")]));
+    case /* ToolTimeLimitRequirement */
+    11: {
+      const tl = r.fields[0];
+      return yMap(ofArray([["class", string("ToolTimeLimit")], ["timelimit", float(tl)]]));
+    }
+    case /* SubworkflowFeatureRequirement */
+    12:
+      return yMap(singleton(["class", string("SubworkflowFeatureRequirement")]));
+    case /* ScatterFeatureRequirement */
+    13:
+      return yMap(singleton(["class", string("ScatterFeatureRequirement")]));
+    case /* MultipleInputFeatureRequirement */
+    14:
+      return yMap(singleton(["class", string("MultipleInputFeatureRequirement")]));
+    case /* StepInputExpressionRequirement */
+    15:
+      return yMap(singleton(["class", string("StepInputExpressionRequirement")]));
+    default:
+      return yMap(singleton(["class", string("InlineJavascriptRequirement")]));
+  }
+}
+function encodeStepInput(si) {
+  let pairs;
+  const value_8 = si.ValueFrom;
+  let acc_5;
+  const value_5 = si.DefaultValue;
+  let acc_3;
+  const value_2 = si.Source;
+  const acc_1 = empty();
+  acc_3 = value_2 == null ? acc_1 : append(acc_1, singleton(["source", string(value(value_2))]));
+  acc_5 = value_5 == null ? acc_3 : append(acc_3, singleton(["default", string(value(value_5))]));
+  pairs = value_8 == null ? acc_5 : append(acc_5, singleton(["valueFrom", string(value(value_8))]));
+  let matchResult, s_1;
+  if (!isEmpty(pairs)) {
+    if (head(pairs)[0] === "source") {
+      if (isEmpty(tail(pairs))) {
+        if (si.DefaultValue == null && si.ValueFrom == null) {
+          matchResult = 0;
+          s_1 = head(pairs)[1];
+        } else {
+          matchResult = 1;
+        }
+      } else {
+        matchResult = 1;
+      }
+    } else {
+      matchResult = 1;
+    }
+  } else {
+    matchResult = 1;
+  }
+  switch (matchResult) {
+    case 0:
+      return [si.Id, s_1];
+    default:
+      return [si.Id, yMap(pairs)];
+  }
+}
+function encodeStepInputs(inputs) {
+  return yMap(toList(map$2(encodeStepInput, inputs)));
+}
+function encodeStepOutput(so) {
+  return YAMLElement_Sequence(ofSeq(map$2(string, so.Id)));
+}
+function encodeWorkflowStep(ws) {
+  let r, h;
+  const basePairs = ofArray([["run", string(ws.Run)], ["in", encodeStepInputs(ws.In)], ["out", encodeStepOutput(ws.Out)]]);
+  let withReq;
+  const matchValue = ws.Requirements;
+  let matchResult, r_1;
+  if (matchValue != null) {
+    if (r = value(matchValue), r.length > 0) {
+      matchResult = 0;
+      r_1 = value(matchValue);
+    } else {
+      matchResult = 1;
+    }
+  } else {
+    matchResult = 1;
+  }
+  switch (matchResult) {
+    case 0: {
+      withReq = append(basePairs, singleton(["requirements", YAMLElement_Sequence(ofSeq(map$2(encodeRequirement, r_1)))]));
+      break;
+    }
+    default:
+      withReq = basePairs;
+  }
+  let withHints;
+  const matchValue_1 = ws.Hints;
+  let matchResult_1, h_1;
+  if (matchValue_1 != null) {
+    if (h = value(matchValue_1), h.length > 0) {
+      matchResult_1 = 0;
+      h_1 = value(matchValue_1);
+    } else {
+      matchResult_1 = 1;
+    }
+  } else {
+    matchResult_1 = 1;
+  }
+  switch (matchResult_1) {
+    case 0: {
+      withHints = append(withReq, singleton(["hints", YAMLElement_Sequence(ofSeq(map$2(encodeRequirement, h_1)))]));
+      break;
+    }
+    default:
+      withHints = withReq;
+  }
+  return [ws.Id, yMap(withHints)];
+}
+function writeYaml(element) {
+  return write(element, (c) => new Config(2, c.Level));
+}
+function encodeToolDescription(td) {
+  const section = (pairs) => {
+    const s = writeYaml(yMap(pairs));
+    return ofArray(trimEnd(replace(s, "\r\n", "\n"), "\n").split("\n"));
+  };
+  const baseLines = section(ofArray([["cwlVersion", string(td.CWLVersion)], ["class", string("CommandLineTool")]]));
+  const hintsLines = map$1((h) => section(singleton(["hints", YAMLElement_Sequence(ofSeq(map$2(encodeRequirement, h)))])), td.Hints);
+  const reqLines = map$1((r_1) => section(singleton(["requirements", YAMLElement_Sequence(ofSeq(map$2(encodeRequirement, r_1)))])), td.Requirements);
+  const baseCommandLines = map$1((bc) => section(singleton(["baseCommand", YAMLElement_Sequence(ofSeq(map$2(string, bc)))])), td.BaseCommand);
+  const inputsLines = map$1((i) => section(singleton(["inputs", yMap(toList(map$2(encodeCWLInput, i)))])), td.Inputs);
+  const outputsLines = section(singleton(["outputs", yMap(toList(map$2(encodeCWLOutput, td.Outputs)))]));
+  const metadataLines = map$1((md) => {
+    const s_2 = writeYaml(yMap(toList(map$2((kvp) => {
+      let matchValue, s_1;
+      return [kvp[0], (matchValue = kvp[1], typeof matchValue === "string" ? (s_1 = matchValue, string(s_1)) : string(toString(kvp[1])))];
+    }, md.GetProperties(false)))));
+    return ofArray(trimEnd(replace(s_2, "\r\n", "\n"), "\n").split("\n"));
+  }, td.Metadata);
+  const merge = (acc_mut, remaining_mut) => {
+    merge:
+      while (true) {
+        const acc = acc_mut, remaining = remaining_mut;
+        let matchResult, a_1, b_1, rest_1, l_6, rest_2;
+        if (isEmpty(remaining)) {
+          matchResult = 2;
+        } else if (!isEmpty(tail(remaining))) {
+          if (head(remaining).trim() === "-" && trimStart(head(tail(remaining))).indexOf(":") >= 0) {
+            matchResult = 0;
+            a_1 = head(remaining);
+            b_1 = head(tail(remaining));
+            rest_1 = tail(tail(remaining));
+          } else {
+            matchResult = 1;
+            l_6 = head(remaining);
+            rest_2 = tail(remaining);
+          }
+        } else {
+          matchResult = 1;
+          l_6 = head(remaining);
+          rest_2 = tail(remaining);
+        }
+        switch (matchResult) {
+          case 0: {
+            acc_mut = cons(a_1 + " " + b_1.trim(), acc);
+            remaining_mut = rest_1;
+            continue merge;
+          }
+          case 1: {
+            acc_mut = cons(l_6, acc);
+            remaining_mut = rest_2;
+            continue merge;
+          }
+          default:
+            return reverse(acc);
+        }
+        break;
+      }
+  };
+  return join("\r\n", merge(empty(), ofArray(split(join("\r\n", toList(delay(() => append$1(baseLines, delay(() => append$1(singleton$1(""), delay(() => {
+    let matchValue_1;
+    return append$1((matchValue_1 = hintsLines, matchValue_1 == null ? empty$1() : append$1(value(matchValue_1), delay(() => singleton$1("")))), delay(() => {
+      let matchValue_2;
+      return append$1((matchValue_2 = reqLines, matchValue_2 == null ? empty$1() : append$1(value(matchValue_2), delay(() => singleton$1("")))), delay(() => {
+        let matchValue_3;
+        return append$1((matchValue_3 = baseCommandLines, matchValue_3 == null ? empty$1() : append$1(value(matchValue_3), delay(() => singleton$1("")))), delay(() => {
+          let matchValue_4;
+          return append$1((matchValue_4 = inputsLines, matchValue_4 == null ? empty$1() : append$1(value(matchValue_4), delay(() => singleton$1("")))), delay(() => append$1(outputsLines, delay(() => {
+            const matchValue_5 = metadataLines;
+            let matchResult_1, l_5;
+            if (matchValue_5 != null) {
+              if (length(value(matchValue_5)) > 0) {
+                matchResult_1 = 0;
+                l_5 = value(matchValue_5);
+              } else {
+                matchResult_1 = 1;
+              }
+            } else {
+              matchResult_1 = 1;
+            }
+            switch (matchResult_1) {
+              case 0:
+                return append$1(singleton$1(""), delay(() => l_5));
+              default: {
+                return empty$1();
+              }
+            }
+          }))));
+        }));
+      }));
+    }));
+  }))))))), ["\r\n"], void 0, 0))));
+}
+function encodeWorkflowDescription(wd) {
+  const section = (pairs) => {
+    const s = writeYaml(yMap(pairs));
+    return ofArray(trimEnd(replace(s, "\r\n", "\n"), "\n").split("\n"));
+  };
+  const baseLines = section(ofArray([["cwlVersion", string(wd.CWLVersion)], ["class", string("Workflow")]]));
+  const reqLines = map$1((r) => section(singleton(["requirements", YAMLElement_Sequence(ofSeq(map$2(encodeRequirement, r)))])), wd.Requirements);
+  const inputsLines = section(singleton(["inputs", yMap(toList(map$2(encodeCWLInput, wd.Inputs)))]));
+  const stepsLines = section(singleton(["steps", yMap(toList(map$2(encodeWorkflowStep, wd.Steps)))]));
+  const outputsLines = section(singleton(["outputs", yMap(toList(map$2(encodeCWLOutput, wd.Outputs)))]));
+  const metadataLines = map$1((md) => {
+    const s_2 = writeYaml(yMap(toList(map$2((kvp) => {
+      let matchValue, s_1;
+      return [kvp[0], (matchValue = kvp[1], typeof matchValue === "string" ? (s_1 = matchValue, string(s_1)) : string(toString(kvp[1])))];
+    }, md.GetProperties(false)))));
+    return ofArray(trimEnd(replace(s_2, "\r\n", "\n"), "\n").split("\n"));
+  }, wd.Metadata);
+  const merge = (acc_mut, remaining_mut) => {
+    merge:
+      while (true) {
+        const acc = acc_mut, remaining = remaining_mut;
+        let matchResult, a_1, b_1, rest_1, l_3, rest_2;
+        if (isEmpty(remaining)) {
+          matchResult = 2;
+        } else if (!isEmpty(tail(remaining))) {
+          if (head(remaining).trim() === "-" && trimStart(head(tail(remaining))).indexOf(":") >= 0) {
+            matchResult = 0;
+            a_1 = head(remaining);
+            b_1 = head(tail(remaining));
+            rest_1 = tail(tail(remaining));
+          } else {
+            matchResult = 1;
+            l_3 = head(remaining);
+            rest_2 = tail(remaining);
+          }
+        } else {
+          matchResult = 1;
+          l_3 = head(remaining);
+          rest_2 = tail(remaining);
+        }
+        switch (matchResult) {
+          case 0: {
+            acc_mut = cons(a_1 + " " + b_1.trim(), acc);
+            remaining_mut = rest_1;
+            continue merge;
+          }
+          case 1: {
+            acc_mut = cons(l_3, acc);
+            remaining_mut = rest_2;
+            continue merge;
+          }
+          default:
+            return reverse(acc);
+        }
+        break;
+      }
+  };
+  return join("\r\n", merge(empty(), ofArray(split(join("\r\n", toList(delay(() => append$1(baseLines, delay(() => append$1(singleton$1(""), delay(() => {
+    let matchValue_1;
+    return append$1((matchValue_1 = reqLines, matchValue_1 == null ? empty$1() : append$1(value(matchValue_1), delay(() => singleton$1("")))), delay(() => append$1(inputsLines, delay(() => append$1(singleton$1(""), delay(() => append$1(stepsLines, delay(() => append$1(singleton$1(""), delay(() => append$1(outputsLines, delay(() => {
+      const matchValue_2 = metadataLines;
+      let matchResult_1, l_2;
+      if (matchValue_2 != null) {
+        if (length(value(matchValue_2)) > 0) {
+          matchResult_1 = 0;
+          l_2 = value(matchValue_2);
+        } else {
+          matchResult_1 = 1;
+        }
+      } else {
+        matchResult_1 = 1;
+      }
+      switch (matchResult_1) {
+        case 0:
+          return append$1(singleton$1(""), delay(() => l_2));
+        default: {
+          return empty$1();
+        }
+      }
+    }))))))))))));
+  }))))))), ["\r\n"], void 0, 0))));
+}
+function encodeProcessingUnit(pu) {
+  if (pu.tag === /* Workflow */
+  1) {
+    return encodeWorkflowDescription(pu.fields[0]);
+  } else {
+    return encodeToolDescription(pu.fields[0]);
+  }
+}
+
+export { encodeCWLInput, encodeCWLOutput, encodeCWLType, encodeInputBinding, encodeOutputBinding, encodeProcessingUnit, encodeRequirement, encodeSchemaDefRequirementType, encodeStepInput, encodeStepInputs, encodeStepOutput, encodeToolDescription, encodeWorkflowDescription, encodeWorkflowStep, writeYaml, yBool, yMap };

package/dist/ts/ts/CWL/HashHelpers.d.ts

@@ -0,0 +1,9 @@
+import { int32 } from '@fable-org/fable-library-js/Int32.js';
+import { Option } from '@fable-org/fable-library-js/Option.js';
+export declare function mergeHashes(hash1: int32, hash2: int32): int32;
+export declare function hashDateTime(dt: Date): int32;
+export declare function hash<$a>(obj: $a): int32;
+export declare function boxHashOption<a>(a: Option<a>): any;
+export declare function boxHashArray<a>(a: a[]): any;
+export declare function boxHashSeq<a>(a: Iterable<a>): any;
+//# sourceMappingURL=HashHelpers.d.ts.map

package/dist/ts/ts/CWL/HashHelpers.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"HashHelpers.d.ts","sourceRoot":"","sources":["../../../../src/ARCtrl/ts/CWL/HashHelpers.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,KAAK,EAAE,MAAM,sCAAsC,CAAC;AAG7D,OAAO,EAAE,MAAM,EAAoB,MAAM,uCAAuC,CAAC;AAIjF,wBAAgB,WAAW,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,GAAG,KAAK,CAE7D;AAED,wBAAgB,YAAY,CAAC,EAAE,EAAE,IAAI,GAAG,KAAK,CAS5C;AAED,wBAAgB,IAAI,CAAC,EAAE,EAAE,GAAG,EAAE,EAAE,GAAG,KAAK,CAGvC;AAED,wBAAgB,aAAa,CAAC,CAAC,EAAE,CAAC,EAAE,MAAM,CAAC,CAAC,CAAC,GAAG,GAAG,CAGlD;AAED,wBAAgB,YAAY,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,GAAG,GAAG,CAE3C;AAED,wBAAgB,UAAU,CAAC,CAAC,EAAE,CAAC,EAAE,QAAQ,CAAC,CAAC,CAAC,GAAG,GAAG,CAEjD"}

package/dist/ts/ts/CWL/HashHelpers.js

@@ -0,0 +1,35 @@
+import { year, month, day, hour, minute, second } from '../../node_modules/@fable-org/fable-library-js/Date.js';
+import { identityHash, numberHash } from '../../node_modules/@fable-org/fable-library-js/Util.js';
+import { value } from '../../node_modules/@fable-org/fable-library-js/Option.js';
+import { fold } from '../../node_modules/@fable-org/fable-library-js/Array.js';
+import { fold as fold$1 } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
+
+function mergeHashes(hash1, hash2) {
+  return -1640531527 + hash2 + (hash1 << 6) + (hash1 >> 2);
+}
+function hashDateTime(dt) {
+  let acc = 0;
+  acc = mergeHashes(acc, year(dt)) | 0;
+  acc = mergeHashes(acc, month(dt)) | 0;
+  acc = mergeHashes(acc, day(dt)) | 0;
+  acc = mergeHashes(acc, hour(dt)) | 0;
+  acc = mergeHashes(acc, minute(dt)) | 0;
+  acc = mergeHashes(acc, second(dt)) | 0;
+  return acc | 0;
+}
+function hash(obj) {
+  let copyOfStruct = obj;
+  return identityHash(copyOfStruct) | 0;
+}
+function boxHashOption(a) {
+  let copyOfStruct, copyOfStruct_1;
+  return a != null ? (copyOfStruct = value(a), identityHash(copyOfStruct)) : (copyOfStruct_1 = 0, numberHash(copyOfStruct_1));
+}
+function boxHashArray(a) {
+  return fold((acc, o) => mergeHashes(acc, hash(o)), 0, a);
+}
+function boxHashSeq(a) {
+  return fold$1((acc, o) => mergeHashes(acc, hash(o)), 0, a);
+}
+
+export { boxHashArray, boxHashOption, boxHashSeq, hash, hashDateTime, mergeHashes };

package/dist/ts/ts/CWL/Inputs.d.ts

@@ -0,0 +1,28 @@
+import { Record } from '@fable-org/fable-library-js/Types.js';
+import { Option } from '@fable-org/fable-library-js/Option.js';
+import { int32 } from '@fable-org/fable-library-js/Int32.js';
+import { IComparable, IEquatable } from '@fable-org/fable-library-js/Util.js';
+import { TypeInfo } from '@fable-org/fable-library-js/Reflection.js';
+import { CWLType_$union } from './CWLTypes.js';
+import { DynamicObj } from '../fable_modules/DynamicObj.7.1.0/DynamicObj.fs.js';
+export declare class InputBinding extends Record implements IEquatable<InputBinding>, IComparable<InputBinding> {
+    readonly Prefix: Option<string>;
+    readonly Position: Option<int32>;
+    readonly ItemSeparator: Option<string>;
+    readonly Separate: Option<boolean>;
+    constructor(Prefix: Option<string>, Position: Option<int32>, ItemSeparator: Option<string>, Separate: Option<boolean>);
+}
+export declare function InputBinding_$reflection(): TypeInfo;
+export declare function InputBinding_create_ZAC0108A(prefix?: string, position?: int32, itemSeparator?: string, separate?: boolean): InputBinding;
+export declare class CWLInput extends DynamicObj {
+    readonly name: string;
+    "init@31": int32;
+    constructor(name: string, type_?: CWLType_$union, inputBinding?: InputBinding, optional?: boolean);
+    get Name(): string;
+    get Type_(): CWLType_$union | undefined;
+    get InputBinding(): InputBinding | undefined;
+    get Optional(): boolean | undefined;
+}
+export declare function CWLInput_$reflection(): TypeInfo;
+export declare function CWLInput_$ctor_Z3A15BEDB(name: string, type_?: CWLType_$union, inputBinding?: InputBinding, optional?: boolean): CWLInput;
+//# sourceMappingURL=Inputs.d.ts.map

package/dist/ts/ts/CWL/Inputs.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Inputs.d.ts","sourceRoot":"","sources":["../../../../src/ARCtrl/ts/CWL/Inputs.ts"],"names":[],"mappings":"AAAA,OAAO,EAAa,MAAM,EAAE,MAAM,sCAAsC,CAAC;AACzE,OAAO,EAAiB,MAAM,EAAE,MAAM,uCAAuC,CAAC;AAC9E,OAAO,EAAE,KAAK,EAAE,MAAM,sCAAsC,CAAC;AAC7D,OAAO,EAAa,WAAW,EAAE,UAAU,EAAE,MAAM,qCAAqC,CAAC;AACzF,OAAO,EAA4E,QAAQ,EAAE,MAAM,2CAA2C,CAAC;AAC/I,OAAO,EAAE,cAAc,EAAW,MAAM,eAAe,CAAC;AACxD,OAAO,EAA0B,UAAU,EAAE,MAAM,oDAAoD,CAAC;AAGxG,qBAAa,YAAa,SAAQ,MAAO,YAAW,UAAU,CAAC,YAAY,CAAC,EAAE,WAAW,CAAC,YAAY,CAAC;IACnG,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAC,MAAM,CAAC,CAAC;IAChC,QAAQ,CAAC,QAAQ,EAAE,MAAM,CAAC,KAAK,CAAC,CAAC;IACjC,QAAQ,CAAC,aAAa,EAAE,MAAM,CAAC,MAAM,CAAC,CAAC;IACvC,QAAQ,CAAC,QAAQ,EAAE,MAAM,CAAC,OAAO,CAAC,CAAC;gBACvB,MAAM,EAAE,MAAM,CAAC,MAAM,CAAC,EAAE,QAAQ,EAAE,MAAM,CAAC,KAAK,CAAC,EAAE,aAAa,EAAE,MAAM,CAAC,MAAM,CAAC,EAAE,QAAQ,EAAE,MAAM,CAAC,OAAO,CAAC;CAOxH;AAED,wBAAgB,wBAAwB,IAAI,QAAQ,CAEnD;AAED,wBAAgB,4BAA4B,CAAC,MAAM,CAAC,EAAE,MAAM,EAAE,QAAQ,CAAC,EAAE,KAAK,EAAE,aAAa,CAAC,EAAE,MAAM,EAAE,QAAQ,CAAC,EAAE,OAAO,GAAG,YAAY,CAExI;AAED,qBAAa,QAAS,SAAQ,UAAU;IACpC,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAC;IACtB,SAAS,EAAE,KAAK,CAAC;gBACL,IAAI,EAAE,MAAM,EAAE,KAAK,CAAC,EAAE,cAAc,EAAE,YAAY,CAAC,EAAE,YAAY,EAAE,QAAQ,CAAC,EAAE,OAAO;IAUjG,IAAI,IAAI,IAAI,MAAM,CAGjB;IACD,IAAI,KAAK,IAAI,cAAc,GAAG,SAAS,CAItC;IACD,IAAI,YAAY,IAAI,YAAY,GAAG,SAAS,CAI3C;IACD,IAAI,QAAQ,IAAI,OAAO,GAAG,SAAS,CAIlC;CACJ;AAED,wBAAgB,oBAAoB,IAAI,QAAQ,CAE/C;AAED,wBAAgB,wBAAwB,CAAC,IAAI,EAAE,MAAM,EAAE,KAAK,CAAC,EAAE,cAAc,EAAE,YAAY,CAAC,EAAE,YAAY,EAAE,QAAQ,CAAC,EAAE,OAAO,GAAG,QAAQ,CAExI"}