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

Addition of dbg SUM outputs and alteration of loop limits in dynldfiso and dynldf_bilapg

File:
1 edited

Legend:

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

    r4453 r4460  
    11431143#endif 
    11441144      !CALL timing_stop('dyn_ldf_iso_vslab','section') 
     1145#if defined ARPDBGSUM 
     1146      WRITE (*,*) narea,': ARPDBG: end dyn_ldf_iso SUM(ua)= ',SUM(ua),' at step=',kt 
     1147#endif 
    11451148 
    11461149      IF( wrk_not_released(2, 1,2,3,4,5,6,7,8) )   CALL ctl_stop('dyn_ldf_iso: failed to release workspace arrays') 
Note: See TracChangeset for help on using the changeset viewer.