[Dart-dev] [4758] DART/trunk/integrate_model/integrate_model.f90: Commented out unused variables that may be useful if

[nancy at ucar.edu]

Revision: 4758
Author:   thoar
Date:     2011-02-24 10:40:04 -0700 (Thu, 24 Feb 2011)
Log Message:
-----------
Commented out unused variables that may be useful if
the program ever gets its own namelist.

Modified Paths:
--------------
    DART/trunk/integrate_model/integrate_model.f90

-------------- next part --------------
Modified: DART/trunk/integrate_model/integrate_model.f90
===================================================================
--- DART/trunk/integrate_model/integrate_model.f90	2011-02-24 16:13:05 UTC (rev 4757)
+++ DART/trunk/integrate_model/integrate_model.f90	2011-02-24 17:40:04 UTC (rev 4758)
@@ -46,8 +46,8 @@
 ! executable was invoked by a script that was originally 
 ! called by advance_state() in filter, so no need to get 
 ! recursive here.
-character (len=129)     :: adv_ens_command = ''
-integer                 :: async = 0
+!character (len=129)     :: adv_ens_command = ''
+!integer                 :: async = 0
 
 ! for debugging
 logical                 :: trace_execution = .false.
@@ -114,7 +114,7 @@
 
    if(ens_handle%time(1) < target_time) &
       call advance_state(ens_handle, ens_size=1, target_time=target_time, &
-         async=0, adv_ens_command=adv_ens_command, tasks_per_model_advance=1)
+         async=0, adv_ens_command='', tasks_per_model_advance=1)
 
    ! Output the restart file if requested; Force to binary for bitwise reproducing
    ! use in filter and perfect_model obs with shell advance options