Changeset 4414


Ignore:
Timestamp:
2014-02-04T13:12:45+01:00 (7 years ago)
Author:
trackstand2
Message:

Comment out dump_arrays in step

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/step.F90

    r4404 r4414  
    9292                         CALL timing_start('Step')  
    9393 
     94!                      IF(kstp==1)CALL dump_array(kstp,'tmask_i_stp',tmask_i, & 
     95!                                                 withHalos=.TRUE.) 
     96 
    9497#if defined key_agrif 
    9598      kstp = nit000 + Agrif_Nb_Step() 
     
    340343                               CALL timing_start('Control')  
    341344 
     345                      !IF(kstp==1)CALL dump_array(kstp,'tmask_i_ctl',tmask_i, & 
     346                      !                           withHalos=.TRUE.) 
     347 
    342348                               CALL stp_ctl( kstp, indic ) 
    343349      IF( indic < 0        )   THEN 
Note: See TracChangeset for help on using the changeset viewer.