Changeset 14544
- Timestamp:
- 2021-02-25T09:53:40+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/TOP/TRP/trcadv.F90
r14433 r14544 143 143 CASE ( np_MUS ) ! MUSCL 144 144 IF (nn_hls.EQ.2) THEN 145 IF (nn_hls.EQ.2)CALL lbc_lnk( 'trcadv', ptr(:,:,:,:,Kbb), 'T', 1.)145 CALL lbc_lnk( 'trcadv', ptr(:,:,:,:,Kbb), 'T', 1.) 146 146 #if defined key_loop_fusion 147 147 CALL tra_adv_mus_lf( kt, nittrc000,'TRC', rDt_trc, zuu, zvv, zww, Kbb, Kmm, ptr, jptra, Krhs, ln_mus_ups )
Note: See TracChangeset
for help on using the changeset viewer.