Changeset 4567
- Timestamp:
- 2014-03-25T10:40:11+01:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_v3_4_STABLE_2012/NEMOGCM/NEMO/OPATAM_SRC/TRA/trasbc_tam.F90
r3611 r4567 219 219 ENDIF 220 220 !!gm It should be useless 221 CALL lbc_lnk( tsa (:,:,:,jp_tem), 'T', 1. ) ; CALL lbc_lnk( tsa_tl(:,:,:,jp_sal), 'T', 1. )221 CALL lbc_lnk( tsa_tl(:,:,:,jp_tem), 'T', 1. ) ; CALL lbc_lnk( tsa_tl(:,:,:,jp_sal), 'T', 1. ) 222 222 ! 223 223 IF( nn_timing == 1 ) CALL timing_stop('tra_sbc_tan')
Note: See TracChangeset
for help on using the changeset viewer.