[Dart-dev] [6192] DART/branches/development: Better ASCII graphics in obs_def_tower_mod.f90,

[nancy at ucar.edu]

Revision: 6192
Author:   thoar
Date:     2013-05-29 16:39:52 -0600 (Wed, 29 May 2013)
Log Message:
-----------
Better ASCII graphics in obs_def_tower_mod.f90,
fixed misspelling in a comment in reg_factor_mod.f90
No code changes.

Modified Paths:
--------------
    DART/branches/development/obs_def/obs_def_tower_mod.f90
    DART/branches/development/reg_factor/reg_factor_mod.f90

-------------- next part --------------
Modified: DART/branches/development/obs_def/obs_def_tower_mod.f90
===================================================================
--- DART/branches/development/obs_def/obs_def_tower_mod.f90	2013-05-29 22:37:30 UTC (rev 6191)
+++ DART/branches/development/obs_def/obs_def_tower_mod.f90	2013-05-29 22:39:52 UTC (rev 6192)
@@ -179,11 +179,13 @@
 ! the CESM namelist .... hist_nhtfrq must be a negative number in a DART
 ! application of CLM ... and the STOP_OPTION must be "HOURS".
 !
-!      | start of the model advance ... *.h1.* file starts getting written
-!      |
-!      X=======================X (CLM model advance)
-!      |<---- hist_nhtfrq ---->|
-!                              | current model state ... current time
+!  | start of the model advance ... *.h1.* file starts getting written
+!  |
+!  X==X==X==X==X==X==X==X==X==X==X==[O] (CLM model advance)
+!  |<------- hist_nhtfrq ------->|   |
+!                                |   | END of the model advance
+!                                |
+!                                | END of the data in the *.h1.* file
 
 second = abs(hist_nhtfrq)*60*60
 tower_time = model_time - set_time(second,0)

Modified: DART/branches/development/reg_factor/reg_factor_mod.f90
===================================================================
--- DART/branches/development/reg_factor/reg_factor_mod.f90	2013-05-29 22:37:30 UTC (rev 6191)
+++ DART/branches/development/reg_factor/reg_factor_mod.f90	2013-05-29 22:39:52 UTC (rev 6192)
@@ -136,7 +136,7 @@
       ! Write out diagnostic information
       if(save_reg_diagnostics) then
        
-! DATA REDUCTION FOR WORKSHOP PURPSOSES
+! DATA REDUCTION FOR WORKSHOP PURPOSES
          if(obs_index <= 4 .and. state_index > 0) then
 
          call get_time(obs_time, secs, days)