[Dart-dev] [6081] DART/branches/development/models/clm/model_mod_check.f90: Replaced the call to timestamp() with finalize_utilities()

[nancy at ucar.edu]

Revision: 6081
Author:   thoar
Date:     2013-04-24 21:03:15 -0600 (Wed, 24 Apr 2013)
Log Message:
-----------
Replaced the call to timestamp() with finalize_utilities()
Moved the SVN keyword block to the bottom.

Modified Paths:
--------------
    DART/branches/development/models/clm/model_mod_check.f90

-------------- next part --------------
Modified: DART/branches/development/models/clm/model_mod_check.f90
===================================================================
--- DART/branches/development/models/clm/model_mod_check.f90	2013-04-24 23:37:29 UTC (rev 6080)
+++ DART/branches/development/models/clm/model_mod_check.f90	2013-04-25 03:03:15 UTC (rev 6081)
@@ -4,20 +4,15 @@
 
 program model_mod_check
 
-! <next few lines under version control, do not edit>
-! $URL$
-! $Id$
-! $Revision$
-! $Date$
-
 !----------------------------------------------------------------------
 ! purpose: test routines
 !----------------------------------------------------------------------
 
 use        types_mod, only : r8, digits12, metadatalength
-use    utilities_mod, only : initialize_utilities, timestamp, nc_check, &
+use    utilities_mod, only : initialize_utilities, nc_check, &
                              open_file, close_file, find_namelist_in_file, &
-                             check_namelist_read
+                             check_namelist_read, finalize_utilities, &
+                             error_handler, E_MSG
 use     location_mod, only : location_type, set_location, write_location, get_dist, &
                              query_location, LocationDims, get_location, VERTISHEIGHT
 use     obs_kind_mod, only : get_raw_obs_kind_name, get_raw_obs_kind_index, &
@@ -274,11 +269,7 @@
 
 endif
 
-!----------------------------------------------------------------------
-! When called with 'end', timestamp will call finalize_utilities()
-! This must be the last few lines of the main program.
-!----------------------------------------------------------------------
-call timestamp(string1=source, pos='end')
+call finalize_utilities('model_mod_check')
 
 contains
 
@@ -398,3 +389,10 @@
 
 
 end program model_mod_check
+
+! <next few lines under version control, do not edit>
+! $URL$
+! $Id$
+! $Revision$
+! $Date$
+