[Dart-dev] [4262] DART/trunk/cov_cutoff/cov_cutoff_mod.f90: Add a log message for the type of localization

[nancy at ucar.edu]

Revision: 4262
Author:   nancy
Date:     2010-02-08 10:42:50 -0700 (Mon, 08 Feb 2010)
Log Message:
-----------
Add a log message for the type of localization
selected in the namelist.  No code changes.

Modified Paths:
--------------
    DART/trunk/cov_cutoff/cov_cutoff_mod.f90

-------------- next part --------------
Modified: DART/trunk/cov_cutoff/cov_cutoff_mod.f90
===================================================================
--- DART/trunk/cov_cutoff/cov_cutoff_mod.f90	2010-02-08 17:37:21 UTC (rev 4261)
+++ DART/trunk/cov_cutoff/cov_cutoff_mod.f90	2010-02-08 17:42:50 UTC (rev 4262)
@@ -98,6 +98,25 @@
    if (do_nml_file()) write(nmlfileunit,nml=cov_cutoff_nml)
    if (do_nml_term()) write(     *     ,nml=cov_cutoff_nml)
 
+
+   if (do_output()) then
+      select case (select_localization)
+         case (1)
+            call error_handler(E_MSG,'comp_cov_factor:', &
+               'Standard Gaspari Cohn localization selected')
+         case (2)
+            call error_handler(E_MSG,'comp_cov_factor:', &
+               'Boxcar localization selected')
+         case (3)
+            call error_handler(E_MSG,'comp_cov_factor:', &
+               'Ramped localization selected')
+         case default
+            call error_handler(E_ERR,'comp_cov_factor', &
+               'Illegal value of "select_localization" in cov_cutoff_mod namelist', &
+                source, revision, revdate )
+      end select
+   endif
+
 endif
 !---------------------------------------------------------