set_nd_nq is now in mkin, fix Steps12 bug

If a scenario with a slash "/" was selected in PEC_sw_focus(),
the Step 2 file generated giving an error (path not found) in the
Steps12 calculator, because the scenario name is part of the "compound"
name in this implementation, in order to show it in the list that the
calculator presents.

1 files changed, 5 insertions, 5 deletions

diff --git a/man/PEC_sw_focus.Rd b/man/PEC_sw_focus.Rd
index 3ad1ad0..f23423b 100644
--- a/man/PEC_sw_focus.Rd
+++ b/man/PEC_sw_focus.Rd
@@ -26,7 +26,7 @@ PEC_sw_focus(
 }
 \arguments{
 \item{parent}{A list containing substance specific parameters, e.g.
-conveniently generated by \code{\link{chent_focus_sw}}.}
+conveniently generated by [chent_focus_sw].}
 
 \item{rate}{The application rate in g/ha. Overriden when
 applications are given explicitly}
@@ -38,20 +38,20 @@ applications are given explicitly}
 \item{comment}{A comment for the input file}
 
 \item{met}{A list containing metabolite specific parameters.  e.g.
-conveniently generated by \code{\link{chent_focus_sw}}.  If not NULL,
+conveniently generated by [chent_focus_sw].  If not NULL,
 the PEC is calculated for this compound, not the parent.}
 
 \item{f_drift}{The fraction of the application rate reaching the waterbody
 via drift. If NA, this is derived from the scenario name and the number
 of applications via the drift data defined by the
-\code{\link{FOCUS_Step_12_scenarios}}}
+[FOCUS_Step_12_scenarios]}
 
 \item{f_rd}{The fraction of the amount applied reaching the waterbody via
 runoff/drainage. At Step 1, it is assumed to be 10%, be it the
 parent or a metabolite}
 
 \item{scenario}{The name of the scenario. Must be one of the scenario
-names given in \code{\link{FOCUS_Step_12_scenarios}}}
+names given in [FOCUS_Step_12_scenarios]}
 
 \item{region}{'n' for Northern Europe or 's' for Southern Europe. If NA, only
 Step 1 PECsw are calculated}
@@ -101,7 +101,7 @@ PEC_sw_focus(dummy_1, 3000, f_drift = 0, overwrite = TRUE, append = FALSE)
 
 # Metabolite
 new_dummy <- chent_focus_sw("New Dummy", mw = 250, Koc = 100)
-M1 <- chent_focus_sw("M1", mw = 100, cwsat = 100, DT50_ws = 100, Koc = 50, 
+M1 <- chent_focus_sw("M1", mw = 100, cwsat = 100, DT50_ws = 100, Koc = 50,
   max_ws = 0, max_soil = 0.5)
 PEC_sw_focus(new_dummy, 1000, scenario = "cereals, winter", met = M1)
 }