diff --git a/src/aimos.ml b/src/aimos.ml index 07ec27abcb88c338e9cd61698fa75f93e94722dd..4343ead38b1614bb1edc9e3cd0c71a724969651c 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 =