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

package/dist/ts/ts/Core/Helper/Regex.js

@@ -0,0 +1,296 @@
+import { match, create } from '../../../node_modules/@fable-org/fable-library-js/RegExp.js';
+import { value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+
+function Pattern_handleGroupPatterns(pattern) {
+  return pattern;
+}
+const Pattern_TermAnnotationShortPattern = `(?<${"idspace"}>\\w+?):(?<${"localid"}>\\w+)`;
+const Pattern_TermAnnotationURIPattern = `http://purl.obolibrary.org/obo/(?<${"idspace"}>\\w+?)_(?<${"localid"}>\\w+)`;
+const Pattern_TermAnnotationURIPattern_lessRestrictive = `.*\\/(?<${"idspace"}>\\w+?)[:_](?<${"localid"}>\\w+)`;
+const Pattern_TermAnnotationURIPattern_MS_RO_PO = `.*252F(?<${"idspace"}>\\w+?)_(?<${"localid"}>\\w+)`;
+const Pattern_IOTypePattern = `(Input|Output)\\s*\\[(?<${"iotype"}>.+)\\]`;
+const Pattern_InputPattern = `Input\\s*\\[(?<${"iotype"}>.+)\\]`;
+const Pattern_OutputPattern = `Output\\s*\\[(?<${"iotype"}>.+)\\]`;
+const Pattern_CommentPattern = `Comment\\s*\\[(?<${"commentKey"}>.+)\\]`;
+function ActivePatterns_$007CRegex$007C_$007C(pattern, input) {
+  const m = match(create(Pattern_handleGroupPatterns(pattern)), input.trim());
+  if (m != null) {
+    return m;
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CTermColumn$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C("(?<termcolumntype>.+?)\\s*\\[(?<termname>.+)\\]", input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return {
+      TermColumnType: r.groups && r.groups.termcolumntype || "",
+      TermName: r.groups && r.groups.termname || ""
+    };
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CUnitColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C("Unit", input);
+  if (activePatternResult != null) {
+    const o = value(activePatternResult);
+    return o[0];
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CParameterColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CTermColumn$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    const matchValue = r.TermColumnType;
+    switch (matchValue) {
+      case "Parameter":
+      case "Parameter Value":
+        return r.TermName;
+      default:
+        return void 0;
+    }
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CFactorColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CTermColumn$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    const matchValue = r.TermColumnType;
+    switch (matchValue) {
+      case "Factor":
+      case "Factor Value":
+        return r.TermName;
+      default:
+        return void 0;
+    }
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CCharacteristicColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CTermColumn$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    const matchValue = r.TermColumnType;
+    switch (matchValue) {
+      case "Characteristic":
+      case "Characteristics":
+      case "Characteristics Value":
+        return r.TermName;
+      default:
+        return void 0;
+    }
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CComponentColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CTermColumn$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    const matchValue = r.TermColumnType;
+    switch (matchValue) {
+      case "Component":
+      case "Component Value":
+        return r.TermName;
+      default:
+        return void 0;
+    }
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CTermAnnotation$007C_$007C(input) {
+  let matchResult, value$1;
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationShortPattern, input);
+  if (activePatternResult != null) {
+    matchResult = 0;
+    value$1 = value(activePatternResult);
+  } else {
+    const activePatternResult_1 = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationURIPattern, input);
+    if (activePatternResult_1 != null) {
+      matchResult = 0;
+      value$1 = value(activePatternResult_1);
+    } else {
+      const activePatternResult_2 = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationURIPattern_lessRestrictive, input);
+      if (activePatternResult_2 != null) {
+        matchResult = 0;
+        value$1 = value(activePatternResult_2);
+      } else {
+        const activePatternResult_3 = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationURIPattern_MS_RO_PO, input);
+        if (activePatternResult_3 != null) {
+          matchResult = 0;
+          value$1 = value(activePatternResult_3);
+        } else {
+          matchResult = 1;
+        }
+      }
+    }
+  }
+  switch (matchResult) {
+    case 0:
+      return {
+        IDSpace: value$1.groups && value$1.groups.idspace || "",
+        LocalID: value$1.groups && value$1.groups.localid || ""
+      };
+    default:
+      return void 0;
+  }
+}
+function ActivePatterns_$007CTSRColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C("Term Source REF\\s*\\((?<id>.*)\\)", input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    const matchValue = r.groups && r.groups.id || "";
+    const activePatternResult_1 = ActivePatterns_$007CTermAnnotation$007C_$007C(matchValue);
+    if (activePatternResult_1 != null) {
+      const r_1 = value(activePatternResult_1);
+      return r_1;
+    } else {
+      return {
+        IDSpace: "",
+        LocalID: ""
+      };
+    }
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CTANColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C("Term Accession Number\\s*\\((?<id>.*)\\)", input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    const matchValue = r.groups && r.groups.id || "";
+    const activePatternResult_1 = ActivePatterns_$007CTermAnnotation$007C_$007C(matchValue);
+    if (activePatternResult_1 != null) {
+      const r_1 = value(activePatternResult_1);
+      return r_1;
+    } else {
+      return {
+        IDSpace: "",
+        LocalID: ""
+      };
+    }
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CInputColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(Pattern_InputPattern, input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r.groups && r.groups.iotype || "";
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007COutputColumnHeader$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(Pattern_OutputPattern, input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r.groups && r.groups.iotype || "";
+  } else {
+    return void 0;
+  }
+}
+function ActivePatterns_$007CComment$007C_$007C(input) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(Pattern_CommentPattern, input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r.groups && r.groups.commentKey || "";
+  } else {
+    return void 0;
+  }
+}
+function tryParseTermAnnotation(str) {
+  const matchValue = str.trim();
+  let matchResult, value$1;
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationShortPattern, matchValue);
+  if (activePatternResult != null) {
+    matchResult = 0;
+    value$1 = value(activePatternResult);
+  } else {
+    const activePatternResult_1 = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationURIPattern, matchValue);
+    if (activePatternResult_1 != null) {
+      matchResult = 0;
+      value$1 = value(activePatternResult_1);
+    } else {
+      const activePatternResult_2 = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationURIPattern_lessRestrictive, matchValue);
+      if (activePatternResult_2 != null) {
+        matchResult = 0;
+        value$1 = value(activePatternResult_2);
+      } else {
+        const activePatternResult_3 = ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationURIPattern_MS_RO_PO, matchValue);
+        if (activePatternResult_3 != null) {
+          matchResult = 0;
+          value$1 = value(activePatternResult_3);
+        } else {
+          matchResult = 1;
+        }
+      }
+    }
+  }
+  switch (matchResult) {
+    case 0:
+      return {
+        IDSpace: value$1.groups && value$1.groups.idspace || "",
+        LocalID: value$1.groups && value$1.groups.localid || ""
+      };
+    default:
+      return void 0;
+  }
+}
+function tryParseIOTypeHeader(headerStr) {
+  const matchValue = headerStr.trim();
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(Pattern_IOTypePattern, matchValue);
+  if (activePatternResult != null) {
+    const value$1 = value(activePatternResult);
+    return value$1.groups && value$1.groups.iotype || "";
+  } else {
+    return void 0;
+  }
+}
+function tryParseParameterColumnHeader(input) {
+  const activePatternResult = ActivePatterns_$007CParameterColumnHeader$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r;
+  } else {
+    return void 0;
+  }
+}
+function tryParseFactorColumnHeader(input) {
+  const activePatternResult = ActivePatterns_$007CFactorColumnHeader$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r;
+  } else {
+    return void 0;
+  }
+}
+function tryParseCharacteristicColumnHeader(input) {
+  const activePatternResult = ActivePatterns_$007CCharacteristicColumnHeader$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r;
+  } else {
+    return void 0;
+  }
+}
+function tryParseComponentColumnHeader(input) {
+  const activePatternResult = ActivePatterns_$007CComponentColumnHeader$007C_$007C(input);
+  if (activePatternResult != null) {
+    const r = value(activePatternResult);
+    return r;
+  } else {
+    return void 0;
+  }
+}
+
+export { ActivePatterns_$007CCharacteristicColumnHeader$007C_$007C, ActivePatterns_$007CComment$007C_$007C, ActivePatterns_$007CComponentColumnHeader$007C_$007C, ActivePatterns_$007CFactorColumnHeader$007C_$007C, ActivePatterns_$007CInputColumnHeader$007C_$007C, ActivePatterns_$007COutputColumnHeader$007C_$007C, ActivePatterns_$007CParameterColumnHeader$007C_$007C, ActivePatterns_$007CRegex$007C_$007C, ActivePatterns_$007CTANColumnHeader$007C_$007C, ActivePatterns_$007CTSRColumnHeader$007C_$007C, ActivePatterns_$007CTermAnnotation$007C_$007C, ActivePatterns_$007CTermColumn$007C_$007C, ActivePatterns_$007CUnitColumnHeader$007C_$007C, Pattern_CommentPattern, Pattern_IOTypePattern, Pattern_InputPattern, Pattern_OutputPattern, Pattern_TermAnnotationShortPattern, Pattern_TermAnnotationURIPattern, Pattern_TermAnnotationURIPattern_MS_RO_PO, Pattern_TermAnnotationURIPattern_lessRestrictive, Pattern_handleGroupPatterns, tryParseCharacteristicColumnHeader, tryParseComponentColumnHeader, tryParseFactorColumnHeader, tryParseIOTypeHeader, tryParseParameterColumnHeader, tryParseTermAnnotation };

package/dist/ts/ts/Core/Helper/SemVer.js

@@ -0,0 +1,31 @@
+import { Record } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
+import { parse } from '../../../node_modules/@fable-org/fable-library-js/Int32.js';
+import { value, unwrap } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { ActivePatterns_$007CRegex$007C_$007C } from './Regex.js';
+
+const SemVerAux_Pattern = "^(?<major>\\d+)(\\.(?<minor>\\d+))?(\\.(?<patch>\\d+))?(-(?<pre>[0-9A-Za-z-\\.]+))?(\\+(?<build>[0-9A-Za-z-\\.]+))?$";
+class SemVer extends Record {
+  constructor(Major, Minor, Patch, PreRelease, Metadata) {
+    super();
+    this.Major = Major | 0;
+    this.Minor = Minor | 0;
+    this.Patch = Patch | 0;
+    this.PreRelease = PreRelease;
+    this.Metadata = Metadata;
+  }
+}
+function SemVer_create_Z55658624(major, minor, patch, pre, meta) {
+  return new SemVer(major, minor, patch, pre, meta);
+}
+function SemVer_tryOfString_Z721C83C5(str) {
+  const activePatternResult = ActivePatterns_$007CRegex$007C_$007C(SemVerAux_Pattern, str);
+  if (activePatternResult != null) {
+    const m = value(activePatternResult);
+    const g = m;
+    return SemVer_create_Z55658624(parse(g.groups && g.groups.major || "", 511, false, 32), parse(g.groups && g.groups.minor || "", 511, false, 32), parse(g.groups && g.groups.patch || "", 511, false, 32), unwrap((g.groups && g.groups.pre) != null ? g.groups && g.groups.pre || "" : void 0), unwrap((g.groups && g.groups.build) != null ? g.groups && g.groups.build || "" : void 0));
+  } else {
+    return void 0;
+  }
+}
+
+export { SemVer, SemVerAux_Pattern, SemVer_create_Z55658624, SemVer_tryOfString_Z721C83C5 };

package/dist/ts/ts/Core/Helper/Url.js

@@ -0,0 +1,32 @@
+import { Dictionary_ofSeq, Dictionary_tryFind } from './Collections.js';
+import { value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+
+function OntobeeParser(tsr, localTan) {
+  return `${"http://purl.obolibrary.org/obo/"}${tsr}_${localTan}`;
+}
+function BioregistryParser(tsr, localTan) {
+  return `${"https://bioregistry.io/"}${tsr}:${localTan}`;
+}
+function OntobeeDPBOParser(tsr, localTan) {
+  return `${"http://purl.org/nfdi4plants/ontology/dpbo/"}${tsr}_${localTan}`;
+}
+function MSParser(tsr, localTan) {
+  return `${"https://www.ebi.ac.uk/ols4/ontologies/ms/classes/http%253A%252F%252Fpurl.obolibrary.org%252Fobo%252F"}${tsr}_${localTan}`;
+}
+function POParser(tsr, localTan) {
+  return `${"https://www.ebi.ac.uk/ols4/ontologies/po/classes/http%253A%252F%252Fpurl.obolibrary.org%252Fobo%252F"}${tsr}_${localTan}`;
+}
+function ROParser(tsr, localTan) {
+  return `${"https://www.ebi.ac.uk/ols4/ontologies/ro/classes/http%253A%252F%252Fpurl.obolibrary.org%252Fobo%252F"}${tsr}_${localTan}`;
+}
+const uriParserCollection = Dictionary_ofSeq([["DPBO", (tsr) => (localTan) => OntobeeDPBOParser(tsr, localTan)], ["MS", (tsr_1) => (localTan_1) => MSParser(tsr_1, localTan_1)], ["PO", (tsr_2) => (localTan_2) => POParser(tsr_2, localTan_2)], ["RO", (tsr_3) => (localTan_3) => ROParser(tsr_3, localTan_3)], ["ENVO", (tsr_4) => (localTan_4) => BioregistryParser(tsr_4, localTan_4)], ["CHEBI", (tsr_5) => (localTan_5) => BioregistryParser(tsr_5, localTan_5)], ["GO", (tsr_6) => (localTan_6) => BioregistryParser(tsr_6, localTan_6)], ["OBI", (tsr_7) => (localTan_7) => BioregistryParser(tsr_7, localTan_7)], ["PATO", (tsr_8) => (localTan_8) => BioregistryParser(tsr_8, localTan_8)], ["PECO", (tsr_9) => (localTan_9) => BioregistryParser(tsr_9, localTan_9)], ["TO", (tsr_10) => (localTan_10) => BioregistryParser(tsr_10, localTan_10)], ["UO", (tsr_11) => (localTan_11) => BioregistryParser(tsr_11, localTan_11)], ["EFO", (tsr_12) => (localTan_12) => BioregistryParser(tsr_12, localTan_12)], ["NCIT", (tsr_13) => (localTan_13) => BioregistryParser(tsr_13, localTan_13)], ["OMP", (tsr_14) => (localTan_14) => BioregistryParser(tsr_14, localTan_14)]]);
+function createOAUri(tsr, localTan) {
+  const matchValue = Dictionary_tryFind(tsr, uriParserCollection);
+  if (matchValue == null) {
+    return OntobeeParser(tsr, localTan);
+  } else {
+    return value(matchValue)(tsr)(localTan);
+  }
+}
+
+export { BioregistryParser, MSParser, OntobeeDPBOParser, OntobeeParser, POParser, ROParser, createOAUri, uriParserCollection };

package/dist/ts/ts/Core/IdentifierSetters.js

@@ -0,0 +1,9 @@
+import { checkValidCharacters } from './Helper/Identifier.js';
+
+function setInvestigationIdentifier(newIdentifier, investigation) {
+  checkValidCharacters(newIdentifier);
+  investigation.Identifier = newIdentifier;
+  return investigation;
+}
+
+export { setInvestigationIdentifier };

package/dist/ts/ts/Core/OntologyAnnotation.js

@@ -0,0 +1,207 @@
+import { value, defaultArg, unwrap } from '../../node_modules/@fable-org/fable-library-js/Option.js';
+import { createOAUri } from './Helper/Url.js';
+import { tryParseTermAnnotation, ActivePatterns_$007CRegex$007C_$007C, Pattern_TermAnnotationShortPattern } from './Helper/Regex.js';
+import { StringBuilder_$ctor, StringBuilder__Append_Z721C83C5 } from '../../node_modules/@fable-org/fable-library-js/System.Text.js';
+import { join, toText, printf } from '../../node_modules/@fable-org/fable-library-js/String.js';
+import { toList, delay, append, singleton, empty } from '../../node_modules/@fable-org/fable-library-js/Seq.js';
+import { toString } from '../../node_modules/@fable-org/fable-library-js/Types.js';
+import { mergeHashes, hash } from './Helper/HashCodes.js';
+import { stringHash, safeHash } from '../../node_modules/@fable-org/fable-library-js/Util.js';
+import { ResizeArray_map } from './Helper/Collections.js';
+import { class_type } from '../../node_modules/@fable-org/fable-library-js/Reflection.js';
+
+class OntologyAnnotation {
+  constructor(name, tsr, tan, comments) {
+    this._name = name == null ? void 0 : value(name) === "" ? void 0 : name;
+    this._termSourceREF = tsr == null ? void 0 : value(tsr) === "" ? void 0 : tsr;
+    this._termAccessionNumber = tan == null ? void 0 : value(tan) === "" ? void 0 : value(tan) === ":" ? void 0 : tan;
+    this._comments = defaultArg(comments, []);
+    this._tanInfo = OntologyAnnotation.computeTanInfo(unwrap(this._termAccessionNumber), unwrap(this._termSourceREF));
+  }
+  get Name() {
+    const this$ = this;
+    return unwrap(this$._name);
+  }
+  set Name(name) {
+    const this$ = this;
+    this$._name = name;
+  }
+  get TermSourceREF() {
+    const this$ = this;
+    return unwrap(this$._termSourceREF);
+  }
+  set TermSourceREF(tsr) {
+    const this$ = this;
+    this$._termSourceREF = tsr;
+    this$.recomputeTanInfo();
+  }
+  get TermAccessionNumber() {
+    const this$ = this;
+    return unwrap(this$._termAccessionNumber);
+  }
+  set TermAccessionNumber(tan) {
+    const this$ = this;
+    this$._termAccessionNumber = tan;
+    this$.recomputeTanInfo();
+  }
+  get Comments() {
+    const this$ = this;
+    return this$._comments;
+  }
+  set Comments(comments) {
+    const this$ = this;
+    this$._comments = comments;
+  }
+  static make(name, tsr, tan, comments) {
+    return new OntologyAnnotation(unwrap(name), unwrap(tsr), unwrap(tan), comments);
+  }
+  static create(name, tsr, tan, comments) {
+    const comments_1 = defaultArg(comments, []);
+    return OntologyAnnotation.make(name, tsr, tan, comments_1);
+  }
+  get TANInfo() {
+    const this$ = this;
+    return unwrap(this$._tanInfo);
+  }
+  get NameText() {
+    const this$ = this;
+    return defaultArg(this$.Name, "");
+  }
+  static createUriAnnotation(termSourceRef, localTAN) {
+    return createOAUri(termSourceRef, localTAN);
+  }
+  static fromTermAnnotation(tan, name) {
+    const matchValue = tryParseTermAnnotation(tan);
+    if (matchValue == null) {
+      return OntologyAnnotation.create(unwrap(name), void 0, tan);
+    } else {
+      const r = value(matchValue);
+      const accession = r.IDSpace + ":" + r.LocalID;
+      return OntologyAnnotation.create(unwrap(name), r.IDSpace, accession);
+    }
+  }
+  get TermAccessionShort() {
+    const this$ = this;
+    const matchValue = this$.TANInfo;
+    if (matchValue != null) {
+      const id = value(matchValue);
+      return `${id.IDSpace}:${id.LocalID}`;
+    } else {
+      return "";
+    }
+  }
+  get TermAccessionOntobeeUrl() {
+    const this$ = this;
+    const matchValue = this$.TANInfo;
+    if (matchValue != null) {
+      const id = value(matchValue);
+      return OntologyAnnotation.createUriAnnotation(id.IDSpace, id.LocalID);
+    } else {
+      return "";
+    }
+  }
+  get TermAccessionAndOntobeeUrlIfShort() {
+    const this$ = this;
+    const matchValue = this$.TermAccessionNumber;
+    if (matchValue != null) {
+      const tan = value(matchValue);
+      return ActivePatterns_$007CRegex$007C_$007C(Pattern_TermAnnotationShortPattern, tan) != null ? this$.TermAccessionOntobeeUrl : tan;
+    } else {
+      return "";
+    }
+  }
+  static toStringObject(oa, asOntobeePurlUrlIfShort) {
+    let url;
+    const asOntobeePurlUrlIfShort_1 = defaultArg(asOntobeePurlUrlIfShort, false);
+    const TermName = defaultArg(oa.Name, "");
+    const TermSourceREF = defaultArg(oa.TermSourceREF, "");
+    return {
+      TermAccessionNumber: asOntobeePurlUrlIfShort_1 ? (url = oa.TermAccessionAndOntobeeUrlIfShort, url === "" ? defaultArg(oa.TermAccessionNumber, "") : url) : defaultArg(oa.TermAccessionNumber, ""),
+      TermName,
+      TermSourceREF
+    };
+  }
+  toString() {
+    const this$ = this;
+    const sb = StringBuilder_$ctor();
+    StringBuilder__Append_Z721C83C5(sb, "{");
+    StringBuilder__Append_Z721C83C5(sb, join("; ", toList(delay(() => {
+      let arg;
+      return append(this$.Name != null ? singleton((arg = value(this$.Name), toText(printf("Name = %A"))(arg))) : empty(), delay(() => {
+        let arg_1;
+        return append(this$.TermSourceREF != null ? singleton((arg_1 = value(this$.TermSourceREF), toText(printf("TSR = %A"))(arg_1))) : empty(), delay(() => {
+          let arg_2;
+          return append(this$.TermAccessionNumber != null ? singleton((arg_2 = value(this$.TermAccessionNumber), toText(printf("TAN = %A"))(arg_2))) : empty(), delay(() => {
+            let arg_3;
+            return this$.Comments.length !== 0 ? singleton((arg_3 = this$.Comments, toText(printf("Comments = %A"))(arg_3))) : empty();
+          }));
+        }));
+      }));
+    }))));
+    StringBuilder__Append_Z721C83C5(sb, "}");
+    return toString(sb);
+  }
+  isEmpty() {
+    const this$ = this;
+    return this$.Name == null && this$.TermSourceREF == null && this$.TermAccessionNumber == null && this$.Comments.length === 0;
+  }
+  GetHashCode() {
+    let matchValue, matchValue_1, matchValue_2, tsr_1, matchValue_4, tan, taninfo_1, tsr, taninfo;
+    const this$ = this;
+    return mergeHashes((matchValue = this$.Name, matchValue == null ? 0 : stringHash(value(matchValue))), (matchValue_1 = this$.TermSourceREF, matchValue_2 = this$.TANInfo, matchValue_1 != null ? matchValue_2 == null ? (tsr_1 = value(matchValue_1), matchValue_4 = this$.TermAccessionNumber, matchValue_4 == null ? stringHash(tsr_1.toLocaleLowerCase()) : (tan = value(matchValue_4), mergeHashes(stringHash(tsr_1.toLocaleLowerCase()), stringHash(tan)))) : (taninfo_1 = value(matchValue_2), tsr = value(matchValue_1), mergeHashes(stringHash(tsr.toLocaleLowerCase()), stringHash(taninfo_1.LocalID))) : matchValue_2 == null ? 0 : (taninfo = value(matchValue_2), mergeHashes(stringHash(taninfo.IDSpace.toLocaleLowerCase()), stringHash(taninfo.LocalID))))) | 0;
+  }
+  Equals(obj) {
+    const this$ = this;
+    return hash(this$) === hash(obj);
+  }
+  Copy() {
+    const this$ = this;
+    const nextComments = ResizeArray_map((c) => c.Copy(), this$.Comments);
+    const name = this$.Name;
+    const tsr = this$.TermSourceREF;
+    const tan = this$.TermAccessionNumber;
+    return OntologyAnnotation.make(name, tsr, tan, nextComments);
+  }
+  static computeTanInfo(tan, tsr) {
+    let tsr_1;
+    if (tan == null) {
+      return void 0;
+    } else {
+      const tan_1 = value(tan);
+      const matchValue = tryParseTermAnnotation(tan_1);
+      return matchValue == null ? tsr == null ? void 0 : value(tsr) === "" ? void 0 : (tsr_1 = value(tsr), {
+        IDSpace: tsr_1,
+        LocalID: tan_1
+      }) : value(matchValue);
+    }
+  }
+  Print() {
+    const this$ = this;
+    return toString(this$);
+  }
+  PrintCompact() {
+    const this$ = this;
+    return "OA " + this$.NameText;
+  }
+  CompareTo(obj) {
+    const this$ = this;
+    if (obj instanceof OntologyAnnotation) {
+      const oa = obj;
+      const hash = safeHash(this$) | 0;
+      const otherHash = safeHash(oa) | 0;
+      return (hash === otherHash ? 0 : hash < otherHash ? -1 : 1) | 0;
+    } else {
+      return 1;
+    }
+  }
+  recomputeTanInfo() {
+    const this$ = this;
+    const newTanInfo = OntologyAnnotation.computeTanInfo(unwrap(this$._termAccessionNumber), unwrap(this$._termSourceREF));
+    this$._tanInfo = newTanInfo;
+  }
+}
+function OntologyAnnotation_$reflection() {
+  return class_type("ARCtrl.OntologyAnnotation", void 0, OntologyAnnotation);
+}
+
+export { OntologyAnnotation, OntologyAnnotation_$reflection };

package/dist/ts/ts/Core/OntologySourceReference.js

@@ -0,0 +1,84 @@
+import { defaultArg, unwrap } from '../../node_modules/@fable-org/fable-library-js/Option.js';
+import { ResizeArray_map } from './Helper/Collections.js';
+import { boxHashArray, boxHashOption, boxHashSeq } from './Helper/HashCodes.js';
+import { safeHash } from '../../node_modules/@fable-org/fable-library-js/Util.js';
+
+class OntologySourceReference {
+  constructor(description, file, name, version, comments) {
+    this._description = description;
+    this._file = file;
+    this._name = name;
+    this._version = version;
+    this._comments = defaultArg(comments, []);
+  }
+  get Description() {
+    const this$ = this;
+    return unwrap(this$._description);
+  }
+  set Description(description) {
+    const this$ = this;
+    this$._description = description;
+  }
+  get File() {
+    const this$ = this;
+    return unwrap(this$._file);
+  }
+  set File(file) {
+    const this$ = this;
+    this$._file = file;
+  }
+  get Name() {
+    const this$ = this;
+    return unwrap(this$._name);
+  }
+  set Name(name) {
+    const this$ = this;
+    this$._name = name;
+  }
+  get Version() {
+    const this$ = this;
+    return unwrap(this$._version);
+  }
+  set Version(version) {
+    const this$ = this;
+    this$._version = version;
+  }
+  get Comments() {
+    const this$ = this;
+    return this$._comments;
+  }
+  set Comments(comments) {
+    const this$ = this;
+    this$._comments = comments;
+  }
+  static make(description, file, name, version, comments) {
+    return new OntologySourceReference(unwrap(description), unwrap(file), unwrap(name), unwrap(version), comments);
+  }
+  static create(description, file, name, version, comments) {
+    const comments_1 = defaultArg(comments, []);
+    return OntologySourceReference.make(description, file, name, version, comments_1);
+  }
+  static get empty() {
+    return OntologySourceReference.create();
+  }
+  Copy() {
+    const this$ = this;
+    const nextComments = ResizeArray_map((c) => c.Copy(), this$.Comments);
+    const description = this$.Description;
+    const file = this$.File;
+    const name = this$.Name;
+    const version = this$.Version;
+    return OntologySourceReference.make(description, file, name, version, nextComments);
+  }
+  GetHashCode() {
+    const this$ = this;
+    return boxHashArray([boxHashOption(this$.Description), boxHashOption(this$.File), boxHashOption(this$.Name), boxHashOption(this$.Version), boxHashSeq(this$.Comments)]) | 0;
+  }
+  Equals(obj) {
+    let t;
+    const this$ = this;
+    return obj instanceof OntologySourceReference && (t = obj, safeHash(this$) === safeHash(t));
+  }
+}
+
+export { OntologySourceReference };