From 9b5fb0a452f332fa276cee2977f9a45b61149446 Mon Sep 17 00:00:00 2001
From: Michael Duda <duda@ucar.edu>
Date: Fri, 14 Aug 2015 00:21:20 +0000
Subject: [PATCH] Update version number in geogrid and metgrid output files to
 V3.7.1

This change updates the version number in the 'TITLE' global attribute
of the geogrid and metgrid output files.


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


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

diff --git a/geogrid/src/process_tile_module.F b/geogrid/src/process_tile_module.F
index dfed4bf..1334b1e 100644
--- a/geogrid/src/process_tile_module.F
+++ b/geogrid/src/process_tile_module.F
@@ -293,7 +293,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.7', '0000-00-00_00:00:00', grid_type, dynopt, &
+      call output_init(which_domain, 'OUTPUT FROM GEOGRID V3.7.1', '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 3cffae0..637317a 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.7') /= 0) then
+         if (index(title,'GEOGRID V3.7.1') /= 0) then
+            wps_version = 3.71
+         else 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
diff --git a/metgrid/src/process_domain_module.F b/metgrid/src/process_domain_module.F
index 5a504d5..79c30de 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.7' 
+      title = 'OUTPUT FROM METGRID V3.7.1' 
    
       ! Initialize the output module for this domain and time
       call mprintf(.true.,LOGFILE,'Initializing output module.')
-- 
2.11.4.GIT