v1.3.2.15 CLEAN: sinus_D2H raviable renamed into parab_D2H into PE_Oudin

1ea39993 · Delaigue Olivier · 2819ae22 · 1ea39993 · 1ea39993 · 1ea39993
Commit 1ea39993 authored 5 years ago by Delaigue Olivier
Hide whitespace changes
Inline Side-by-side

Showing

with 4 additions and 4 deletions
+4 -4
--- a/DESCRIPTION
+++ b/DESCRIPTION
 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.3.2.14
+Version: 1.3.2.15
 Date: 2019-05-24
 Authors@R: c(
  person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),

--- a/NEWS.rmd
+++ b/NEWS.rmd
@@ -14,7 +14,7 @@ output:
-### 1.3.2.14 Release Notes (2019-05-24)
+### 54 Release Notes (2019-05-24)
 #### New features

--- a/R/PE_Oudin.R
+++ b/R/PE_Oudin.R
@@ -126,11 +126,11 @@ PE_Oudin <- function(JD, Temp,
  ## ---------- disaggregate PE from daily to hourly
  if (TimeStepOut == "hourly") {
-    sinus_D2H <- c(0.000, 0.000, 0.000, 0.000, 0.000, 0.000,
+    parab_D2H <- c(0.000, 0.000, 0.000, 0.000, 0.000, 0.000,
                   0.035, 0.062, 0.079, 0.097, 0.110, 0.117,
                   0.117, 0.110, 0.097, 0.079, 0.062, 0.035,
                   0.000, 0.000, 0.000, 0.000, 0.000, 0.000)
-    PE_Oudin_H <- rep(PE_Oudin_D, each = 24) * rep(sinus_D2H, times = length(PE_Oudin_D))
+    PE_Oudin_H <- rep(PE_Oudin_D, each = 24) * rep(parab_D2H, times = length(PE_Oudin_D))
  }