- Timestamp:
- 2016-10-25T17:32:50+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/AGE/trcini_age.F90
r7068 r7097 10 10 USE oce_trc 11 11 USE trc 12 USE trcnam_age ! AGE SMS namelist 12 13 USE trcsms_age 13 14 … … 39 40 IF(lwp) WRITE(numout,*) ' ~~~~~~~~~~~~~~' 40 41 42 CALL trc_nam_age 43 41 44 rryear = 1._wp / ( nyear_len(1) * rday ) ! recip number of seconds in one year 42 45
Note: See TracChangeset
for help on using the changeset viewer.