From 99c2af4a988b0969335d888332583e37aa712bfc Mon Sep 17 00:00:00 2001
From: Bill Ladwig <ladwig@ucar.edu>
Date: Tue, 16 Oct 2018 14:48:22 -0600
Subject: [PATCH] Make the algerr and errlen parameters

---
 fortran/wrf_constants.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/fortran/wrf_constants.f90 b/fortran/wrf_constants.f90
index eb2e9d8..0864502 100644
--- a/fortran/wrf_constants.f90
+++ b/fortran/wrf_constants.f90
@@ -1,8 +1,8 @@
 ! These are chosen to match the wrf module_model_constants.F where
 ! applicable
 MODULE wrf_constants
-    INTEGER :: ERRLEN=512
-    INTEGER :: ALGERR=64
+    INTEGER, PARAMETER :: ERRLEN=512
+    INTEGER, PARAMETER :: ALGERR=64
 
     REAL(KIND=8), PARAMETER :: WRF_EARTH_RADIUS = 6370000.D0
     REAL(KIND=8), PARAMETER :: T_BASE = 300.0D0