@nfdi4plants/arctrl 1.0.0-alpha10

package/ARC.js

@@ -0,0 +1,262 @@
+import { concat, fold, exactlyOne, choose, map } from "./fable_modules/fable-library.4.1.4/Array.js";
+import { toFsWorkbook as toFsWorkbook_1, fromFsWorkbook } from "./ISA/ISA.Spreadsheet/ArcAssay.js";
+import { tryFromContract } from "./Contracts/Contracts.ArcAssay.js";
+import { ARCtrl_ISA_ArcStudy__ArcStudy_toFsWorkbook_Static_Z2A9662E9, ARCtrl_ISA_ArcStudy__ArcStudy_fromFsWorkbook_Static_32154C9D } from "./ISA/ISA.Spreadsheet/ArcStudy.js";
+import { tryFromContract as tryFromContract_1 } from "./Contracts/Contracts.ArcStudy.js";
+import { toFsWorkbook, fromFsWorkbook as fromFsWorkbook_1 } from "./ISA/ISA.Spreadsheet/ArcInvestigation.js";
+import { tryFromContract as tryFromContract_2 } from "./Contracts/Contracts.ArcInvestigation.js";
+import { collect, toList, empty, singleton, append, delay, iterate, find, tryFind, toArray } from "./fable_modules/fable-library.4.1.4/Seq.js";
+import { createRunsFolder, createWorkflowsFolder, createInvestigationFile, createStudyFolder, createStudiesFolder, createAssayFolder, createAssaysFolder } from "./FileSystemTree.js";
+import { FileSystemTree } from "./FileSystem/FileSystemTree.js";
+import { FileSystem } from "./FileSystem/FileSystem.js";
+import { bind, map as map_1, value as value_2, defaultArg, unwrap } from "./fable_modules/fable-library.4.1.4/Option.js";
+import { tryISAReadContractFromPath } from "./Contracts/Contracts.ARCtrl.js";
+import { ArcTables__get_Tables, ArcTables_$ctor_Z18C2F36D, ArcTables_updateReferenceTablesBySheets_Z2EE88E97 } from "./ISA/ISA/ArcTypes/ArcTables.js";
+import { addToDict } from "./fable_modules/fable-library.4.1.4/MapUtil.js";
+import { ArcInvestigation } from "./ISA/ISA/ArcTypes/ArcTypes.js";
+import { Assay_fileNameFromIdentifier, Study_fileNameFromIdentifier } from "./ISA/ISA/Identifier.js";
+import { Dictionary_tryGet } from "./fable_modules/FsSpreadsheet.4.1.0/Cells/FsCellsCollection.fs.js";
+import { Contract } from "./Contract/Contract.js";
+import { Clone_createCloneContract_5000466F, Init_createAddRemoteContract_Z721C83C5, gitignoreContract, Init_createInitContract_6DFDD678 } from "./Contracts/Contracts.Git.js";
+import { FSharpSet__Contains, ofSeq, unionMany } from "./fable_modules/fable-library.4.1.4/Set.js";
+import { comparePrimitives } from "./fable_modules/fable-library.4.1.4/Util.js";
+import { ofSeq as ofSeq_1 } from "./fable_modules/fable-library.4.1.4/Map.js";
+import { class_type } from "./fable_modules/fable-library.4.1.4/Reflection.js";
+
+export function ARCAux_getArcAssaysFromContracts(contracts) {
+    return map(fromFsWorkbook, choose(tryFromContract, contracts));
+}
+
+export function ARCAux_getArcStudiesFromContracts(contracts) {
+    return map(ARCtrl_ISA_ArcStudy__ArcStudy_fromFsWorkbook_Static_32154C9D, choose(tryFromContract_1, contracts));
+}
+
+export function ARCAux_getArcInvestigationFromContracts(contracts) {
+    return fromFsWorkbook_1(exactlyOne(choose(tryFromContract_2, contracts)));
+}
+
+export function ARCAux_updateFSByISA(isa, fs) {
+    let patternInput;
+    if (isa == null) {
+        patternInput = [[], []];
+    }
+    else {
+        const inv = isa;
+        patternInput = [toArray(inv.StudyIdentifiers), toArray(inv.AssayIdentifiers)];
+    }
+    const assays = createAssaysFolder(map(createAssayFolder, patternInput[1]));
+    const studies = createStudiesFolder(map(createStudyFolder, patternInput[0]));
+    const investigation = createInvestigationFile();
+    let tree;
+    const arg = FileSystemTree.createRootFolder([investigation, assays, studies]);
+    tree = FileSystem.create({
+        tree: arg,
+    });
+    return fs.Union(tree);
+}
+
+export function ARCAux_updateFSByCWL(cwl, fs) {
+    const workflows = createWorkflowsFolder([]);
+    const runs = createRunsFolder([]);
+    let tree;
+    const arg = FileSystemTree.createRootFolder([workflows, runs]);
+    tree = FileSystem.create({
+        tree: arg,
+    });
+    return fs.Union(tree);
+}
+
+export class ARC {
+    constructor(isa, cwl, fs) {
+        this.cwl = cwl;
+        this._isa = isa;
+        this._cwl = this.cwl;
+        this._fs = ARCAux_updateFSByCWL(this.cwl, ARCAux_updateFSByISA(isa, defaultArg(fs, FileSystem.create({
+            tree: new FileSystemTree(1, ["", []]),
+        }))));
+    }
+    get ISA() {
+        const this$ = this;
+        return unwrap(this$._isa);
+    }
+    set ISA(newISA) {
+        const this$ = this;
+        this$._isa = newISA;
+        this$.UpdateFileSystem();
+    }
+    get CWL() {
+        const this$ = this;
+        return this$.cwl;
+    }
+    get FileSystem() {
+        const this$ = this;
+        return this$._fs;
+    }
+    static fromFilePaths(filePaths) {
+        return new ARC(void 0, void 0, FileSystem.fromFilePaths(filePaths));
+    }
+    GetReadContracts() {
+        const this$ = this;
+        return choose(tryISAReadContractFromPath, this$._fs.Tree.ToFilePaths());
+    }
+    SetISAFromContracts(contracts, enableLogging) {
+        const this$ = this;
+        const enableLogging_1 = defaultArg(enableLogging, false);
+        const investigation = ARCAux_getArcInvestigationFromContracts(contracts);
+        const studies = map((tuple) => tuple[0], ARCAux_getArcStudiesFromContracts(contracts));
+        const assays = ARCAux_getArcAssaysFromContracts(contracts);
+        studies.forEach((study) => {
+            const registeredStudyOpt = tryFind((s) => (s.Identifier === study.Identifier), investigation.Studies);
+            if (registeredStudyOpt == null) {
+                investigation.AddStudy(study);
+            }
+            else {
+                const registeredStudy = registeredStudyOpt;
+                registeredStudy.UpdateReferenceByStudyFile(study, true);
+            }
+        });
+        assays.forEach((assay) => {
+            const registeredAssayOpt = tryFind((a) => (a.Identifier === assay.Identifier), investigation.Assays);
+            if (registeredAssayOpt == null) {
+                investigation.AddAssay(assay);
+            }
+            else {
+                const registeredAssay = registeredAssayOpt;
+                registeredAssay.UpdateReferenceByAssayFile(assay, true);
+            }
+            const assay_1 = find((a_1) => (a_1.Identifier === assay.Identifier), investigation.Assays);
+            let updatedTables;
+            const array_2 = assay_1.StudiesRegisteredIn;
+            updatedTables = fold((tables, study_1) => ArcTables_updateReferenceTablesBySheets_Z2EE88E97(ArcTables_$ctor_Z18C2F36D(study_1.Tables), tables, false), ArcTables_$ctor_Z18C2F36D(assay_1.Tables), array_2);
+            assay_1.Tables = ArcTables__get_Tables(updatedTables);
+        });
+        this$.ISA = investigation;
+    }
+    UpdateFileSystem() {
+        const this$ = this;
+        let newFS;
+        const fs = ARCAux_updateFSByISA(this$._isa, this$._fs);
+        newFS = ARCAux_updateFSByCWL(this$._cwl, fs);
+        this$._fs = newFS;
+    }
+    GetWriteContracts() {
+        const this$ = this;
+        const workbooks = new Map([]);
+        const matchValue = this$.ISA;
+        if (matchValue == null) {
+            addToDict(workbooks, "isa.investigation.xlsx", ["ISA_Investigation", toFsWorkbook(ArcInvestigation.create("MISSING_IDENTIFIER_"))]);
+        }
+        else {
+            const inv = matchValue;
+            addToDict(workbooks, "isa.investigation.xlsx", ["ISA_Investigation", toFsWorkbook(inv)]);
+            iterate((s) => {
+                addToDict(workbooks, Study_fileNameFromIdentifier(s.Identifier), ["ISA_Study", ARCtrl_ISA_ArcStudy__ArcStudy_toFsWorkbook_Static_Z2A9662E9(s)]);
+            }, inv.Studies);
+            iterate((a) => {
+                addToDict(workbooks, Assay_fileNameFromIdentifier(a.Identifier), ["ISA_Assay", toFsWorkbook_1(a)]);
+            }, inv.Assays);
+        }
+        return map((fp) => {
+            const matchValue_1 = Dictionary_tryGet(fp, workbooks);
+            if (matchValue_1 == null) {
+                return Contract.createCreate(fp, "PlainText");
+            }
+            else {
+                const wb = matchValue_1[1];
+                const dto = matchValue_1[0];
+                return Contract.createCreate(fp, dto, wb);
+            }
+        }, this$._fs.Tree.ToFilePaths(true));
+    }
+    GetGitInitContracts(branch, repositoryAddress, defaultGitignore) {
+        const defaultGitignore_1 = defaultArg(defaultGitignore, false);
+        return toArray(delay(() => append(singleton(Init_createInitContract_6DFDD678(unwrap(branch))), delay(() => append(defaultGitignore_1 ? singleton(gitignoreContract) : empty(), delay(() => ((repositoryAddress != null) ? singleton(Init_createAddRemoteContract_Z721C83C5(value_2(repositoryAddress))) : empty())))))));
+    }
+    static getCloneContract(remoteUrl, merge, branch, token, nolfs) {
+        return Clone_createCloneContract_5000466F(remoteUrl, unwrap(merge), unwrap(branch), unwrap(token), unwrap(nolfs));
+    }
+    Copy() {
+        const this$ = this;
+        const isaCopy = map_1((i) => i.Copy(), this$._isa);
+        const fsCopy = this$._fs.Copy();
+        return new ARC(unwrap(isaCopy), this$._cwl, fsCopy);
+    }
+    GetRegisteredPayload(IgnoreHidden) {
+        let tree, arg, array_3;
+        const this$ = this;
+        const registeredStudies = defaultArg(map_1((isa) => isa.Studies.slice(), map_1((i) => i.Copy(), this$._isa)), []);
+        const registeredAssays = concat(map((s) => s.RegisteredAssays.slice(), registeredStudies));
+        const includeFiles = unionMany([ofSeq(["isa.investigation.xlsx", "README.md"], {
+            Compare: comparePrimitives,
+        }), unionMany(map((s_1) => {
+            const studyFoldername = `${"studies"}/${s_1.Identifier}`;
+            return ofSeq(toList(delay(() => append(singleton(`${studyFoldername}/${"isa.study.xlsx"}`), delay(() => append(singleton(`${studyFoldername}/${"README.md"}`), delay(() => collect((table) => collect((kv) => {
+                const textValue = kv[1].ToFreeTextCell().AsFreeText;
+                return append(singleton(textValue), delay(() => append(singleton(`${studyFoldername}/${"resources"}/${textValue}`), delay(() => singleton(`${studyFoldername}/${"protocols"}/${textValue}`)))));
+            }, table.Values), s_1.Tables))))))), {
+                Compare: comparePrimitives,
+            });
+        }, registeredStudies), {
+            Compare: comparePrimitives,
+        }), unionMany(map((a) => {
+            const assayFoldername = `${"assays"}/${a.Identifier}`;
+            return ofSeq(toList(delay(() => append(singleton(`${assayFoldername}/${"isa.assay.xlsx"}`), delay(() => append(singleton(`${assayFoldername}/${"README.md"}`), delay(() => collect((table_1) => collect((kv_1) => {
+                const textValue_1 = kv_1[1].ToFreeTextCell().AsFreeText;
+                return append(singleton(textValue_1), delay(() => append(singleton(`${assayFoldername}/${"dataset"}/${textValue_1}`), delay(() => singleton(`${assayFoldername}/${"protocols"}/${textValue_1}`)))));
+            }, table_1.Values), a.Tables))))))), {
+                Compare: comparePrimitives,
+            });
+        }, registeredAssays), {
+            Compare: comparePrimitives,
+        })], {
+            Compare: comparePrimitives,
+        });
+        const ignoreHidden = defaultArg(IgnoreHidden, true);
+        const fsCopy = this$._fs.Copy();
+        return defaultArg(bind((tree_1) => {
+            if (ignoreHidden) {
+                return FileSystemTree.filterFolders((n_1) => !(n_1.indexOf(".") === 0))(tree_1);
+            }
+            else {
+                return tree_1;
+            }
+        }, (tree = ((arg = ((array_3 = FileSystemTree.toFilePaths()(fsCopy.Tree), array_3.filter((p) => {
+            if ((p.indexOf("workflows") === 0) ? true : (p.indexOf("runs") === 0)) {
+                return true;
+            }
+            else {
+                return FSharpSet__Contains(includeFiles, p);
+            }
+        }))), FileSystemTree.fromFilePaths(arg))), ignoreHidden ? FileSystemTree.filterFiles((n) => !(n.indexOf(".") === 0))(tree) : tree)), FileSystemTree.fromFilePaths([]));
+    }
+    GetAdditionalPayload(IgnoreHidden) {
+        let tree, arg, array;
+        const this$ = this;
+        const ignoreHidden = defaultArg(IgnoreHidden, true);
+        const registeredPayload = ofSeq(FileSystemTree.toFilePaths()(this$.GetRegisteredPayload()), {
+            Compare: comparePrimitives,
+        });
+        return defaultArg(bind((tree_1) => {
+            if (ignoreHidden) {
+                return FileSystemTree.filterFolders((n_1) => !(n_1.indexOf(".") === 0))(tree_1);
+            }
+            else {
+                return tree_1;
+            }
+        }, (tree = ((arg = ((array = FileSystemTree.toFilePaths()(this$._fs.Copy().Tree), array.filter((p) => !FSharpSet__Contains(registeredPayload, p)))), FileSystemTree.fromFilePaths(arg))), ignoreHidden ? FileSystemTree.filterFiles((n) => !(n.indexOf(".") === 0))(tree) : tree)), FileSystemTree.fromFilePaths([]));
+    }
+    static get DefaultContracts() {
+        return ofSeq_1([[".gitignore", gitignoreContract]], {
+            Compare: comparePrimitives,
+        });
+    }
+}
+
+export function ARC_$reflection() {
+    return class_type("ARCtrl.ARC", void 0, ARC);
+}
+
+export function ARC_$ctor_81B80F4(isa, cwl, fs) {
+    return new ARC(isa, cwl, fs);
+}
+

package/Contract/Contract.js

@@ -0,0 +1,95 @@
+import { Record } from "../fable_modules/fable-library.4.1.4/Types.js";
+import { class_type, option_type, record_type, array_type, string_type } from "../fable_modules/fable-library.4.1.4/Reflection.js";
+import { defaultArg } from "../fable_modules/fable-library.4.1.4/Option.js";
+
+export class CLITool extends Record {
+    constructor(Name, Arguments) {
+        super();
+        this.Name = Name;
+        this.Arguments = Arguments;
+    }
+    static create(name, arguments$) {
+        return new CLITool(name, arguments$);
+    }
+}
+
+export function CLITool_$reflection() {
+    return record_type("ARCtrl.Contract.CLITool", [], CLITool, () => [["Name", string_type], ["Arguments", array_type(string_type)]]);
+}
+
+export function DTO__get_isSpreadsheet(this$) {
+    return true;
+}
+
+export function DTO__get_isText(this$) {
+    if (typeof this$ === "string") {
+        return true;
+    }
+    else {
+        return false;
+    }
+}
+
+export function DTO__get_isCLITool(this$) {
+    if (this$ instanceof CLITool) {
+        return true;
+    }
+    else {
+        return false;
+    }
+}
+
+export function DTO__AsSpreadsheet(this$) {
+    return this$;
+}
+
+export function DTO__AsText(this$) {
+    if (typeof this$ === "string") {
+        return this$;
+    }
+    else {
+        throw new Error("Not text");
+    }
+}
+
+export function DTO__AsCLITool(this$) {
+    if (this$ instanceof CLITool) {
+        return this$;
+    }
+    else {
+        throw new Error("Not a CLI tool");
+    }
+}
+
+export class Contract extends Record {
+    constructor(Operation, Path, DTOType, DTO) {
+        super();
+        this.Operation = Operation;
+        this.Path = Path;
+        this.DTOType = DTOType;
+        this.DTO = DTO;
+    }
+    static create(op, path, { dtoType, dto }) {
+        return new Contract(op, path, dtoType, dto);
+    }
+    static createCreate(path, dtoType, dto) {
+        return new Contract("CREATE", path, dtoType, dto);
+    }
+    static createUpdate(path, dtoType, dto) {
+        return new Contract("UPDATE", path, dtoType, dto);
+    }
+    static createDelete(path) {
+        return new Contract("DELETE", path, void 0, void 0);
+    }
+    static createRead(path, dtoType) {
+        return new Contract("READ", path, dtoType, void 0);
+    }
+    static createExecute(dto, path) {
+        return new Contract("EXECUTE", defaultArg(path, ""), "Cli", dto);
+    }
+}
+
+export function Contract_$reflection() {
+    return record_type("ARCtrl.Contract.Contract", [], Contract, () => [["Operation", string_type], ["Path", string_type], ["DTOType", option_type(string_type)], ["DTO", option_type(class_type("ARCtrl.Contract.DTO"))]]);
+}
+

package/Contracts/Contracts.ARCtrl.js

@@ -0,0 +1,35 @@
+import { split as split_1 } from "../FileSystem/Path.js";
+import { $007CInvestigationPath$007C_$007C } from "./Contracts.ArcInvestigation.js";
+import { Contract } from "../Contract/Contract.js";
+import { $007CAssayPath$007C_$007C } from "./Contracts.ArcAssay.js";
+import { $007CStudyPath$007C_$007C } from "./Contracts.ArcStudy.js";
+
+/**
+ * Tries to create READ contract with DTOType = ISA_Assay, ISA_Study or ISA_Investigation from given path relative to ARC root.
+ */
+export function tryISAReadContractFromPath(path) {
+    const split = split_1(path);
+    const activePatternResult = $007CInvestigationPath$007C_$007C(split);
+    if (activePatternResult != null) {
+        const p = activePatternResult;
+        return Contract.createRead(p, "ISA_Investigation");
+    }
+    else {
+        const activePatternResult_1 = $007CAssayPath$007C_$007C(split);
+        if (activePatternResult_1 != null) {
+            const p_1 = activePatternResult_1;
+            return Contract.createRead(p_1, "ISA_Assay");
+        }
+        else {
+            const activePatternResult_2 = $007CStudyPath$007C_$007C(split);
+            if (activePatternResult_2 != null) {
+                const p_2 = activePatternResult_2;
+                return Contract.createRead(p_2, "ISA_Study");
+            }
+            else {
+                return void 0;
+            }
+        }
+    }
+}
+

package/Contracts/Contracts.ArcAssay.js

@@ -0,0 +1,65 @@
+import { some } from "../fable_modules/fable-library.4.1.4/Option.js";
+import { combineMany } from "../FileSystem/Path.js";
+import { equalsWith } from "../fable_modules/fable-library.4.1.4/Array.js";
+import { defaultOf } from "../fable_modules/fable-library.4.1.4/Util.js";
+
+export function tryFromContract(c) {
+    let matchResult, fsworkbook;
+    if (c.Operation === "READ") {
+        if (c.DTOType != null) {
+            if (c.DTOType === "ISA_Assay") {
+                if (c.DTO != null) {
+                    matchResult = 0;
+                    fsworkbook = c.DTO;
+                }
+                else {
+                    matchResult = 1;
+                }
+            }
+            else {
+                matchResult = 1;
+            }
+        }
+        else {
+            matchResult = 1;
+        }
+    }
+    else {
+        matchResult = 1;
+    }
+    switch (matchResult) {
+        case 0:
+            return some(fsworkbook);
+        default:
+            return void 0;
+    }
+}
+
+export function $007CAssayPath$007C_$007C(input) {
+    let matchResult;
+    if (!equalsWith((x, y) => (x === y), input, defaultOf()) && (input.length === 3)) {
+        if (input[0] === "assays") {
+            if (input[2] === "isa.assay.xlsx") {
+                matchResult = 0;
+            }
+            else {
+                matchResult = 1;
+            }
+        }
+        else {
+            matchResult = 1;
+        }
+    }
+    else {
+        matchResult = 1;
+    }
+    switch (matchResult) {
+        case 0: {
+            const anyAssayName = input[1];
+            return combineMany(input);
+        }
+        default:
+            return void 0;
+    }
+}
+

package/Contracts/Contracts.ArcInvestigation.js

@@ -0,0 +1,58 @@
+import { some } from "../fable_modules/fable-library.4.1.4/Option.js";
+import { combineMany } from "../FileSystem/Path.js";
+import { equalsWith } from "../fable_modules/fable-library.4.1.4/Array.js";
+import { defaultOf } from "../fable_modules/fable-library.4.1.4/Util.js";
+
+export function tryFromContract(c) {
+    let matchResult, fsworkbook;
+    if (c.Operation === "READ") {
+        if (c.DTOType != null) {
+            if (c.DTOType === "ISA_Investigation") {
+                if (c.DTO != null) {
+                    matchResult = 0;
+                    fsworkbook = c.DTO;
+                }
+                else {
+                    matchResult = 1;
+                }
+            }
+            else {
+                matchResult = 1;
+            }
+        }
+        else {
+            matchResult = 1;
+        }
+    }
+    else {
+        matchResult = 1;
+    }
+    switch (matchResult) {
+        case 0:
+            return some(fsworkbook);
+        default:
+            return void 0;
+    }
+}
+
+export function $007CInvestigationPath$007C_$007C(input) {
+    let matchResult;
+    if (!equalsWith((x, y) => (x === y), input, defaultOf()) && (input.length === 1)) {
+        if (input[0] === "isa.investigation.xlsx") {
+            matchResult = 0;
+        }
+        else {
+            matchResult = 1;
+        }
+    }
+    else {
+        matchResult = 1;
+    }
+    switch (matchResult) {
+        case 0:
+            return combineMany(input);
+        default:
+            return void 0;
+    }
+}
+

package/Contracts/Contracts.ArcStudy.js

@@ -0,0 +1,65 @@
+import { some } from "../fable_modules/fable-library.4.1.4/Option.js";
+import { combineMany } from "../FileSystem/Path.js";
+import { equalsWith } from "../fable_modules/fable-library.4.1.4/Array.js";
+import { defaultOf } from "../fable_modules/fable-library.4.1.4/Util.js";
+
+export function tryFromContract(c) {
+    let matchResult, fsworkbook;
+    if (c.Operation === "READ") {
+        if (c.DTOType != null) {
+            if (c.DTOType === "ISA_Study") {
+                if (c.DTO != null) {
+                    matchResult = 0;
+                    fsworkbook = c.DTO;
+                }
+                else {
+                    matchResult = 1;
+                }
+            }
+            else {
+                matchResult = 1;
+            }
+        }
+        else {
+            matchResult = 1;
+        }
+    }
+    else {
+        matchResult = 1;
+    }
+    switch (matchResult) {
+        case 0:
+            return some(fsworkbook);
+        default:
+            return void 0;
+    }
+}
+
+export function $007CStudyPath$007C_$007C(input) {
+    let matchResult;
+    if (!equalsWith((x, y) => (x === y), input, defaultOf()) && (input.length === 3)) {
+        if (input[0] === "studies") {
+            if (input[2] === "isa.study.xlsx") {
+                matchResult = 0;
+            }
+            else {
+                matchResult = 1;
+            }
+        }
+        else {
+            matchResult = 1;
+        }
+    }
+    else {
+        matchResult = 1;
+    }
+    switch (matchResult) {
+        case 0: {
+            const anyStudyName = input[1];
+            return combineMany(input);
+        }
+        default:
+            return void 0;
+    }
+}
+

package/Contracts/Contracts.Git.js

@@ -0,0 +1,91 @@
+import { Contract, CLITool } from "../Contract/Contract.js";
+import { dgi } from "../FileSystem/DefaultGitignore.js";
+import { class_type } from "../fable_modules/fable-library.4.1.4/Reflection.js";
+import { value, defaultArg } from "../fable_modules/fable-library.4.1.4/Option.js";
+import { replace } from "../fable_modules/fable-library.4.1.4/String.js";
+import { empty, singleton, append, delay, toArray } from "../fable_modules/fable-library.4.1.4/Seq.js";
+
+export function gitWithArgs(arguments$) {
+    return CLITool.create("git", arguments$);
+}
+
+export function createGitContractAt(path, arguments$) {
+    return Contract.createExecute(gitWithArgs(arguments$), path);
+}
+
+export function createGitContract(arguments$) {
+    return Contract.createExecute(gitWithArgs(arguments$));
+}
+
+export const gitignoreContract = Contract.createCreate(".gitignore", "PlainText", dgi);
+
+export class Init {
+    constructor() {
+    }
+}
+
+export function Init_$reflection() {
+    return class_type("ARCtrl.Contract.Git.Init", void 0, Init);
+}
+
+export class Clone {
+    constructor() {
+    }
+}
+
+export function Clone_$reflection() {
+    return class_type("ARCtrl.Contract.Git.Clone", void 0, Clone);
+}
+
+export function Init_get_init() {
+    return "init";
+}
+
+export function Init_get_branchFlag() {
+    return "-b";
+}
+
+export function Init_get_remote() {
+    return "remote";
+}
+
+export function Init_get_add() {
+    return "add";
+}
+
+export function Init_get_origin() {
+    return "origin";
+}
+
+export function Init_createInitContract_6DFDD678(branch) {
+    const branch_1 = defaultArg(branch, "main");
+    return createGitContract([Init_get_init(), Init_get_branchFlag(), branch_1]);
+}
+
+export function Init_createAddRemoteContract_Z721C83C5(remoteUrl) {
+    return createGitContract([Init_get_remote(), Init_get_add(), Init_get_origin(), remoteUrl]);
+}
+
+export function Clone_get_clone() {
+    return "clone";
+}
+
+export function Clone_get_branchFlag() {
+    return "-b";
+}
+
+export function Clone_get_noLFSConfig() {
+    return "-c \"filter.lfs.smudge = git-lfs smudge --skip -- %f\" -c \"filter.lfs.process = git-lfs filter-process --skip\"";
+}
+
+export function Clone_formatRepoString(username, pass, url) {
+    return replace(url, "https://", "https://" + (((username + ":") + pass) + "@"));
+}
+
+export function Clone_createCloneContract_5000466F(remoteUrl, merge, branch, token, nolfs) {
+    const nolfs_1 = defaultArg(nolfs, false);
+    const merge_1 = defaultArg(merge, false);
+    const remoteUrl_1 = (token == null) ? remoteUrl : Clone_formatRepoString(token[0], token[1], remoteUrl);
+    return createGitContract(toArray(delay(() => append(singleton(Clone_get_clone()), delay(() => append(nolfs_1 ? singleton(Clone_get_noLFSConfig()) : empty(), delay(() => append((branch != null) ? singleton(Clone_get_branchFlag()) : empty(), delay(() => append((branch != null) ? singleton(value(branch)) : empty(), delay(() => append(singleton(remoteUrl_1), delay(() => (merge_1 ? singleton(".") : empty()))))))))))))));
+}
+