- Timestamp:
- 2016-01-15T16:47:16+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/TRP/trcnxt.F90
r5729 r6259 105 105 DO jn = 1, jptra 106 106 CALL lbc_lnk( tra(:,:,:,jn), 'T', 1. ) 107 CALL lbc_lnk( trn(:,:,:,jn), 'T', 1. ) 108 CALL lbc_lnk( trb(:,:,:,jn), 'T', 1. ) 107 109 END DO 108 110
Note: See TracChangeset
for help on using the changeset viewer.