[Dart-dev] [7767] DART/trunk: These are trivial changes.

nancy at ucar.edu nancy at ucar.edu
Wed Mar 25 17:23:34 MDT 2015


Revision: 7767
Author:   thoar
Date:     2015-03-25 17:23:34 -0600 (Wed, 25 Mar 2015)
Log Message:
-----------
These are trivial changes.
The tiegcm model has vertical coordinates of a magnitude that require 
more precision in a print statement in location_mod.f90

I added a comment in the obs_utilities_mod.f90 that the units of the
variable for observation error should be in 'units' of standard deviation.

The tiegcm quickbuild.csh removed the default namelists, which defeats the
whole point of making them. For consistency with the other models, they should
not be removed.

Modified Paths:
--------------
    DART/trunk/location/threed_sphere/location_mod.f90
    DART/trunk/models/tiegcm/work/quickbuild.csh
    DART/trunk/observations/utilities/obs_utilities_mod.f90

-------------- next part --------------
Modified: DART/trunk/location/threed_sphere/location_mod.f90
===================================================================
--- DART/trunk/location/threed_sphere/location_mod.f90	2015-03-25 22:57:15 UTC (rev 7766)
+++ DART/trunk/location/threed_sphere/location_mod.f90	2015-03-25 23:23:34 UTC (rev 7767)
@@ -803,7 +803,7 @@
    case (VERTISPRESSURE)
       write(charstring, '(A,1X,F12.7,A)') trim(string1), loc%vloc / 100.0_r8, '  hPa'
    case (VERTISHEIGHT)
-      write(charstring, '(A,1X,F12.7,A)') trim(string1), loc%vloc / 1000.0_r8, '  km'
+      write(charstring, '(A,1X,F20.7,A)') trim(string1), loc%vloc / 1000.0_r8, '  km'
    case (VERTISSCALEHEIGHT)
       write(charstring, '(A,1X,F12.7,A)') trim(string1), loc%vloc, '  scale ht'
    case default

Modified: DART/trunk/models/tiegcm/work/quickbuild.csh
===================================================================
--- DART/trunk/models/tiegcm/work/quickbuild.csh	2015-03-25 22:57:15 UTC (rev 7766)
+++ DART/trunk/models/tiegcm/work/quickbuild.csh	2015-03-25 23:23:34 UTC (rev 7767)
@@ -61,7 +61,7 @@
    endsw
 end
 
-\rm -f *.o *.mod input.nml*_default
+\rm -f *.o *.mod
 
 if ( $#argv == 1 && "$1" == "-mpi" ) then
   echo "Success: All single task DART programs compiled."  
@@ -110,7 +110,7 @@
 csh  mkmf_wakeup_filter -mpi
 make || exit $n
 
-\rm -f *.o *.mod input.nml*_default
+\rm -f *.o *.mod
 
 echo
 echo 'time to run filter here:'

Modified: DART/trunk/observations/utilities/obs_utilities_mod.f90
===================================================================
--- DART/trunk/observations/utilities/obs_utilities_mod.f90	2015-03-25 22:57:15 UTC (rev 7766)
+++ DART/trunk/observations/utilities/obs_utilities_mod.f90	2015-03-25 23:23:34 UTC (rev 7767)
@@ -75,7 +75,7 @@
 !    vkind - kind of vertical coordinate (pressure, level, etc)
 !    obsv  - observation value
 !    okind - observation kind
-!    oerr  - observation error
+!    oerr  - standard deviation of observation error
 !    day   - gregorian day
 !    sec   - gregorian second
 !    qc    - quality control value


More information about the Dart-dev mailing list