@nfdi4plants/arctrl 1.1.0 → 2.0.0-alpha.1

package/Core/Comment.js

@@ -0,0 +1,97 @@
+import { map as map_1, defaultArg, unwrap } from "../fable_modules/fable-library-js.4.16.0/Option.js";
+import { equals } from "../fable_modules/fable-library-js.4.16.0/Util.js";
+import { boxHashOption, boxHashArray } from "./Helper/HashCodes.js";
+import { StringBuilder__Append_Z721C83C5, StringBuilder_$ctor } from "../fable_modules/fable-library-js.4.16.0/System.Text.js";
+import { printf, toText, join } from "../fable_modules/fable-library-js.4.16.0/String.js";
+import { ofArray, choose, map } from "../fable_modules/fable-library-js.4.16.0/List.js";
+import { Record, toString } from "../fable_modules/fable-library-js.4.16.0/Types.js";
+import { record_type, string_type, int32_type, class_type } from "../fable_modules/fable-library-js.4.16.0/Reflection.js";
+
+export class Comment$ {
+    constructor(name, value) {
+        this._name = name;
+        this._value = value;
+    }
+    get Name() {
+        const this$ = this;
+        return unwrap(this$._name);
+    }
+    set Name(name) {
+        const this$ = this;
+        this$._name = name;
+    }
+    get Value() {
+        const this$ = this;
+        return unwrap(this$._value);
+    }
+    set Value(value) {
+        const this$ = this;
+        this$._value = value;
+    }
+    static make(name, value) {
+        return new Comment$(unwrap(name), unwrap(value));
+    }
+    static create(name, value) {
+        return Comment$.make(name, value);
+    }
+    static toString(comment) {
+        return [defaultArg(comment.Name, ""), defaultArg(comment.Value, "")];
+    }
+    Copy() {
+        const this$ = this;
+        const name = this$.Name;
+        const value = this$.Value;
+        return Comment$.make(name, value);
+    }
+    Equals(obj) {
+        let c;
+        const this$ = this;
+        return (obj instanceof Comment$) && ((c = obj, equals(c.Name, this$.Name) && equals(c.Value, this$.Value)));
+    }
+    GetHashCode() {
+        const this$ = this;
+        return boxHashArray([boxHashOption(this$.Name), boxHashOption(this$.Value)]) | 0;
+    }
+    toString() {
+        const this$ = this;
+        const sb = StringBuilder_$ctor();
+        StringBuilder__Append_Z721C83C5(sb, "Comment {");
+        StringBuilder__Append_Z721C83C5(sb, join(", ", map((tupledArg_1) => toText(printf("%s = %A"))(tupledArg_1[0])(tupledArg_1[1]), choose((tupledArg) => map_1((o) => [tupledArg[0], o], tupledArg[1]), ofArray([["Name", this$.Name], ["Value", this$.Value]])))));
+        StringBuilder__Append_Z721C83C5(sb, "}");
+        return toString(sb);
+    }
+}
+
+export function Comment$_$reflection() {
+    return class_type("ARCtrl.Comment", void 0, Comment$);
+}
+
+export function Comment_$ctor_40457300(name, value) {
+    return new Comment$(name, value);
+}
+
+export class Remark extends Record {
+    constructor(Line, Value) {
+        super();
+        this.Line = (Line | 0);
+        this.Value = Value;
+    }
+    static make(line, value) {
+        return new Remark(line, value);
+    }
+    static create(line, value) {
+        return Remark.make(line, value);
+    }
+    static toTuple(remark) {
+        return [remark.Line, remark.Value];
+    }
+    Copy() {
+        const this$ = this;
+        return Remark.make(this$.Line, this$.Value);
+    }
+}
+
+export function Remark_$reflection() {
+    return record_type("ARCtrl.Remark", [], Remark, () => [["Line", int32_type], ["Value", string_type]]);
+}
+

package/{ISA/ISA/JsonTypes → Core}/CommentList.js

@@ -1,7 +1,8 @@
-import { map, append, choose, tryPick } from "../../../fable_modules/fable-library.4.5.0/Array.js";
-import { value } from "../../../fable_modules/fable-library.4.5.0/Option.js";
-import { ofArray } from "../../../fable_modules/fable-library.4.5.0/Map.js";
-import { equals, comparePrimitives } from "../../../fable_modules/fable-library.4.5.0/Util.js";
+import { exists, tryPick } from "../fable_modules/fable-library-js.4.16.0/Seq.js";
+import { value } from "../fable_modules/fable-library-js.4.16.0/Option.js";
+import { ofSeq } from "../fable_modules/fable-library-js.4.16.0/Map.js";
+import { ResizeArray_filter, ResizeArray_appendSingleton, ResizeArray_map, ResizeArray_choose } from "./Helper/Collections.js";
+import { equals, comparePrimitives } from "../fable_modules/fable-library-js.4.16.0/Util.js";
 
 /**
  * If a comment with the given key exists in the [], return its value, else return None
@@ -35,7 +36,7 @@ export function tryItem(key, comments) {
  * Returns true, if the key exists in the []
  */
 export function containsKey(key, comments) {
-    return comments.some((c) => {
+    return exists((c) => {
         const matchValue = c.Name;
         let matchResult, n_1;
         if (matchValue != null) {
@@ -56,7 +57,7 @@ export function containsKey(key, comments) {
             default:
                 return false;
         }
-    });
+    }, comments);
 }
 
 /**
@@ -70,7 +71,7 @@ export function item(key, comments) {
  * Create a map of comment keys to comment values
  */
 export function toMap(comments) {
-    return ofArray(choose((c) => {
+    return ofSeq(ResizeArray_choose((c) => {
         const matchValue = c.Name;
         if (matchValue != null) {
             return [matchValue, c.Value];
@@ -83,19 +84,12 @@ export function toMap(comments) {
     });
 }
 
-/**
- * Adds the given comment to the comment []
- */
-export function add(comment, comments) {
-    return append(comments, [comment]);
-}
-
 /**
  * Add the given comment to the comment [] if it doesnt exist, else replace it
  */
 export function set$(comment, comments) {
     if (containsKey(value(comment.Name), comments)) {
-        return map((c) => {
+        return ResizeArray_map((c) => {
             if (equals(c.Name, comment.Name)) {
                 return comment;
             }
@@ -105,7 +99,7 @@ export function set$(comment, comments) {
         }, comments);
     }
     else {
-        return append(comments, [comment]);
+        return ResizeArray_appendSingleton(comment, comments);
     }
 }
 
@@ -113,7 +107,7 @@ export function set$(comment, comments) {
  * Returns a new comment [] where comments with the given key are filtered out
  */
 export function dropByKey(key, comments) {
-    return comments.filter((c) => {
+    return ResizeArray_filter((c) => {
         const matchValue = c.Name;
         let matchResult, n_1;
         if (matchValue != null) {
@@ -134,6 +128,6 @@ export function dropByKey(key, comments) {
             default:
                 return true;
         }
-    });
+    }, comments);
 }