Ignore:
Timestamp:
2009-02-17T17:31:42+01:00 (12 years ago)
Author:
smasson
Message:

nwrite = modulo referenced to nit000 in all ouputs, see ticket:339

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/C1D_SRC/diawri_c1d.F90

    r1312 r1317  
    276276      ! donne le nombre d'elements, et ndex la liste des indices a sortir 
    277277 
    278       IF( lwp .AND. MOD( kt, nwrite ) == 0 ) THEN  
     278      IF( lwp .AND. MOD( it, nwrite ) == 0 ) THEN  
    279279         WRITE(numout,*) 'dia_wri : write model outputs in NetCDF files at ', kt, 'time-step' 
    280280         WRITE(numout,*) '~~~~~~ ' 
     
    345345      ! 3. Synchronise and close all files 
    346346      ! --------------------------------------- 
    347       IF( MOD( kt, nwrite ) == 0 .OR. kindic < 0 )   CALL histsync( nid_T ) 
     347      IF( MOD( it, nwrite ) == 0 .OR. kindic < 0 )   CALL histsync( nid_T ) 
    348348 
    349349      !  Create an output files (output.abort.nc) if S < 0 or u > 20 m/s 
Note: See TracChangeset for help on using the changeset viewer.