[Dart-dev] DART/branches Revision: 11108

dart at ucar.edu dart at ucar.edu
Mon Feb 13 16:21:46 MST 2017


hendric at ucar.edu
2017-02-13 16:21:46 -0700 (Mon, 13 Feb 2017)
27
removing file info dumps.




Modified: DART/branches/rma_single_file/filter/filter_mod.f90
===================================================================
--- DART/branches/rma_single_file/filter/filter_mod.f90	2017-02-13 23:20:41 UTC (rev 11107)
+++ DART/branches/rma_single_file/filter/filter_mod.f90	2017-02-13 23:21:46 UTC (rev 11108)
@@ -64,7 +64,7 @@
 use state_vector_io_mod,   only : state_vector_io_init, read_state, write_state, &
                                   set_stage_to_write, get_stage_to_write
 
-use io_filenames_mod,      only : io_filenames_init, file_info_type, file_info_dump, &
+use io_filenames_mod,      only : io_filenames_init, file_info_type, &
                                   combine_file_info, set_file_metadata,  &
                                   set_member_file_metadata, &
                                   set_io_copy_flag, check_file_info_variable_shape, &

Modified: DART/branches/rma_single_file/perfect_model_obs/perfect_model_obs.f90
===================================================================
--- DART/branches/rma_single_file/perfect_model_obs/perfect_model_obs.f90	2017-02-13 23:20:41 UTC (rev 11107)
+++ DART/branches/rma_single_file/perfect_model_obs/perfect_model_obs.f90	2017-02-13 23:21:46 UTC (rev 11108)
@@ -283,11 +283,6 @@
 call set_file_metadata(file_info_output, 1, output_filelist, 'perfect_restart', 'pmo restart')
 call set_io_copy_flag( file_info_output, 1, 1, WRITE_COPY, num_output_ens=1)
 
-if (trace_execution) then
-   call file_info_dump(file_info_input, 'pmo:file_info_input')
-   call file_info_dump(file_info_output,'pmo:file_info_output')
-endif
-
 ! Set a time type for initial time if namelist inputs are not negative
 call filter_set_initial_time(init_time_days, init_time_seconds, time1, read_time_from_file)
 


More information about the Dart-dev mailing list