From 201786db40bee57759e852e6dd7f2f3bdba29dc4 Mon Sep 17 00:00:00 2001
From: Aymeric Varasse <aymeric.varasse@cea.fr>
Date: Tue, 20 Jun 2023 18:58:05 +0200
Subject: [PATCH] [aimos] Set CWD from CAISAR
---
src/aimos.ml | 3 +++
1 file changed, 3 insertions(+)
diff --git a/src/aimos.ml b/src/aimos.ml
index 07ec27a..4343ead 100644
--- a/src/aimos.ml
+++ b/src/aimos.ml
@@ -29,6 +29,7 @@ let write_config inputs_path models_path perturbation perturbation_path out_mode
amplitude =
let config_file = Caml.Filename.temp_file "aimos-" ".yml" in
let config_path = Fpath.v config_file in
+ let cwd = Caml.Sys.getcwd () in
let ampli = Dataset.string_of_amplitude amplitude in
let transformations =
match ampli with
@@ -44,6 +45,7 @@ let write_config inputs_path models_path perturbation perturbation_path out_mode
("plot", `Bool false);
("inputs_path", `String inputs_path);
("transformations", transformations);
+ ("alt_cwd", `String cwd);
]
| ctp ->
`O
@@ -52,6 +54,7 @@ let write_config inputs_path models_path perturbation perturbation_path out_mode
("inputs_path", `String inputs_path);
("transformations", transformations);
("custom_t_path", `String ctp);
+ ("alt_cwd", `String cwd);
]
in
let models =
--
GitLab