[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