Changeset 1188


Ignore:
Timestamp:
2008-09-12T12:09:03+02:00 (12 years ago)
Author:
cetlod
Message:

update modules for the sediment model, see ticket:249

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/TOP_SRC/SED/sedini.F90

    r1179 r1188  
    437437      nitsedend = nitend 
    438438      nwrised   = nwritetrc 
    439       nfreq     = 1 
    440439#else 
    441440      nitsed000 = nit000 
     
    447446      READ( numnamsed, nam_time ) 
    448447      WRITE(numsed,*) ' namelist nam_time' 
     448 
     449#if ! defined key_sed_off 
     450      nfreq     = 1 
     451#endif 
    449452 
    450453      WRITE(numsed,*) ' sedimentation time step              dtsed      = ', dtsed 
Note: See TracChangeset for help on using the changeset viewer.