@nfdi4plants/arctrl 3.2.3 → 3.3.1

package/dist/ts/node_modules/@fable-org/fable-library-ts/MutableSet.js

@@ -4,7 +4,7 @@ import { setItem, item } from './Array.js';
 import { some } from './Option.js';
 import { FSharpRef } from './Types.js';
 import { class_type } from './Reflection.js';
-import { tryGetValue, getItemFromDict } from './MapUtil.js';
+import { getItemFromDict } from './MapUtil.js';
 
 class HashSet {
   constructor(items, comparer) {
@@ -12,6 +12,7 @@ class HashSet {
     this.comparer = comparer;
     this$.contents = this;
     this.hashMap = /* @__PURE__ */ new Map([]);
+    this.count = 0;
     this["init@9"] = 1;
     const enumerator = getEnumerator(items);
     try {
@@ -116,36 +117,36 @@ function HashSet_$reflection(gen0) {
 function HashSet_$ctor_Z6150332D(items, comparer) {
   return new HashSet(items, comparer);
 }
-function HashSet__TryFindIndex_2B595(this$, k) {
-  const h = this$.comparer.GetHashCode(k) | 0;
-  let matchValue;
-  let outArg = defaultOf();
-  matchValue = [tryGetValue(this$.hashMap, h, new FSharpRef(() => outArg, (v) => {
-    outArg = v;
-  })), outArg];
-  if (matchValue[0]) {
-    return [true, h, matchValue[1].findIndex((v_1) => this$.comparer.Equals(k, v_1))];
+function HashSet__TryFindBucket_Z524259A4(this$, h) {
+  if (this$.hashMap.has(h)) {
+    return getItemFromDict(this$.hashMap, h);
   } else {
-    return [false, h, -1];
+    return void 0;
   }
 }
-function HashSet__TryFind_2B595(this$, k) {
-  const matchValue = HashSet__TryFindIndex_2B595(this$, k);
-  let matchResult = void 0;
-  if (matchValue[0]) {
-    if (matchValue[2] > -1) {
-      matchResult = 0;
-    } else {
-      matchResult = 1;
+function HashSet__FindIndex_Z142BBCA7(this$, k, bucket) {
+  let i = 0;
+  let found = -1;
+  while (found < 0 && i < bucket.length) {
+    if (this$.comparer.Equals(k, item(i, bucket))) {
+      found = i | 0;
     }
-  } else {
-    matchResult = 1;
+    i = i + 1 | 0;
   }
-  switch (matchResult) {
-    case 0:
-      return some(item(matchValue[2], getItemFromDict(this$.hashMap, matchValue[1])));
-    default:
+  return found | 0;
+}
+function HashSet__TryFind_2B595(this$, k) {
+  const matchValue = HashSet__TryFindBucket_Z524259A4(this$, this$.comparer.GetHashCode(k));
+  if (matchValue == null) {
+    return void 0;
+  } else {
+    const bucket = matchValue;
+    const i = HashSet__FindIndex_Z142BBCA7(this$, k, bucket) | 0;
+    if (i > -1) {
+      return some(item(i, bucket));
+    } else {
       return void 0;
+    }
   }
 }
 function HashSet__get_Comparer(this$) {
@@ -153,76 +154,55 @@ function HashSet__get_Comparer(this$) {
 }
 function HashSet__Clear(this$) {
   this$.hashMap.clear();
+  this$.count = 0;
 }
 function HashSet__get_Count(this$) {
-  let count = 0;
-  let enumerator = getEnumerator(this$.hashMap.values());
-  try {
-    while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-      const items = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-      count = count + items.length | 0;
-    }
-  } finally {
-    disposeSafe(enumerator);
-  }
-  return count | 0;
+  return this$.count | 0;
 }
 function HashSet__Add_2B595(this$, k) {
-  const matchValue = HashSet__TryFindIndex_2B595(this$, k);
-  if (matchValue[0]) {
-    if (matchValue[2] > -1) {
+  const h = this$.comparer.GetHashCode(k) | 0;
+  const matchValue = HashSet__TryFindBucket_Z524259A4(this$, h);
+  if (matchValue == null) {
+    this$.hashMap.set(h, [k]);
+    this$.count = this$.count + 1 | 0;
+    return true;
+  } else {
+    const bucket = matchValue;
+    if (HashSet__FindIndex_Z142BBCA7(this$, k, bucket) > -1) {
       return false;
     } else {
-      void getItemFromDict(this$.hashMap, matchValue[1]).push(k);
+      void bucket.push(k);
+      this$.count = this$.count + 1 | 0;
       return true;
     }
-  } else {
-    this$.hashMap.set(matchValue[1], [k]);
-    return true;
   }
 }
 function HashSet__Contains_2B595(this$, k) {
-  const matchValue = HashSet__TryFindIndex_2B595(this$, k);
-  let matchResult = void 0;
-  if (matchValue[0]) {
-    if (matchValue[2] > -1) {
-      matchResult = 0;
-    } else {
-      matchResult = 1;
-    }
+  const matchValue = HashSet__TryFindBucket_Z524259A4(this$, this$.comparer.GetHashCode(k));
+  if (matchValue == null) {
+    return false;
   } else {
-    matchResult = 1;
-  }
-  switch (matchResult) {
-    case 0:
-      return true;
-    default:
-      return false;
+    return HashSet__FindIndex_Z142BBCA7(this$, k, matchValue) > -1;
   }
 }
 function HashSet__Remove_2B595(this$, k) {
-  const matchValue = HashSet__TryFindIndex_2B595(this$, k);
-  let matchResult = void 0;
-  if (matchValue[0]) {
-    if (matchValue[2] > -1) {
-      matchResult = 0;
-    } else {
-      matchResult = 1;
-    }
+  const h = this$.comparer.GetHashCode(k) | 0;
+  const matchValue = HashSet__TryFindBucket_Z524259A4(this$, h);
+  if (matchValue == null) {
+    return false;
   } else {
-    matchResult = 1;
-  }
-  switch (matchResult) {
-    case 0: {
-      const h_1 = matchValue[1] | 0;
-      getItemFromDict(this$.hashMap, h_1).splice(matchValue[2], 1);
-      if (getItemFromDict(this$.hashMap, h_1).length === 0) {
-        this$.hashMap.delete(h_1);
+    const bucket = matchValue;
+    const i = HashSet__FindIndex_Z142BBCA7(this$, k, bucket) | 0;
+    if (i > -1) {
+      bucket.splice(i, 1);
+      this$.count = this$.count - 1 | 0;
+      if (bucket.length === 0) {
+        this$.hashMap.delete(h);
       }
       return true;
-    }
-    default:
+    } else {
       return false;
+    }
   }
 }
 

package/dist/ts/node_modules/@fable-org/fable-library-ts/NumberStyles.js

@@ -0,0 +1,54 @@
+import { Exception } from './Util.js';
+
+const NumberStyles = {
+  None: 0,
+  AllowLeadingWhite: 1,
+  AllowTrailingWhite: 2,
+  AllowLeadingSign: 4,
+  AllowTrailingSign: 8,
+  AllowParentheses: 16,
+  AllowDecimalPoint: 32,
+  AllowThousands: 64,
+  AllowExponent: 128,
+  AllowHexSpecifier: 512,
+  Integer: 7,
+  Number: 111,
+  Float: 167
+};
+function digitsPattern(style) {
+  const integral = style & NumberStyles.AllowThousands ? "\\d+(?:,\\d*)*" : "\\d+";
+  const point = style & NumberStyles.AllowDecimalPoint ? "(?:\\.\\d*)?" : "";
+  const leadingPoint = style & NumberStyles.AllowDecimalPoint ? "|\\.\\d+" : "";
+  const exponent = style & NumberStyles.AllowExponent ? "(?:[eE][+-]?\\d+)?" : "";
+  return new RegExp(`^(?:${integral}${point}${leadingPoint})${exponent}$`);
+}
+function splitNumber(str, style) {
+  if (style & NumberStyles.AllowHexSpecifier) {
+    throw new Exception("The number style AllowHexSpecifier is not supported on floating point data types.");
+  }
+  let s = str.replace(/\0+$/, "");
+  if (style & NumberStyles.AllowLeadingWhite) {
+    s = s.replace(/^[\t-\r ]+/, "");
+  }
+  if (style & NumberStyles.AllowTrailingWhite) {
+    s = s.replace(/[\t-\r ]+$/, "");
+  }
+  let negative = false;
+  if (style & NumberStyles.AllowParentheses && s.startsWith("(") && s.endsWith(")")) {
+    s = s.slice(1, -1);
+    negative = true;
+  }
+  if (style & NumberStyles.AllowLeadingSign && /^[+-]/.test(s)) {
+    negative = s[0] === "-" ? !negative : negative;
+    s = s.slice(1);
+  } else if (style & NumberStyles.AllowTrailingSign && /[+-]$/.test(s)) {
+    negative = s[s.length - 1] === "-" ? !negative : negative;
+    s = s.slice(0, -1);
+  }
+  if (!digitsPattern(style).test(s)) {
+    return void 0;
+  }
+  return { digits: s.replace(/,/g, ""), negative };
+}
+
+export { NumberStyles, splitNumber };

package/dist/ts/node_modules/@fable-org/fable-library-ts/Numeric.js

@@ -80,14 +80,19 @@ function toExponential(x, dp) {
     return x[symbol]().toExponential(dp);
   }
 }
-function toHex(x) {
+function toRadix(x, radix) {
   if (typeof x === "number") {
-    return (Number(x) >>> 0).toString(16);
+    return (Number(x) >>> 0).toString(radix);
   } else if (typeof x === "bigint") {
-    return BigInt.asUintN(64, x).toString(16);
-  } else {
+    return BigInt.asUintN(64, x).toString(radix);
+  } else if (radix === 16) {
     return x[symbol]().toHex();
+  } else {
+    return String(x);
   }
 }
+function toHex(x) {
+  return toRadix(x, 16);
+}
 
-export { compare, divide, isIntegral, isNumeric, multiply, symbol, toExponential, toFixed, toHex, toPrecision };
+export { compare, divide, isIntegral, isNumeric, multiply, symbol, toExponential, toFixed, toHex, toPrecision, toRadix };

package/dist/ts/node_modules/@fable-org/fable-library-ts/Random.js

@@ -1,5 +1,4 @@
 import { ArgumentOutOfRangeException_$ctor_Z721C83C5, ArgumentNullException_$ctor_Z721C83C5 } from './System.js';
-import { Operators_IsNull } from './FSharp.Core.js';
 import { class_type } from './Reflection.js';
 import { toInt64_unchecked, fromInt32, compare, toFloat64, toInt32_unchecked, op_Addition, fromFloat64 } from './BigInt.js';
 import { item, setItem } from './Array.js';
@@ -14,7 +13,7 @@ function Native_randomNext(minValue, maxValue) {
   return Math.floor(Math.random() * (maxValue - minValue)) + minValue;
 }
 function Native_randomBytes(buffer) {
-  if (Operators_IsNull(buffer)) {
+  if (buffer == null) {
     throw ArgumentNullException_$ctor_Z721C83C5("buffer");
   }
   for (let i = 0; i < buffer.length; i += 6) {
@@ -113,11 +112,11 @@ class Seeded {
   }
   NextBytes(buffer) {
     const this$ = this;
-    if (Operators_IsNull(buffer)) {
+    if (buffer == null) {
       throw ArgumentNullException_$ctor_Z721C83C5("buffer");
     }
     for (let i = 0; i <= buffer.length - 1; i++) {
-      setItem(buffer, i, Seeded__InternalSample(this$) % (~~255 + 1) & 255);
+      setItem(buffer, i, ~~(Seeded__InternalSample(this$) % (~~255 + 1)) & 255);
     }
   }
 }

package/dist/ts/node_modules/@fable-org/fable-library-ts/Range.js

@@ -1,4 +1,5 @@
-import { compare, Exception } from './Util.js';
+import { compare } from './Util.js';
+import { Operators_InvalidArg } from './FSharp.Core.js';
 import { delay, unfold } from './Seq.js';
 import { fromZero, op_Addition, toInt64_unchecked, toUInt64_unchecked } from './BigInt.js';
 import { fromParts, op_Addition as op_Addition$1 } from './Decimal.js';
@@ -6,7 +7,7 @@ import { fromParts, op_Addition as op_Addition$1 } from './Decimal.js';
 function makeRangeStepFunction(step, stop, zero, add) {
   const stepComparedWithZero = compare(step, zero) | 0;
   if (stepComparedWithZero === 0) {
-    throw new Exception("The step of a range cannot be zero");
+    throw Operators_InvalidArg("step", "The step of a range cannot be zero.");
   }
   const stepGreaterThanZero = stepComparedWithZero > 0;
   return (x) => {
@@ -37,7 +38,7 @@ function rangeChar(start, stop) {
   const intStop = ~~stop.charCodeAt(0) | 0;
   return delay(() => unfold((i) => {
     if (i <= intStop) {
-      return [String.fromCharCode(i & 65535), i + 1];
+      return [String.fromCharCode(~~i & 65535), i + 1];
     } else {
       return void 0;
     }

package/dist/ts/node_modules/@fable-org/fable-library-ts/RegExp.js

@@ -1,8 +1,8 @@
 import { Exception } from './Util.js';
 
 function create(pattern, options2 = 0) {
-  if ((options2 & ~(1 ^ 2 ^ 8 ^ 16 ^ 256)) !== 0) {
-    throw new Exception("RegexOptions only supports: IgnoreCase, Multiline, Compiled, Singleline and ECMAScript");
+  if ((options2 & ~(1 ^ 2 ^ 8 ^ 16 ^ 256 ^ 1024)) !== 0) {
+    throw new Exception("RegexOptions only supports: IgnoreCase, Multiline, Compiled, Singleline, ECMAScript and NonBacktracking");
   }
   let flags = "gu";
   flags += options2 & 1 ? "i" : "";