[Dart-dev] DART/branches Revision: 11787

[dart at ucar.edu]

thoar at ucar.edu
2017-07-03 17:13:14 -0600 (Mon, 03 Jul 2017)
158
Deferring adding the electric potential 'pot' till later, so removing it
from the state.

The nc_check() routine in netcdf_utilities.f90 needs to be public.




Modified: DART/branches/rma_openggcm/models/openggcm/netcdf_utilities.f90
===================================================================
--- DART/branches/rma_openggcm/models/openggcm/netcdf_utilities.f90	2017-07-03 21:29:52 UTC (rev 11786)
+++ DART/branches/rma_openggcm/models/openggcm/netcdf_utilities.f90	2017-07-03 23:13:14 UTC (rev 11787)
@@ -28,7 +28,8 @@
 integer, parameter :: c8 = SELECTED_REAL_KIND(12,100)
 integer, parameter :: digits12 = SELECTED_REAL_KIND(12)
 
-public :: wr_netcdf_model_time,      &
+public :: nc_check,                  &
+          wr_netcdf_model_time,      &
           wr_netcdf_ctim_grid,       &
           wr_netcdf_interface_grid,  &
           wr_netcdf_oplus_grid,      &

Modified: DART/branches/rma_openggcm/models/openggcm/work/input.nml
===================================================================
--- DART/branches/rma_openggcm/models/openggcm/work/input.nml	2017-07-03 21:29:52 UTC (rev 11786)
+++ DART/branches/rma_openggcm/models/openggcm/work/input.nml	2017-07-03 23:13:14 UTC (rev 11787)
@@ -49,7 +49,7 @@
    output_interval          = 1
    num_groups               = 1
    output_forward_op_errors = .false.
-   output_restart_mean      = .true.,
+   output_restart_mean      = .true.
    output_timestamps        = .false.
    output_inflation         = .true.
    trace_execution          = .true.
@@ -57,10 +57,10 @@
    direct_netcdf_read       = .true.
    direct_netcdf_write      = .true.
    distributed_state        = .false.
-   single_restart_file_in   = .true.,
-   single_restart_file_out  = .false.,
+   single_restart_file_in   = .true.
+   single_restart_file_out  = .false.
    perturb_from_single_instance = .true.
-   perturbation_amplitude   = 0.2,
+   perturbation_amplitude   = 0.2
 
    inf_flavor                  = 0,                       0
    inf_initial_from_restart    = .false.,                 .false.
@@ -207,50 +207,11 @@
                      '../observations/drifters_v_pseudo.obs_seq.out',
                      '../observations/adcp_u_pseudo.obs_seq.out',
                      '../observations/adcp_v_pseudo.obs_seq.out',
-                     '../observations/tmi_pseudo.obs_seq.out',
+                     '../observations/tmi_pseudo.obs_seq.out'
    filename_out    = 'obs_seq.out'
    gregorian_cal   = .true.
   /
 
-# other possible obs tool namelist items:
-#
-# print out how many obs of each type are in the file:
-#   print_only        = .true.
-#
-# keep only obs in time period:
-#   first_obs_days    = -1
-#   first_obs_seconds = -1
-#   last_obs_days     = -1
-#   last_obs_seconds  = -1
-#
-# keep only obs in a bounding box:
-#   min_lat           = -90.0
-#   max_lat           =  90.0
-#   min_lon           =   0.0
-#   max_lon           = 360.0
-#
-# keep only the U and V radiosonde winds:
-#   obs_types          = 'RADIOSONDE_U_WIND_COMPONENT',
-#                        'RADIOSONDE_V_WIND_COMPONENT'
-#   keep_types         = .true.
-#
-# remove the U and V radiosonde winds:
-#   obs_types          = 'RADIOSONDE_U_WIND_COMPONENT',
-#                        'RADIOSONDE_V_WIND_COMPONENT'
-#   keep_types         = .false.,
-#
-# keep only observations with a DART QC of 0:
-#   qc_metadata        = 'Dart quality control'
-#   min_qc             = 0
-#   max_qc             = 0
-#
-# keep only radiosonde temp obs between 250 and 300 K:
-#   copy_metadata      = 'NCEP BUFR observation'
-#   copy_type          = 'RADIOSONDE_TEMPERATURE'
-#   min_copy           = 250.0
-#   max_copy           = 300.0
-#
-
 # The times in the namelist for the obs_diag program are vectors
 # that follow the following sequence:
 # year   month   day   hour   minute   second
@@ -263,19 +224,19 @@
 &obs_diag_nml
    obs_sequence_name = 'obs_seq.final'
    obs_sequence_list = ''
-   first_bin_center =  1998, 1, 3, 0, 0, 0 
-   last_bin_center  =  1998, 2, 1, 0, 0, 0 
-   bin_separation   =     0, 0, 1, 0, 0, 0