New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 4414 for branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/step.F90 – NEMO

Ignore:
Timestamp:
2014-02-04T13:12:45+01:00 (10 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.