[Dart-dev] DART/branches Revision: 11075
dart at ucar.edu
dart at ucar.edu
Thu Feb 9 14:08:20 MST 2017
hendric at ucar.edu
2017-02-09 14:08:20 -0700 (Thu, 09 Feb 2017)
66
reading variables to copies so we do not need to do a transpose.
Modified: DART/branches/rma_single_file/io/state_space_diag_mod.f90
===================================================================
--- DART/branches/rma_single_file/io/state_space_diag_mod.f90 2017-02-09 21:00:30 UTC (rev 11074)
+++ DART/branches/rma_single_file/io/state_space_diag_mod.f90 2017-02-09 21:08:20 UTC (rev 11075)
@@ -543,7 +543,7 @@
call nc_check(ret, 'read_singlefile: nf90_close', fname)
! and now distribute the var data to the copies
-call all_vars_to_all_copies(state_ens_handle)
+! call all_vars_to_all_copies(state_ens_handle)
end subroutine read_singlefile
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-09 21:00:30 UTC (rev 11074)
+++ DART/branches/rma_single_file/perfect_model_obs/perfect_model_obs.f90 2017-02-09 21:08:20 UTC (rev 11075)
@@ -41,7 +41,7 @@
get_my_num_copies, get_ensemble_time, prepare_to_write_to_vars, &
prepare_to_read_from_vars, allocate_vars, &
all_vars_to_all_copies, &
- all_copies_to_all_vars, print_ens_handle
+ all_copies_to_all_vars
use filter_mod, only : filter_set_initial_time, filter_sync_keys_time
@@ -295,7 +295,6 @@
call error_handler(E_MSG,'perfect_read_restart:', 'reading input state from file')
call read_state(ens_handle, file_info_input, read_time_from_file, time1)
- call print_ens_handle(ens_handle, force=.true., label='pmo read :')
else ! model spin up
More information about the Dart-dev
mailing list