[Dart-dev] [6201] DART/branches/development/ensemble_manager/ensemble_manager_mod.f90: ok, back to returning after unneeded transposes.
nancy at ucar.edu
nancy at ucar.edu
Thu May 30 12:48:25 MDT 2013
Revision: 6201
Author: nancy
Date: 2013-05-30 12:48:24 -0600 (Thu, 30 May 2013)
Log Message:
-----------
ok, back to returning after unneeded transposes.
now that assim_tools has been committed, this should
be working as intended.
Modified Paths:
--------------
DART/branches/development/ensemble_manager/ensemble_manager_mod.f90
-------------- next part --------------
Modified: DART/branches/development/ensemble_manager/ensemble_manager_mod.f90
===================================================================
--- DART/branches/development/ensemble_manager/ensemble_manager_mod.f90 2013-05-30 18:47:39 UTC (rev 6200)
+++ DART/branches/development/ensemble_manager/ensemble_manager_mod.f90 2013-05-30 18:48:24 UTC (rev 6201)
@@ -1129,7 +1129,7 @@
'vars & copies both valid, transpose not needed', source, revision, revdate, &
text2=msgstring)
endif
- !return
+ return
else if (ens_handle%valid /= VALID_VARS) then
write(msgstring, *) 'ens_handle ', ens_handle%id_num
call error_handler(E_ERR, 'all_vars_to_all_copies', &
@@ -1301,7 +1301,7 @@
'vars & copies both valid, transpose not needed', source, revision, revdate, &
text2=msgstring)
endif
- !return
+ return
else if (ens_handle%valid /= VALID_COPIES) then
write(msgstring, *) 'ens_handle ', ens_handle%id_num
call error_handler(E_ERR, 'all_copies_to_all_vars', &
More information about the Dart-dev
mailing list