[Dart-dev] DART/branches Revision: 11095

dart at ucar.edu dart at ucar.edu
Fri Feb 10 14:41:20 MST 2017


hendric at ucar.edu
2017-02-10 14:41:20 -0700 (Fri, 10 Feb 2017)
35
not writting model time for mpas.




Modified: DART/branches/rma_single_file/models/mpas_atm/model_mod.f90
===================================================================
--- DART/branches/rma_single_file/models/mpas_atm/model_mod.f90	2017-02-10 21:38:54 UTC (rev 11094)
+++ DART/branches/rma_single_file/models/mpas_atm/model_mod.f90	2017-02-10 21:41:20 UTC (rev 11095)
@@ -81,8 +81,6 @@
 use ensemble_manager_mod, only : ensemble_type, map_pe_to_task, &
                                  get_copy_owner_index, get_var_owner_index, get_my_vars
 
-use dart_time_io_mod,      only : dart_write_model_time => write_model_time
-
 use distributed_state_mod
 
 ! netcdf modules
@@ -3081,8 +3079,7 @@
 integer,             intent(in) :: ncid !< netcdf file handle
 type(time_type),     intent(in) :: dart_time
 
-call error_handler(E_MSG, 'write_model_time', 'no routine for mpas_atm write model time, writing dart time')
-call dart_write_model_time(ncid, dart_time)
+call error_handler(E_MSG, 'write_model_time', 'no routine for mpas_atm write model time')
 
 end subroutine write_model_time_restart
 


More information about the Dart-dev mailing list