@nfdi4plants/arctrl 2.0.0-beta.1 → 2.0.0-beta.8

package/fable_modules/FsSpreadsheet.6.1.2/Json/Worksheet.fs

@@ -1,49 +0,0 @@
-module FsSpreadsheet.Json.Worksheet
-
-open FsSpreadsheet
-open Thoth.Json.Core
-
-[<Literal>]
-let name = "name"
-
-[<Literal>]
-let rows = "rows"
-
-[<Literal>]
-let tables = "tables"
-
-let encode (sheet:FsWorksheet) =
-    sheet.RescanRows()
-    Encode.object [
-        name, Encode.string sheet.Name
-        if Seq.isEmpty sheet.Tables |> not then        
-            tables, Encode.seq (sheet.Tables |> Seq.map Table.encode)
-        rows, Encode.seq (sheet.Rows |> Seq.map Row.encode)
-
-    ]
-
-let decode : Decoder<FsWorksheet> =
-    Decode.object (fun builder ->
-        let n = builder.Required.Field name Decode.string
-        let ts = builder.Optional.Field tables (Decode.seq Table.decode)
-        let rs = builder.Required.Field rows (Decode.seq Row.decode)
-        let sheet = new FsWorksheet(n)
-        rs
-        |> Seq.iter (fun (rowI,cells) -> 
-            let r = sheet.Row(rowI)
-            cells 
-            |> Seq.iter (fun cell ->
-                let c = r[cell.ColumnNumber]
-                c.Value <- cell.Value
-                c.DataType <- cell.DataType
-            )
-        )
-        match ts with
-        | Some ts -> 
-            ts
-            |> Seq.iter (fun t -> 
-                sheet.AddTable(t) |> ignore
-            )
-        | None -> ()
-        sheet
-    )

package/fable_modules/FsSpreadsheet.6.1.2/Json/Worksheet.fs.js

@@ -1,44 +0,0 @@
-import { iterate, empty, map, isEmpty, singleton, append, delay, toList } from "../../fable-library-js.4.16.0/Seq.js";
-import { Json } from "../../Thoth.Json.Core.0.2.1/Types.fs.js";
-import { seq } from "../../Thoth.Json.Core.0.2.1/Encode.fs.js";
-import { decode as decode_1, encode as encode_1 } from "./Table.fs.js";
-import { decode as decode_2, encode as encode_2 } from "./Row.fs.js";
-import { seq as seq_1, string, object } from "../../Thoth.Json.Core.0.2.1/Decode.fs.js";
-import { FsWorksheet } from "../FsWorksheet.fs.js";
-
-export function encode(sheet) {
-    sheet.RescanRows();
-    return new Json(5, [toList(delay(() => append(singleton(["name", new Json(0, [sheet.Name])]), delay(() => append(!isEmpty(sheet.Tables) ? singleton(["tables", seq(map(encode_1, sheet.Tables))]) : empty(), delay(() => singleton(["rows", seq(map(encode_2, sheet.Rows))])))))))]);
-}
-
-export const decode = object((builder) => {
-    let n;
-    const objectArg = builder.Required;
-    n = objectArg.Field("name", string);
-    let ts;
-    const arg_3 = seq_1(decode_1);
-    const objectArg_1 = builder.Optional;
-    ts = objectArg_1.Field("tables", arg_3);
-    let rs;
-    const arg_5 = seq_1(decode_2);
-    const objectArg_2 = builder.Required;
-    rs = objectArg_2.Field("rows", arg_5);
-    const sheet = new FsWorksheet(n);
-    iterate((tupledArg) => {
-        const r = sheet.Row(tupledArg[0]);
-        iterate((cell) => {
-            const c = r.Item(cell.ColumnNumber);
-            c.Value = cell.Value;
-            c.DataType = cell.DataType;
-        }, tupledArg[1]);
-    }, rs);
-    if (ts == null) {
-    }
-    else {
-        iterate((t) => {
-            sheet.AddTable(t);
-        }, ts);
-    }
-    return sheet;
-});
-