From 4f30efeb9704ead432c438202960f4c8293699e9 Mon Sep 17 00:00:00 2001
From: Michael Duda <duda@ucar.edu>
Date: Fri, 30 Jan 2015 19:09:23 +0000
Subject: [PATCH] Update version number to 3.7. The README indicates that this
 is a "Pre-Release" version, however.

M    README
M    metgrid/src/process_domain_module.F
M    metgrid/src/input_module.F
M    geogrid/src/process_tile_module.F


git-svn-id: https://svn-wrf-wps.cgd.ucar.edu/trunk@877 86b71a92-4018-0410-97f8-d555beccfc3a
---
 README                              | 2 +-
 geogrid/src/process_tile_module.F   | 2 +-
 metgrid/src/input_module.F          | 4 +++-
 metgrid/src/process_domain_module.F | 2 +-
 4 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/README b/README
index cfe1806..c43521b 100644
--- a/README
+++ b/README
@@ -1,4 +1,4 @@
-WRF Pre-Processing System Version 3.6.1 (14 August 2014)
+WRF Pre-Processing System Version 3.7 Pre-Release (30 January 2015)
 
 http://www.mmm.ucar.edu/wrf/users/
 
diff --git a/geogrid/src/process_tile_module.F b/geogrid/src/process_tile_module.F
index 0d92091..991e51c 100644
--- a/geogrid/src/process_tile_module.F
+++ b/geogrid/src/process_tile_module.F
@@ -292,7 +292,7 @@ module process_tile_module
       end if
 
       ! Initialize the output module now that we have the corner point lats/lons
-      call output_init(which_domain, 'OUTPUT FROM GEOGRID V3.6.1', '0000-00-00_00:00:00', grid_type, dynopt, &
+      call output_init(which_domain, 'OUTPUT FROM GEOGRID V3.7', '0000-00-00_00:00:00', grid_type, dynopt, &
                        corner_lats, corner_lons, &
                        start_dom_i,   end_dom_i,   start_dom_j,   end_dom_j, &
                        start_patch_i, end_patch_i, start_patch_j, end_patch_j, &
diff --git a/metgrid/src/input_module.F b/metgrid/src/input_module.F
index 67f574f..3cffae0 100644
--- a/metgrid/src/input_module.F
+++ b/metgrid/src/input_module.F
@@ -427,7 +427,9 @@ module input_module
 #endif
      
          call ext_get_dom_ti_char          ('TITLE', title)
-         if (index(title,'GEOGRID V3.6.1') /= 0) then
+         if (index(title,'GEOGRID V3.7') /= 0) then
+            wps_version = 3.7
+         else if (index(title,'GEOGRID V3.6.1') /= 0) then
             wps_version = 3.61
          else if (index(title,'GEOGRID V3.6') /= 0) then
             wps_version = 3.6
diff --git a/metgrid/src/process_domain_module.F b/metgrid/src/process_domain_module.F
index 8097d08..5a504d5 100644
--- a/metgrid/src/process_domain_module.F
+++ b/metgrid/src/process_domain_module.F
@@ -1184,7 +1184,7 @@ integer, parameter :: BDR_WIDTH = 3
       !   now we simply output every field from the storage module.
       !
     
-      title = 'OUTPUT FROM METGRID V3.6.1' 
+      title = 'OUTPUT FROM METGRID V3.7' 
    
       ! Initialize the output module for this domain and time
       call mprintf(.true.,LOGFILE,'Initializing output module.')
-- 
2.11.4.GIT