- Timestamp:
- 2015-12-02T13:33:32+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/trcnam.F90
r5939 r5978 491 491 trc3d(:,:,:,:) = 0._wp ; ctrc3d(:) = ' ' ; ctrc3l(:) = ' ' ; ctrc3u(:) = ' ' 492 492 ! 493 ELSE IF ( lk_iomput .AND. lk_medusa .AND. .NOT. ln_diatrc) THEN494 CALL trc_nam_iom_medusa493 !! ELSE IF ( lk_iomput .AND. lk_medusa .AND. .NOT. ln_diatrc) THEN 494 !! CALL trc_nam_iom_medusa 495 495 ENDIF 496 496
Note: See TracChangeset
for help on using the changeset viewer.