- Timestamp:
- 2012-02-25T16:50:01+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/TOP_SRC/CFC/trcsms_cfc.F90
r3294 r3318 18 18 USE par_trc ! TOP parameters 19 19 USE trc ! TOP variables 20 USE trd mod_oce21 USE trdmod_trc 20 USE trd_oce ! trends: ocean variables 21 USE trdmod_trc ! trends: passive tracer variables 22 22 USE iom ! I/O library 23 23 … … 191 191 IF( l_trdtrc ) THEN 192 192 DO jn = jp_cfc0, jp_cfc1 193 CALL trd_mod_trc( tra(:,:,:,jn), jn, jptra_ trd_sms, kt ) ! save trends193 CALL trd_mod_trc( tra(:,:,:,jn), jn, jptra_sms, kt ) ! save trends 194 194 END DO 195 195 END IF
Note: See TracChangeset
for help on using the changeset viewer.