Changeset 2567 for trunk/NEMOGCM/NEMO/TOP_SRC/LOBSTER/trcnam_lobster.F90
- Timestamp:
- 2011-01-25T10:36:27+01:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/TOP_SRC/LOBSTER/trcnam_lobster.F90
r2528 r2567 79 79 NAMELIST/namlobopt/ xkg0, xkr0, xkgp, xkrp, xlg, xlr, rpig 80 80 #if defined key_diatrc && ! defined key_iomput 81 NAMELIST/namlobdia/n writedia, lobdia3d, lobdia2d ! additional diagnostics81 NAMELIST/namlobdia/nn_writedia, lobdia3d, lobdia2d ! additional diagnostics 82 82 #endif 83 83 #if defined key_diabio || defined key_trdmld_trc … … 283 283 ! Namelist namlobdia 284 284 ! ------------------- 285 n writedia = 10 ! default values285 nn_writedia = 10 ! default values 286 286 287 287 DO jl = 1, jp_lobster_2d … … 319 319 WRITE(numout,*) 320 320 WRITE(numout,*) ' Namelist : natadd' 321 WRITE(numout,*) ' frequency of outputs for additional arrays n writedia = ', nwritedia321 WRITE(numout,*) ' frequency of outputs for additional arrays nn_writedia = ', nn_writedia 322 322 DO jl = 1, jp_lobster_3d 323 323 jn = jp_lob0_3d + jl - 1
Note: See TracChangeset
for help on using the changeset viewer.