diff --git a/DESCRIPTION b/DESCRIPTION
index b1ecf54bc9d7e6c7316271f96b9e3a45ad6b5537..c04aac5a349a63435f3ae310e98c428016b4a685 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.4.0.3
+Version: 1.4.0.4
 Date: 2019-12-04
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
diff --git a/NEWS.md b/NEWS.md
index 165ae4f34d47d171ec472c9496d6b510b71c010c..612a3d30e4b5c1d65eb913baa9af497de588d1a5 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -2,7 +2,7 @@
 
 
 
-### 1.4.0.3 Release Notes (2019-12-04)
+### 1.4.0.4 Release Notes (2019-12-04)
 
 
 #### New features
diff --git a/src/airGR.c b/src/airGR.c
index 4ccbc8789ca287a401b04a745ea070ea577e698d..3ef276e47191790d63984303eaf5c9ab6571e340 100644
--- a/src/airGR.c
+++ b/src/airGR.c
@@ -11,6 +11,7 @@ extern void F77_NAME(frun_cemaneige)(int *, double *, double *, double *, double
 extern void F77_NAME(frun_gr1a)(int *, double *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
 extern void F77_NAME(frun_gr2m)(int *, double *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
 extern void F77_NAME(frun_gr4h)(int *, double *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
+extern void F77_NAME(frun_gr5h)(int *, double *, double *, int *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
 extern void F77_NAME(frun_gr4j)(int *, double *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
 extern void F77_NAME(frun_gr5j)(int *, double *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
 extern void F77_NAME(frun_gr6j)(int *, double *, double *, int *, double *, int *, double *, int *, int *, double *, double *);
@@ -20,6 +21,7 @@ static const R_FortranMethodDef FortranEntries[] = {
     {"frun_gr1a",      (DL_FUNC) &F77_NAME(frun_gr1a),      11},
     {"frun_gr2m",      (DL_FUNC) &F77_NAME(frun_gr2m),      11},
     {"frun_gr4h",      (DL_FUNC) &F77_NAME(frun_gr4h),      11},
+    {"frun_gr4h",      (DL_FUNC) &F77_NAME(frun_gr5h),      13},
     {"frun_gr4j",      (DL_FUNC) &F77_NAME(frun_gr4j),      11},
     {"frun_gr5j",      (DL_FUNC) &F77_NAME(frun_gr5j),      11},
     {"frun_gr6j",      (DL_FUNC) &F77_NAME(frun_gr6j),      11},