From d6fc7b15a25de6b5d64d07914a81f13845e11a20 Mon Sep 17 00:00:00 2001
From: "camille.poulet" <camille.poulet@irstea.fr>
Date: Tue, 20 Apr 2021 15:43:12 +0200
Subject: [PATCH] Change XMl for growth calibration

---
 exploration/GR3D_Rdescription/GR3D_NEA_XML_parameters.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/exploration/GR3D_Rdescription/GR3D_NEA_XML_parameters.R b/exploration/GR3D_Rdescription/GR3D_NEA_XML_parameters.R
index f3300a5..95fcc38 100644
--- a/exploration/GR3D_Rdescription/GR3D_NEA_XML_parameters.R
+++ b/exploration/GR3D_Rdescription/GR3D_NEA_XML_parameters.R
@@ -1,10 +1,10 @@
 library(XML)
 
 #read the XML file to upload the set of parameters included in GR3D-US
-fishXML <- xmlToList(xmlParse("../../data/input/northeastamerica/fishRIOBasin_Sapidissima.xml"))
+fishXML <- xmlToList(xmlParse("../../data/input/northeastamerica/fishRIOBasin_Sapidissima_Old.xml"))
 
 #Upload parameters linked to reproduction
-reproducePar = data.frame(t(unlist(fishXML[[1]][["processes"]][["processesEachStep"]][["species.ReproduceAndSurviveAfterReproductionWithDiagnose"]]))) %>% 
+reproducePar = data.frame(t(unlist(fishXML[[1]][["processes"]][["processesEachStep"]][["species.ReproduceWithDiagnose"]]))) %>% 
   select(-c(synchronisationMode, reproductionSeason, proportionOfFemaleAtBirth,
             sigmaRecruitment, maxNumberOfSuperIndividualPerReproduction, withDiagnose,
             displayFluxesOnConsole)) %>% 
-- 
GitLab